|
|
@@ -0,0 +1,1740 @@
|
|
|
+--[[
|
|
|
+exEasyUI - 简化的UI组件库
|
|
|
+版本号：1.6.1
|
|
|
+作者： zengshuai
|
|
|
+日期：2025-10-09
|
|
|
+=====================================
|
|
|
+
|
|
|
+结构说明：
|
|
|
+1. 常量定义 - UI颜色常量和调试配置
|
|
|
+2. 硬件依赖 - 使用exlcd/extp初始化LCD和TP,并使用gtfont初始化字体(可选)
|
|
|
+3. 核心部分 - 组件管理、事件分发、渲染系统
|
|
|
+4. 组件部分 - 目前有6个组件
|
|
|
+ - Button：按钮组件
|
|
|
+ - CheckBox：复选框组件
|
|
|
+ - Label：标签组件
|
|
|
+ - Picture：图片组件
|
|
|
+ - MessageBox：消息框组件
|
|
|
+ - Window：窗口组件
|
|
|
+ - ProgressBar：进度条组件
|
|
|
+
|
|
|
+基于原exSimpleUI重构，将所有代码合并为单个文件，便于使用和维护。
|
|
|
+支持触摸事件分发、组件渲染、主题切换等核心功能。
|
|
|
+]]
|
|
|
+
|
|
|
+local screen_data = require "screen_data_table" -- 唯一引入屏幕配置参数的地方
|
|
|
+local exlcd = require "exlcd" -- 显示驱动模块
|
|
|
+local extp = require "extp" -- 触摸驱动模块
|
|
|
+
|
|
|
+gtfont_dev = gtfont_dev or nil -- 全局SPI设备句柄，避免被GC
|
|
|
+
|
|
|
+-- ================================
|
|
|
+-- 1. 常量定义
|
|
|
+-- ================================
|
|
|
+
|
|
|
+-- UI颜色常量
|
|
|
+local COLOR_WHITE = 0xFFFF
|
|
|
+local COLOR_BLACK = 0x0000
|
|
|
+local COLOR_GRAY = 0x8410
|
|
|
+local COLOR_BLUE = 0x001F
|
|
|
+local COLOR_RED = 0xF800
|
|
|
+local COLOR_GREEN = 0x07E0
|
|
|
+local COLOR_YELLOW = 0xFFE0
|
|
|
+local COLOR_CYAN = 0x07FF
|
|
|
+local COLOR_MAGENTA = 0xF81F
|
|
|
+local COLOR_ORANGE = 0xFC00
|
|
|
+local COLOR_PINK = 0xF81F
|
|
|
+
|
|
|
+-- Windows 11 风格颜色（v1.6.0新增）
|
|
|
+-- Light模式
|
|
|
+local COLOR_WIN11_LIGHT_DIALOG_BG = 0xF79E -- RGB(243, 243, 243) - 对话框背景
|
|
|
+local COLOR_WIN11_LIGHT_BUTTON_BG = 0xFFDF -- RGB(251, 251, 252) - 按钮背景
|
|
|
+local COLOR_WIN11_LIGHT_BUTTON_BORDER = 0xE73C -- RGB(229, 229, 229) - 按钮边框
|
|
|
+-- Dark模式
|
|
|
+local COLOR_WIN11_DARK_DIALOG_BG = 0x2104 -- RGB(32, 32, 32) - 对话框背景
|
|
|
+local COLOR_WIN11_DARK_BUTTON_BG = 0x3186 -- RGB(51, 51, 51) - 按钮背景
|
|
|
+local COLOR_WIN11_DARK_BUTTON_BORDER = 0x4A69 -- RGB(76, 76, 76) - 按钮边框
|
|
|
+
|
|
|
+-- ================================
|
|
|
+-- 2. 硬件依赖部分 (hw)
|
|
|
+-- ================================
|
|
|
+
|
|
|
+local hw = {}
|
|
|
+local FontAdapter = { _backend = "default", _size = 12, _gray = false, _name = nil }
|
|
|
+
|
|
|
+-- 硬件初始化入口
|
|
|
+function hw.init(opts)
|
|
|
+ -- 初始化显示屏
|
|
|
+ -- 使用screen_data配置表中的参数初始化LCD，在配置表中修改即可
|
|
|
+ local lcd_init_success exlcd.init(screen_data.lcdargs)
|
|
|
+
|
|
|
+
|
|
|
+ -- 检查LCD初始化是否成功
|
|
|
+ if lcd_init_success then
|
|
|
+ log.error("ui_main", "LCD初始化失败")
|
|
|
+ return -- 初始化失败，退出任务
|
|
|
+ end
|
|
|
+
|
|
|
+
|
|
|
+
|
|
|
+ -- 通用显示设置
|
|
|
+ lcd.setupBuff(nil, false) -- 设置帧缓冲区
|
|
|
+ lcd.autoFlush(false) -- 禁止自动刷新
|
|
|
+
|
|
|
+ -- -- 设置字体为模组自带的opposansm12中文字体
|
|
|
+ -- lcd.setFont(lcd.font_opposansm12_chinese)
|
|
|
+
|
|
|
+ -- 初始化触摸IC
|
|
|
+ -- 使用配置表中的参数初始化触摸
|
|
|
+ extp.init(screen_data.touch)
|
|
|
+ extp.setPublishEnabled("all", true) -- 发布所有消息
|
|
|
+
|
|
|
+ -- 自定义配置
|
|
|
+ extp.setSlideThreshold(40) -- 设置滑动阈值为40像素
|
|
|
+ extp.setLongPressThreshold(600) -- 设置长按阈值为600毫秒
|
|
|
+
|
|
|
+ -- 字体后端装配（保持原逻辑，可选）
|
|
|
+ local fcfg = opts.font or {}
|
|
|
+ if fcfg.type == "gtfont" then
|
|
|
+ local spi_id = (fcfg.spi and fcfg.spi.id) or 0
|
|
|
+ local spi_cs = (fcfg.spi and fcfg.spi.cs) or 8
|
|
|
+ local spi_clk = (fcfg.spi and fcfg.spi.clock) or (20 * 1000 * 1000)
|
|
|
+ gtfont_dev = spi.deviceSetup(spi_id or 1, spi_cs or 12, 0, 0, 8, spi_clk or (20*1000*1000), spi.MSB, 1, 0)
|
|
|
+ log.error("exEasyUI.gtfont", "spi.deviceSetup", type(gtfont_dev))
|
|
|
+ if type(gtfont_dev) ~= "userdata" then
|
|
|
+ log.error("exEasyUI.gtfont", "spi.deviceSetup error", type(gtfont_dev))
|
|
|
+ gtfont_dev = nil
|
|
|
+ end
|
|
|
+ local gtfont_ok = gtfont.init(gtfont_dev)
|
|
|
+ if gtfont_ok then
|
|
|
+ FontAdapter._backend = "gtfont"
|
|
|
+ FontAdapter._size = tonumber(fcfg.size or 16)
|
|
|
+ FontAdapter._gray = not not fcfg.gray
|
|
|
+ log.info("exEasyUI", "gtfont enabled", spi_id, spi_cs, FontAdapter._size)
|
|
|
+ else
|
|
|
+ FontAdapter._backend = "default"
|
|
|
+ FontAdapter._size = 12
|
|
|
+ FontAdapter._gray = false
|
|
|
+ log.warn("exEasyUI", "gtfont init failed, fallback to default font")
|
|
|
+ end
|
|
|
+ else
|
|
|
+ FontAdapter._backend = "default"
|
|
|
+ FontAdapter._size = 12
|
|
|
+ FontAdapter._gray = false
|
|
|
+ FontAdapter._name = (fcfg and fcfg.name) or nil
|
|
|
+ if lcd and lcd.setFont and lcd.font_opposansm12_chinese then
|
|
|
+ lcd.setFont(lcd.font_opposansm12_chinese)
|
|
|
+ end
|
|
|
+ end
|
|
|
+ return true
|
|
|
+end
|
|
|
+
|
|
|
+-- ================================
|
|
|
+-- 3. 核心部分 (core + event)
|
|
|
+-- ================================
|
|
|
+
|
|
|
+local core = {}
|
|
|
+local event = {}
|
|
|
+
|
|
|
+-- 组件注册表
|
|
|
+local registry = {}
|
|
|
+local last_action = nil
|
|
|
+local current_theme = "dark"
|
|
|
+
|
|
|
+-- 调试开关
|
|
|
+core.debug_touch = true
|
|
|
+
|
|
|
+-- 调试配置函数
|
|
|
+function core.debug(v)
|
|
|
+ if v == nil then return { touch = not not core.debug_touch } end
|
|
|
+ if type(v) == "boolean" then
|
|
|
+ core.debug_touch = v
|
|
|
+ return
|
|
|
+ end
|
|
|
+ if type(v) == "table" then
|
|
|
+ if v.touch ~= nil then core.debug_touch = not not v.touch end
|
|
|
+ return
|
|
|
+ end
|
|
|
+end
|
|
|
+
|
|
|
+-- 添加组件到渲染队列
|
|
|
+function core.add(component)
|
|
|
+ registry[#registry + 1] = component
|
|
|
+end
|
|
|
+
|
|
|
+-- 从注册表移除组件
|
|
|
+function core.remove(component)
|
|
|
+ for i = #registry, 1, -1 do
|
|
|
+ if registry[i] == component then
|
|
|
+ table.remove(registry, i)
|
|
|
+ return true
|
|
|
+ end
|
|
|
+ end
|
|
|
+ return false
|
|
|
+end
|
|
|
+
|
|
|
+-- 清屏
|
|
|
+function core.clear(color)
|
|
|
+ lcd.clear(color or COLOR_BLACK)
|
|
|
+end
|
|
|
+
|
|
|
+-- 渲染所有可见组件
|
|
|
+function core.render()
|
|
|
+ for i = 1, #registry do
|
|
|
+ local c = registry[i]
|
|
|
+ if c and c.visible ~= false and c.draw then c:draw() end
|
|
|
+ end
|
|
|
+ lcd.flush()
|
|
|
+end
|
|
|
+
|
|
|
+-- 获取当前时间戳
|
|
|
+local function now_ms()
|
|
|
+ if mcu and mcu.ticks then return mcu.ticks() end
|
|
|
+ return (os.clock() or 0) * 1000
|
|
|
+end
|
|
|
+
|
|
|
+-- 命中测试
|
|
|
+local function hit_test(x, y, r)
|
|
|
+ return x >= r.x and y >= r.y and x <= (r.x + r.w) and y <= (r.y + r.h)
|
|
|
+end
|
|
|
+
|
|
|
+-- 触摸事件分发（extp事件）
|
|
|
+function core.handleTouchEvent(evt, x, y)
|
|
|
+ local start_ms
|
|
|
+ if core.debug_touch then
|
|
|
+ start_ms = now_ms()
|
|
|
+ end
|
|
|
+ for i = #registry, 1, -1 do
|
|
|
+ local c = registry[i]
|
|
|
+ if c and c.enabled ~= false and c.handleEvent and
|
|
|
+ (c._capture == true or hit_test(x, y, { x = c.x, y = c.y, w = c.w, h = c.h })) then
|
|
|
+ if c:handleEvent(evt, x, y) then
|
|
|
+ if core.debug_touch and start_ms then
|
|
|
+ local dt = now_ms() - start_ms
|
|
|
+ log.info("exEasyUI", "consumed_by", tostring(c.__name or "component"), string.format("%.2fms", dt))
|
|
|
+ end
|
|
|
+ return true
|
|
|
+ end
|
|
|
+ end
|
|
|
+ end
|
|
|
+ if core.debug_touch and start_ms then
|
|
|
+ local dt = now_ms() - start_ms
|
|
|
+ if evt ~= "MOVE_X" and evt ~= "MOVE_Y" then
|
|
|
+ log.info("exEasyUI", "not_consumed_cost", string.format("%.2fms", dt))
|
|
|
+ end
|
|
|
+ end
|
|
|
+ return false
|
|
|
+end
|
|
|
+
|
|
|
+-- 系统初始化
|
|
|
+function core.init(opts)
|
|
|
+ opts = opts or {}
|
|
|
+
|
|
|
+ -- 主题设置：根据传入参数设置当前主题（light/dark）
|
|
|
+ if opts.theme == "light" or opts.theme == "dark" then
|
|
|
+ current_theme = opts.theme
|
|
|
+ end
|
|
|
+
|
|
|
+ -- 触摸事件订阅与转发（extp）
|
|
|
+ -- extp_down_x, extp_down_y 记录按下时的原始坐标
|
|
|
+ -- extp_curr_x, extp_curr_y 记录当前触摸点坐标（用于MOVE/滑动等）
|
|
|
+ local extp_down_x, extp_down_y
|
|
|
+ local extp_curr_x, extp_curr_y
|
|
|
+
|
|
|
+ -- extp_dispatch: 触摸事件分发函数，负责将底层触摸事件转换为UI事件
|
|
|
+ -- evt: 事件类型（如TOUCH_DOWN、MOVE_X、SINGLE_TAP等）
|
|
|
+ -- a, b: 事件参数（如坐标或偏移量）
|
|
|
+ local function extp_dispatch(evt, a, b)
|
|
|
+ if evt == "TOUCH_DOWN" then
|
|
|
+ -- 记录触摸按下时的原始坐标，a和b通常为触摸点的x、y坐标，若无法转换为数字则默认为0
|
|
|
+ extp_down_x, extp_down_y = tonumber(a) or 0, tonumber(b) or 0
|
|
|
+ extp_curr_x, extp_curr_y = extp_down_x, extp_down_y
|
|
|
+ if core.debug_touch then log.info("exEasyUI", "extp", "TOUCH_DOWN", extp_curr_x, extp_curr_y) end
|
|
|
+ -- 分发TOUCH_DOWN事件
|
|
|
+ core.handleTouchEvent("TOUCH_DOWN", extp_curr_x, extp_curr_y)
|
|
|
+ last_action = "TOUCH_DOWN"
|
|
|
+ return
|
|
|
+ end
|
|
|
+
|
|
|
+ -- 若未按下则忽略后续事件
|
|
|
+ if not extp_down_x or not extp_down_y then return end
|
|
|
+
|
|
|
+ if evt == "MOVE_X" then
|
|
|
+ -- 处理横向滑动，a为x方向偏移
|
|
|
+ local dx = tonumber(a) or 0
|
|
|
+ extp_curr_x = extp_down_x + dx
|
|
|
+ if core.debug_touch then log.info("exEasyUI", "extp", "MOVE_X", extp_curr_x, extp_curr_y) end
|
|
|
+ core.handleTouchEvent("MOVE_X", extp_curr_x, extp_curr_y)
|
|
|
+ last_action = "MOVE_X"
|
|
|
+ return
|
|
|
+ elseif evt == "MOVE_Y" then
|
|
|
+ -- 处理纵向滑动，b为y方向偏移
|
|
|
+ local dy = tonumber(b) or 0
|
|
|
+ extp_curr_y = extp_down_y + dy
|
|
|
+ if core.debug_touch then log.info("exEasyUI", "extp", "MOVE_Y", extp_curr_x, extp_curr_y) end
|
|
|
+ core.handleTouchEvent("MOVE_Y", extp_curr_x, extp_curr_y)
|
|
|
+ last_action = "MOVE_Y"
|
|
|
+ return
|
|
|
+ elseif evt == "SWIPE_LEFT" or evt == "SWIPE_RIGHT" then
|
|
|
+ -- 处理左右滑动手势，a为x方向偏移
|
|
|
+ local dx = tonumber(a) or 0
|
|
|
+ extp_curr_x = extp_down_x + dx
|
|
|
+ if core.debug_touch then log.info("exEasyUI", "extp", evt, extp_curr_x, extp_curr_y) end
|
|
|
+ core.handleTouchEvent(evt, extp_curr_x, extp_curr_y)
|
|
|
+ last_action = evt
|
|
|
+ elseif evt == "SWIPE_UP" or evt == "SWIPE_DOWN" then
|
|
|
+ -- 处理上下滑动手势，b为y方向偏移
|
|
|
+ local dy = tonumber(b) or 0
|
|
|
+ extp_curr_y = extp_down_y + dy
|
|
|
+ if core.debug_touch then log.info("exEasyUI", "extp", evt, extp_curr_x, extp_curr_y) end
|
|
|
+ core.handleTouchEvent(evt, extp_curr_x, extp_curr_y)
|
|
|
+ last_action = evt
|
|
|
+ elseif evt == "SINGLE_TAP" or evt == "LONG_PRESS" then
|
|
|
+ -- 处理单击/长按事件，a/b为最终坐标（若无则用当前坐标）
|
|
|
+ local ux = tonumber(a) or extp_curr_x or 0
|
|
|
+ local uy = tonumber(b) or extp_curr_y or 0
|
|
|
+ if core.debug_touch then log.info("exEasyUI", "extp", evt, ux, uy) end
|
|
|
+ core.handleTouchEvent(evt, ux, uy)
|
|
|
+ last_action = evt
|
|
|
+ end
|
|
|
+
|
|
|
+ -- 触摸序列结束后，清空坐标状态
|
|
|
+ if last_action == "SINGLE_TAP" or last_action == "LONG_PRESS" or
|
|
|
+ last_action == "SWIPE_LEFT" or last_action == "SWIPE_RIGHT" or
|
|
|
+ last_action == "SWIPE_UP" or last_action == "SWIPE_DOWN" then
|
|
|
+ extp_down_x, extp_down_y = nil, nil
|
|
|
+ extp_curr_x, extp_curr_y = nil, nil
|
|
|
+ end
|
|
|
+ end
|
|
|
+
|
|
|
+ -- 订阅底层触摸事件（baseTouchEvent），由extp_dispatch处理
|
|
|
+ sys.subscribe("baseTouchEvent", extp_dispatch)
|
|
|
+end
|
|
|
+
|
|
|
+-- 获取当前主题
|
|
|
+function core.getTheme()
|
|
|
+ return current_theme
|
|
|
+end
|
|
|
+
|
|
|
+-- 事件系统：订阅事件
|
|
|
+function event.on(name, cb)
|
|
|
+ return sys.subscribe(name, cb)
|
|
|
+end
|
|
|
+
|
|
|
+-- 事件系统：发送事件
|
|
|
+function event.emit(name, ...)
|
|
|
+ return sys.publish(name, ...)
|
|
|
+end
|
|
|
+
|
|
|
+-- ================================
|
|
|
+-- 4. 组件部分
|
|
|
+-- ================================
|
|
|
+
|
|
|
+-- 通用绘图函数
|
|
|
+local function fill_rect(x1, y1, x2, y2, color)
|
|
|
+ lcd.fill(x1, y1, x2, y2 + 1, color) -- 右下边界为不含区间, y2需要+1
|
|
|
+end
|
|
|
+
|
|
|
+local function stroke_rect(x1, y1, x2, y2, color)
|
|
|
+ lcd.drawLine(x1, y1, x2, y1, color)
|
|
|
+ lcd.drawLine(x2, y1, x2, y2, color)
|
|
|
+ lcd.drawLine(x2, y2, x1, y2, color)
|
|
|
+ lcd.drawLine(x1, y2, x1, y1, color)
|
|
|
+end
|
|
|
+
|
|
|
+-- v1.6.1新增：绘制图片占位符（方框+X叉）
|
|
|
+local function draw_image_placeholder(x, y, w, h, bg_color, border_color)
|
|
|
+ bg_color = bg_color or 0x8410 -- 默认灰色
|
|
|
+ border_color = border_color or COLOR_WHITE
|
|
|
+
|
|
|
+ -- 填充背景
|
|
|
+ fill_rect(x, y, x + w - 1, y + h - 1, bg_color)
|
|
|
+
|
|
|
+ -- 绘制边框
|
|
|
+ stroke_rect(x, y, x + w - 1, y + h - 1, border_color)
|
|
|
+
|
|
|
+ -- 绘制X叉（对角线）
|
|
|
+ lcd.drawLine(x, y, x + w - 1, y + h - 1, border_color)
|
|
|
+ lcd.drawLine(x + w - 1, y, x, y + h - 1, border_color)
|
|
|
+
|
|
|
+ -- 如果尺寸足够大，绘制内缩的X叉使其更明显
|
|
|
+ if w >= 20 and h >= 20 then
|
|
|
+ local margin = math.min(w, h) // 8 -- 内缩边距
|
|
|
+ lcd.drawLine(x + margin, y + margin, x + w - 1 - margin, y + h - 1 - margin, border_color)
|
|
|
+ lcd.drawLine(x + w - 1 - margin, y + margin, x + margin, y + h - 1 - margin, border_color)
|
|
|
+ end
|
|
|
+end
|
|
|
+
|
|
|
+-- FontAdapter 实现
|
|
|
+local function font_line_height(style)
|
|
|
+ if FontAdapter._backend == "gtfont" then
|
|
|
+ local sz = (style and style.size) or FontAdapter._size or 16
|
|
|
+ return sz
|
|
|
+ end
|
|
|
+ -- default backend：优先使用样式中的 size，没有则回退 12
|
|
|
+ if style and style.size then
|
|
|
+ return tonumber(style.size) or 12
|
|
|
+ end
|
|
|
+ return 12
|
|
|
+end
|
|
|
+
|
|
|
+local function font_set(style)
|
|
|
+ style = style or {}
|
|
|
+ if FontAdapter._backend == "gtfont" then
|
|
|
+ FontAdapter._size = tonumber(style.size or FontAdapter._size or 16)
|
|
|
+ FontAdapter._gray = (style.gray ~= nil) and not not style.gray or FontAdapter._gray
|
|
|
+ if lcd and lcd.setFont and lcd.drawGtfontUtf8 then
|
|
|
+ lcd.setFont(lcd.drawGtfontUtf8)
|
|
|
+ end
|
|
|
+ return
|
|
|
+ end
|
|
|
+ -- default backend
|
|
|
+ FontAdapter._name = style.name or FontAdapter._name
|
|
|
+ if lcd and lcd.setFont then
|
|
|
+ -- 优先按 name，其次按 size 猜测常见字体名，最后回退
|
|
|
+ if FontAdapter._name and lcd["font_" .. FontAdapter._name] then
|
|
|
+ lcd.setFont(lcd["font_" .. FontAdapter._name])
|
|
|
+ elseif style and style.size then
|
|
|
+ local size_num = tonumber(style.size)
|
|
|
+ if size_num then
|
|
|
+ local guess = "font_opposansm" .. tostring(size_num) .. "_chinese"
|
|
|
+ if lcd[guess] then
|
|
|
+ lcd.setFont(lcd[guess])
|
|
|
+ elseif lcd.font_opposansm12_chinese then
|
|
|
+ lcd.setFont(lcd.font_opposansm12_chinese)
|
|
|
+ end
|
|
|
+ elseif lcd.font_opposansm12_chinese then
|
|
|
+ lcd.setFont(lcd.font_opposansm12_chinese)
|
|
|
+ end
|
|
|
+ elseif lcd.font_opposansm12_chinese then
|
|
|
+ lcd.setFont(lcd.font_opposansm12_chinese)
|
|
|
+ end
|
|
|
+ end
|
|
|
+end
|
|
|
+
|
|
|
+local function font_draw(text, x, y, color, style)
|
|
|
+ color = color or COLOR_WHITE
|
|
|
+ style = style or {}
|
|
|
+ if FontAdapter._backend == "gtfont" then
|
|
|
+ local sz = tonumber(style.size or FontAdapter._size or 16)
|
|
|
+ if FontAdapter._gray and lcd.drawGtfontUtf8Gray then
|
|
|
+ -- 固件灰度级目前不可调，传固定值4
|
|
|
+ lcd.drawGtfontUtf8Gray(text, sz, 4, x, y, color)
|
|
|
+ elseif lcd.drawGtfontUtf8 then
|
|
|
+ lcd.drawGtfontUtf8(text, sz, x, y, color)
|
|
|
+ else
|
|
|
+ -- 回退：不应触达
|
|
|
+ if lcd.drawStr then
|
|
|
+ lcd.drawStr(x, y + 12, text, color)
|
|
|
+ end
|
|
|
+ end
|
|
|
+ return
|
|
|
+ end
|
|
|
+ -- default backend：y 为顶部坐标，内部转换为基线
|
|
|
+ if lcd and lcd.setFont then
|
|
|
+ if FontAdapter._name and lcd["font_" .. FontAdapter._name] then
|
|
|
+ lcd.setFont(lcd["font_" .. FontAdapter._name])
|
|
|
+ else
|
|
|
+ -- 尝试根据 size 选择合适字体
|
|
|
+ local used = false
|
|
|
+ if style and style.size then
|
|
|
+ local guess = "font_opposansm" .. tostring(style.size) .. "_chinese"
|
|
|
+ if lcd[guess] then
|
|
|
+ lcd.setFont(lcd[guess])
|
|
|
+ used = true
|
|
|
+ end
|
|
|
+ end
|
|
|
+ if not used and lcd.font_opposansm12_chinese then
|
|
|
+ lcd.setFont(lcd.font_opposansm12_chinese)
|
|
|
+ end
|
|
|
+ end
|
|
|
+ end
|
|
|
+ local lh = font_line_height(style)
|
|
|
+ lcd.drawStr(x, y + lh, text, color)
|
|
|
+end
|
|
|
+
|
|
|
+-- 文本宽度测量
|
|
|
+local function font_measure(text, style)
|
|
|
+ if not text or text == "" then return 0 end
|
|
|
+ style = style or {}
|
|
|
+ if FontAdapter._backend == "gtfont" then
|
|
|
+ local sz = tonumber(style.size or FontAdapter._size or 16)
|
|
|
+ local w = 0
|
|
|
+ local i = 1
|
|
|
+ while i <= #text do
|
|
|
+ local b = string.byte(text, i)
|
|
|
+ if b == 32 then -- space
|
|
|
+ w = w + math.ceil(sz / 2)
|
|
|
+ i = i + 1
|
|
|
+ elseif b < 128 then
|
|
|
+ w = w + math.ceil(sz / 2)
|
|
|
+ i = i + 1
|
|
|
+ else
|
|
|
+ w = w + sz
|
|
|
+ -- 简化处理UTF-8宽字节
|
|
|
+ if i + 2 <= #text then i = i + 3 else i = i + 1 end
|
|
|
+ end
|
|
|
+ end
|
|
|
+ return w
|
|
|
+ end
|
|
|
+ -- default backend，尽量使用原生接口
|
|
|
+ if lcd and lcd.setFont then
|
|
|
+ -- 尝试在测量前设置到期望字体，以匹配绘制
|
|
|
+ if FontAdapter._name and lcd["font_" .. FontAdapter._name] then
|
|
|
+ lcd.setFont(lcd["font_" .. FontAdapter._name])
|
|
|
+ elseif style and style.size then
|
|
|
+ local guess = "font_opposansm" .. tostring(style.size) .. "_chinese"
|
|
|
+ if lcd[guess] then
|
|
|
+ lcd.setFont(lcd[guess])
|
|
|
+ elseif lcd.font_opposansm12_chinese then
|
|
|
+ lcd.setFont(lcd.font_opposansm12_chinese)
|
|
|
+ end
|
|
|
+ elseif lcd.font_opposansm12_chinese then
|
|
|
+ lcd.setFont(lcd.font_opposansm12_chinese)
|
|
|
+ end
|
|
|
+ end
|
|
|
+ if lcd and lcd.getStrWidth then return lcd.getStrWidth(text) end
|
|
|
+ if lcd and lcd.strWidth then return lcd.strWidth(text) end
|
|
|
+ if lcd and lcd.get_string_width then return lcd.get_string_width(text) end
|
|
|
+ -- 估算：英文约为 size/2，中文约为 size
|
|
|
+ local width = 0
|
|
|
+ local i = 1
|
|
|
+ while i <= #text do
|
|
|
+ local byte = string.byte(text, i)
|
|
|
+ if byte < 128 then
|
|
|
+ width = width + math.ceil((tonumber(style.size) or 12) / 2)
|
|
|
+ i = i + 1
|
|
|
+ else
|
|
|
+ width = width + (tonumber(style.size) or 12)
|
|
|
+ i = i + 3
|
|
|
+ end
|
|
|
+ end
|
|
|
+ return width
|
|
|
+end
|
|
|
+
|
|
|
+-- UTF-8字符获取（返回字符和字节长度）
|
|
|
+local function get_utf8_char(text, i)
|
|
|
+ if not text or i > #text then return "", 0 end
|
|
|
+ local byte = string.byte(text, i)
|
|
|
+ if byte < 128 then
|
|
|
+ -- ASCII字符（1字节）
|
|
|
+ return string.sub(text, i, i), 1
|
|
|
+ elseif byte >= 224 and byte < 240 then
|
|
|
+ -- 3字节UTF-8字符（中文等）
|
|
|
+ if i + 2 <= #text then
|
|
|
+ return string.sub(text, i, i + 2), 3
|
|
|
+ else
|
|
|
+ return string.sub(text, i, i), 1
|
|
|
+ end
|
|
|
+ elseif byte >= 192 and byte < 224 then
|
|
|
+ -- 2字节UTF-8字符
|
|
|
+ if i + 1 <= #text then
|
|
|
+ return string.sub(text, i, i + 1), 2
|
|
|
+ else
|
|
|
+ return string.sub(text, i, i), 1
|
|
|
+ end
|
|
|
+ elseif byte >= 240 then
|
|
|
+ -- 4字节UTF-8字符
|
|
|
+ if i + 3 <= #text then
|
|
|
+ return string.sub(text, i, i + 3), 4
|
|
|
+ else
|
|
|
+ return string.sub(text, i, i), 1
|
|
|
+ end
|
|
|
+ else
|
|
|
+ -- 其他情况
|
|
|
+ return string.sub(text, i, i), 1
|
|
|
+ end
|
|
|
+end
|
|
|
+
|
|
|
+-- 文本换行处理（返回行数组）
|
|
|
+-- 支持英文按单词换行，中文按字符换行
|
|
|
+local function wrap_text_lines(text, maxWidth, style)
|
|
|
+ if not text or text == "" then return {""} end
|
|
|
+ if not maxWidth or maxWidth <= 0 then return {text} end
|
|
|
+
|
|
|
+ local lines = {}
|
|
|
+ local currentLine = ""
|
|
|
+ local currentWidth = 0
|
|
|
+ local wordBuffer = "" -- 当前英文单词缓冲
|
|
|
+ local wordWidth = 0 -- 当前单词宽度
|
|
|
+ local i = 1
|
|
|
+
|
|
|
+ while i <= #text do
|
|
|
+ local char, charLen = get_utf8_char(text, i)
|
|
|
+ local charWidth = font_measure(char, style)
|
|
|
+ local byte = string.byte(text, i)
|
|
|
+
|
|
|
+ -- 判断是否为英文字母或数字
|
|
|
+ local isAlphaNum = (byte >= 48 and byte <= 57) or -- 0-9
|
|
|
+ (byte >= 65 and byte <= 90) or -- A-Z
|
|
|
+ (byte >= 97 and byte <= 122) -- a-z
|
|
|
+
|
|
|
+ if isAlphaNum then
|
|
|
+ -- 英文字符或数字，加入单词缓冲
|
|
|
+ wordBuffer = wordBuffer .. char
|
|
|
+ wordWidth = wordWidth + charWidth
|
|
|
+ i = i + charLen
|
|
|
+ else
|
|
|
+ -- 非英文字符（空格、标点、中文等）
|
|
|
+ -- 先处理缓冲的单词
|
|
|
+ if wordBuffer ~= "" then
|
|
|
+ if currentWidth + wordWidth > maxWidth then
|
|
|
+ -- 单词放不下
|
|
|
+ if currentLine ~= "" then
|
|
|
+ -- 当前行有内容，换行后放单词
|
|
|
+ table.insert(lines, currentLine)
|
|
|
+ currentLine = wordBuffer
|
|
|
+ currentWidth = wordWidth
|
|
|
+ else
|
|
|
+ -- 单词本身超长，强制显示
|
|
|
+ currentLine = wordBuffer
|
|
|
+ currentWidth = wordWidth
|
|
|
+ end
|
|
|
+ else
|
|
|
+ -- 单词可以放下
|
|
|
+ currentLine = currentLine .. wordBuffer
|
|
|
+ currentWidth = currentWidth + wordWidth
|
|
|
+ end
|
|
|
+ wordBuffer = ""
|
|
|
+ wordWidth = 0
|
|
|
+ end
|
|
|
+
|
|
|
+ -- 处理当前字符（空格、标点、中文等）
|
|
|
+ if char == " " then
|
|
|
+ -- 空格：尝试加入当前行
|
|
|
+ if currentWidth + charWidth <= maxWidth then
|
|
|
+ currentLine = currentLine .. char
|
|
|
+ currentWidth = currentWidth + charWidth
|
|
|
+ else
|
|
|
+ -- 空格放不下，换行（空格不放到下一行开头）
|
|
|
+ if currentLine ~= "" then
|
|
|
+ table.insert(lines, currentLine)
|
|
|
+ end
|
|
|
+ currentLine = ""
|
|
|
+ currentWidth = 0
|
|
|
+ end
|
|
|
+ else
|
|
|
+ -- 标点或中文
|
|
|
+ if currentWidth + charWidth > maxWidth then
|
|
|
+ -- 字符放不下，换行
|
|
|
+ if currentLine ~= "" then
|
|
|
+ table.insert(lines, currentLine)
|
|
|
+ end
|
|
|
+ currentLine = char
|
|
|
+ currentWidth = charWidth
|
|
|
+ else
|
|
|
+ -- 字符可以放下
|
|
|
+ currentLine = currentLine .. char
|
|
|
+ currentWidth = currentWidth + charWidth
|
|
|
+ end
|
|
|
+ end
|
|
|
+ i = i + charLen
|
|
|
+ end
|
|
|
+ end
|
|
|
+
|
|
|
+ -- 处理剩余的单词
|
|
|
+ if wordBuffer ~= "" then
|
|
|
+ if currentWidth + wordWidth > maxWidth and currentLine ~= "" then
|
|
|
+ -- 单词放不下，换行
|
|
|
+ table.insert(lines, currentLine)
|
|
|
+ currentLine = wordBuffer
|
|
|
+ else
|
|
|
+ currentLine = currentLine .. wordBuffer
|
|
|
+ end
|
|
|
+ end
|
|
|
+
|
|
|
+ -- 添加最后一行
|
|
|
+ if currentLine ~= "" then
|
|
|
+ table.insert(lines, currentLine)
|
|
|
+ end
|
|
|
+
|
|
|
+ -- 至少返回一个空行
|
|
|
+ if #lines == 0 then
|
|
|
+ lines = {""}
|
|
|
+ end
|
|
|
+
|
|
|
+ return lines
|
|
|
+end
|
|
|
+
|
|
|
+-- 兼容旧接口已移除，统一使用下方两个新 API
|
|
|
+
|
|
|
+-- 新增：直接绘制文本 API（支持 style.size/name/gray）
|
|
|
+local function draw_text_direct(x, y, text, opts)
|
|
|
+ opts = opts or {}
|
|
|
+ local color = opts.color or COLOR_WHITE
|
|
|
+ local style = opts.style or {}
|
|
|
+ font_draw(text or "", x, y, color, style)
|
|
|
+end
|
|
|
+
|
|
|
+-- 新增：在矩形内自适应（仅居中与边界约束，不缩放、不换行）
|
|
|
+local function draw_text_in_rect_centered(x, y, w, h, text, opts)
|
|
|
+ opts = opts or {}
|
|
|
+ local color = opts.color or COLOR_WHITE
|
|
|
+ local style = opts.style or {}
|
|
|
+ local padding = opts.padding or 0
|
|
|
+
|
|
|
+ local tw = font_measure(text or "", style)
|
|
|
+ local lh = font_line_height(style)
|
|
|
+
|
|
|
+ local inner_x = x + padding
|
|
|
+ local inner_y = y + padding
|
|
|
+ local inner_w = w - padding * 2
|
|
|
+ local inner_h = h - padding * 2
|
|
|
+
|
|
|
+ local tx = inner_x + (inner_w - tw) // 2
|
|
|
+ local ty = inner_y + (inner_h - lh) // 2
|
|
|
+
|
|
|
+ -- 夹紧，避免越界
|
|
|
+ tx = math.max(inner_x, tx)
|
|
|
+ tx = math.min(inner_x + inner_w - tw, tx)
|
|
|
+
|
|
|
+ font_draw(text or "", tx, ty, color, style)
|
|
|
+end
|
|
|
+
|
|
|
+-- 旧的宽度测量包装已移除，请直接使用 font_measure(text, style)
|
|
|
+
|
|
|
+-- Button组件 - 基础按钮，支持文本/图片、按下/抬起与点击回调，支持toggle模式
|
|
|
+local Button = {}
|
|
|
+Button.__index = Button
|
|
|
+
|
|
|
+function Button:new(opts)
|
|
|
+ opts = opts or {}
|
|
|
+ local o = setmetatable({}, self)
|
|
|
+ o.x = opts.x or 0
|
|
|
+ o.y = opts.y or 0
|
|
|
+ o.w = opts.width or opts.w or 100
|
|
|
+ o.h = opts.height or opts.h or 36
|
|
|
+
|
|
|
+ -- 文本模式参数
|
|
|
+ o.text = opts.text or "Button"
|
|
|
+ o.textSize = opts.textSize or opts.size
|
|
|
+ local dark = (current_theme == "dark")
|
|
|
+ o.bgColor = opts.bgColor or (dark and COLOR_WIN11_DARK_BUTTON_BG or COLOR_WIN11_LIGHT_BUTTON_BG)
|
|
|
+ o.textColor = opts.textColor or (dark and COLOR_WHITE or COLOR_BLACK)
|
|
|
+ o.borderColor = opts.borderColor or (dark and COLOR_WIN11_DARK_BUTTON_BORDER or COLOR_WIN11_LIGHT_BUTTON_BORDER)
|
|
|
+
|
|
|
+ -- 图片模式参数（v1.6.0新增，合并自ToolButton）
|
|
|
+ o.src = opts.src
|
|
|
+ o.src_pressed = opts.src_pressed
|
|
|
+ o.src_toggled = opts.src_toggled
|
|
|
+
|
|
|
+ -- Toggle模式参数（v1.6.0新增）
|
|
|
+ o.toggle = opts.toggle or false
|
|
|
+ o.toggled = opts.toggled or false
|
|
|
+ o.onToggle = opts.onToggle
|
|
|
+
|
|
|
+ -- 状态
|
|
|
+ o.pressed = false
|
|
|
+ o.onClick = opts.onClick
|
|
|
+ o.visible = opts.visible ~= false
|
|
|
+ o.enabled = opts.enabled ~= false
|
|
|
+ o._imageCache = {} -- v1.6.1：缓存图片加载状态，避免重复检查和重复打印警告
|
|
|
+ return o
|
|
|
+end
|
|
|
+
|
|
|
+function Button:draw()
|
|
|
+ if not self.visible then return end
|
|
|
+
|
|
|
+ -- 图片模式：优先显示图片
|
|
|
+ if self.src then
|
|
|
+ local path
|
|
|
+ if self.toggle and self.toggled then
|
|
|
+ path = self.src_toggled or self.src
|
|
|
+ elseif self.pressed then
|
|
|
+ path = self.src_pressed or self.src
|
|
|
+ else
|
|
|
+ path = self.src
|
|
|
+ end
|
|
|
+
|
|
|
+ -- v1.6.1修复：检查文件是否存在，并改进占位符显示（使用缓存避免重复检查）
|
|
|
+ if type(path) == "string" and path ~= "" and path:lower():sub(-4) == ".jpg" then
|
|
|
+ -- 检查缓存
|
|
|
+ if self._imageCache[path] == nil then
|
|
|
+ -- 未缓存，首次检查文件是否存在
|
|
|
+ if io and io.exists and io.exists(path) then
|
|
|
+ self._imageCache[path] = true -- 缓存：文件存在
|
|
|
+ else
|
|
|
+ self._imageCache[path] = false -- 缓存：文件不存在
|
|
|
+ log.warn("Button", "图片文件不存在:", path)
|
|
|
+ end
|
|
|
+ end
|
|
|
+
|
|
|
+ -- 根据缓存状态处理
|
|
|
+ if self._imageCache[path] == true then
|
|
|
+ lcd.showImage(self.x, self.y, path)
|
|
|
+ else
|
|
|
+ -- 文件不存在（已缓存），直接显示占位符，不再重复警告
|
|
|
+ draw_image_placeholder(self.x, self.y, self.w, self.h, COLOR_GRAY, COLOR_WHITE)
|
|
|
+ end
|
|
|
+ else
|
|
|
+ -- path无效或不是jpg，显示占位符
|
|
|
+ draw_image_placeholder(self.x, self.y, self.w, self.h, COLOR_GRAY, COLOR_WHITE)
|
|
|
+ end
|
|
|
+ return
|
|
|
+ end
|
|
|
+
|
|
|
+ -- 文本模式：绘制文本按钮
|
|
|
+ local bg = self.pressed and COLOR_GRAY or self.bgColor
|
|
|
+ fill_rect(self.x, self.y, self.x + self.w - 1, self.y + self.h - 1, bg)
|
|
|
+ stroke_rect(self.x, self.y, self.x + self.w - 1, self.y + self.h - 1, self.borderColor)
|
|
|
+ draw_text_in_rect_centered(self.x, self.y, self.w, self.h, self.text, {
|
|
|
+ color = self.textColor,
|
|
|
+ style = { size = self.textSize },
|
|
|
+ padding = 2
|
|
|
+ })
|
|
|
+end
|
|
|
+
|
|
|
+function Button:setText(newText)
|
|
|
+ self.text = tostring(newText or "")
|
|
|
+end
|
|
|
+
|
|
|
+function Button:handleEvent(evt, x, y)
|
|
|
+ if not self.enabled then return false end
|
|
|
+ local inside = hit_test(x, y, { x = self.x, y = self.y, w = self.w, h = self.h })
|
|
|
+
|
|
|
+ if evt == "TOUCH_DOWN" and inside then
|
|
|
+ self.pressed = true
|
|
|
+ self._capture = true
|
|
|
+ return true
|
|
|
+ elseif evt == "MOVE_X" or evt == "MOVE_Y" then
|
|
|
+ if self._capture then
|
|
|
+ self.pressed = inside
|
|
|
+ return true
|
|
|
+ end
|
|
|
+ elseif evt == "SINGLE_TAP" then
|
|
|
+ local was_pressed = self.pressed
|
|
|
+ self.pressed = false
|
|
|
+ self._capture = false
|
|
|
+ if was_pressed and inside then
|
|
|
+ -- Toggle模式处理
|
|
|
+ if self.toggle then
|
|
|
+ self.toggled = not self.toggled
|
|
|
+ if self.onToggle then self.onToggle(self.toggled, self) end
|
|
|
+ end
|
|
|
+ -- 触发点击回调
|
|
|
+ if self.onClick then self.onClick(self) end
|
|
|
+ return true
|
|
|
+ end
|
|
|
+ return true
|
|
|
+ elseif evt == "LONG_PRESS" or evt == "SWIPE_LEFT" or evt == "SWIPE_RIGHT" or evt == "SWIPE_UP" or evt == "SWIPE_DOWN" then
|
|
|
+ self.pressed = false
|
|
|
+ self._capture = false
|
|
|
+ return true
|
|
|
+ end
|
|
|
+ return false
|
|
|
+end
|
|
|
+
|
|
|
+-- CheckBox组件 - 复选框，支持选中状态切换
|
|
|
+local CheckBox = {}
|
|
|
+CheckBox.__index = CheckBox
|
|
|
+
|
|
|
+function CheckBox:new(opts)
|
|
|
+ opts = opts or {}
|
|
|
+ local o = setmetatable({}, self)
|
|
|
+ o.x = opts.x or 0
|
|
|
+ o.y = opts.y or 0
|
|
|
+ o.boxSize = opts.boxSize or 16
|
|
|
+ o.text = opts.text
|
|
|
+ local dark = (current_theme == "dark")
|
|
|
+ o.textColor = opts.textColor or (dark and COLOR_WHITE or COLOR_BLACK)
|
|
|
+ o.borderColor = opts.borderColor or (dark and COLOR_WHITE or COLOR_BLACK)
|
|
|
+ o.bgColor = opts.bgColor or (dark and COLOR_BLACK or COLOR_WHITE)
|
|
|
+ o.tickColor = opts.tickColor or (dark and COLOR_WHITE or COLOR_BLACK)
|
|
|
+ o.checked = opts.checked or false
|
|
|
+ o.enabled = opts.enabled ~= false
|
|
|
+ o.visible = opts.visible ~= false
|
|
|
+ o.onChange = opts.onChange
|
|
|
+ local text_w = (o.text and (#o.text * 6 + 6) or 0)
|
|
|
+ o.w = o.boxSize + text_w
|
|
|
+ o.h = math.max(o.boxSize, 16)
|
|
|
+ return o
|
|
|
+end
|
|
|
+
|
|
|
+function CheckBox:draw()
|
|
|
+ local x2 = self.x + self.boxSize - 1
|
|
|
+ local y2 = self.y + self.boxSize - 1
|
|
|
+ stroke_rect(self.x, self.y, x2, y2, self.borderColor)
|
|
|
+ fill_rect(self.x + 2, self.y + 2, x2 - 2, y2 - 2, self.bgColor)
|
|
|
+ if self.checked then
|
|
|
+ local pad = 2
|
|
|
+ fill_rect(self.x + pad, self.y + pad, x2 - pad, y2 - pad, self.tickColor)
|
|
|
+ end
|
|
|
+ if self.text then
|
|
|
+ local lh = font_line_height(nil)
|
|
|
+ local ty = self.y + (self.h - lh) // 2
|
|
|
+ draw_text_direct(self.x + self.boxSize + 10, ty, self.text, { color = self.textColor })
|
|
|
+ end
|
|
|
+end
|
|
|
+
|
|
|
+function CheckBox:setChecked(v)
|
|
|
+ local nv = not not v
|
|
|
+ if nv ~= self.checked then
|
|
|
+ self.checked = nv
|
|
|
+ if self.onChange then self.onChange(self.checked) end
|
|
|
+ end
|
|
|
+end
|
|
|
+
|
|
|
+function CheckBox:toggle()
|
|
|
+ self:setChecked(not self.checked)
|
|
|
+end
|
|
|
+
|
|
|
+function CheckBox:handleEvent(evt, x, y)
|
|
|
+ if not self.enabled then return false end
|
|
|
+ if evt == "SINGLE_TAP" then
|
|
|
+ if x >= self.x and y >= self.y and x <= (self.x + self.w) and y <= (self.y + self.h) then
|
|
|
+ self:toggle()
|
|
|
+ return true
|
|
|
+ end
|
|
|
+ end
|
|
|
+ return false
|
|
|
+end
|
|
|
+
|
|
|
+-- Label组件 - 文本标签，仅显示不响应事件
|
|
|
+local Label = {}
|
|
|
+Label.__index = Label
|
|
|
+
|
|
|
+function Label:new(opts)
|
|
|
+ opts = opts or {}
|
|
|
+ local o = setmetatable({}, self)
|
|
|
+ o.x = opts.x or 0
|
|
|
+ o.y = opts.y or 0
|
|
|
+ o.text = tostring(opts.text or "")
|
|
|
+ local dark = (current_theme == "dark")
|
|
|
+ o.color = opts.color or (dark and COLOR_WHITE or COLOR_BLACK)
|
|
|
+ o.font = opts.font
|
|
|
+ o.size = opts.size or opts.textSize
|
|
|
+ o.wordWrap = not not opts.wordWrap -- 是否启用换行
|
|
|
+ o._autoW = (opts.w == nil)
|
|
|
+ o._autoH = true -- 高度始终自动计算
|
|
|
+ o.visible = opts.visible ~= false
|
|
|
+ o.enabled = opts.enabled ~= false
|
|
|
+
|
|
|
+ -- 宽度处理
|
|
|
+ local style = { size = o.size }
|
|
|
+ if opts.w then
|
|
|
+ o.w = opts.w
|
|
|
+ o._autoW = false
|
|
|
+ else
|
|
|
+ o.w = font_measure(o.text, style)
|
|
|
+ o._autoW = true
|
|
|
+ end
|
|
|
+
|
|
|
+ -- 高度处理（根据是否换行）
|
|
|
+ local lh = font_line_height(style)
|
|
|
+ if o.wordWrap and not o._autoW then
|
|
|
+ -- 启用换行且指定了宽度，计算多行高度
|
|
|
+ local lines = wrap_text_lines(o.text, o.w, style)
|
|
|
+ o.h = #lines * lh
|
|
|
+ o._lines = lines
|
|
|
+ else
|
|
|
+ -- 单行高度
|
|
|
+ o.h = lh
|
|
|
+ o._lines = nil
|
|
|
+ end
|
|
|
+
|
|
|
+ return o
|
|
|
+end
|
|
|
+
|
|
|
+function Label:setText(t)
|
|
|
+ self.text = tostring(t or "")
|
|
|
+ local style = { size = self.size }
|
|
|
+ local lh = font_line_height(style)
|
|
|
+
|
|
|
+ -- 更新宽度（如果自动）
|
|
|
+ if self._autoW then
|
|
|
+ self.w = font_measure(self.text, style)
|
|
|
+ end
|
|
|
+
|
|
|
+ -- 更新高度和行缓存
|
|
|
+ if self.wordWrap and not self._autoW then
|
|
|
+ local lines = wrap_text_lines(self.text, self.w, style)
|
|
|
+ self.h = #lines * lh
|
|
|
+ self._lines = lines
|
|
|
+ else
|
|
|
+ self.h = lh
|
|
|
+ self._lines = nil
|
|
|
+ end
|
|
|
+end
|
|
|
+
|
|
|
+function Label:setSize(sz)
|
|
|
+ self.size = tonumber(sz) or self.size
|
|
|
+ local style = { size = self.size }
|
|
|
+ local lh = font_line_height(style)
|
|
|
+
|
|
|
+ -- 更新宽度（如果自动）
|
|
|
+ if self._autoW then
|
|
|
+ self.w = font_measure(self.text or "", style)
|
|
|
+ end
|
|
|
+
|
|
|
+ -- 更新高度和行缓存
|
|
|
+ if self.wordWrap and not self._autoW then
|
|
|
+ local lines = wrap_text_lines(self.text or "", self.w, style)
|
|
|
+ self.h = #lines * lh
|
|
|
+ self._lines = lines
|
|
|
+ else
|
|
|
+ self.h = lh
|
|
|
+ self._lines = nil
|
|
|
+ end
|
|
|
+end
|
|
|
+
|
|
|
+function Label:draw()
|
|
|
+ if not self.visible then return end
|
|
|
+
|
|
|
+ local style = { size = self.size }
|
|
|
+
|
|
|
+ -- 若指定自定义字体指针，走默认后端路径（不支持换行）
|
|
|
+ if self.font and lcd and lcd.setFont then
|
|
|
+ lcd.setFont(self.font)
|
|
|
+ local lh = font_line_height(nil)
|
|
|
+ lcd.drawStr(self.x, self.y + lh, self.text, self.color)
|
|
|
+ return
|
|
|
+ end
|
|
|
+
|
|
|
+ -- 换行模式
|
|
|
+ if self.wordWrap and not self._autoW then
|
|
|
+ local lines = self._lines or wrap_text_lines(self.text, self.w, style)
|
|
|
+ local lh = font_line_height(style)
|
|
|
+ for i = 1, #lines do
|
|
|
+ local yPos = self.y + (i - 1) * lh
|
|
|
+ draw_text_direct(self.x, yPos, lines[i], { color = self.color, style = style })
|
|
|
+ end
|
|
|
+ return
|
|
|
+ end
|
|
|
+
|
|
|
+ -- 无换行模式：截断显示
|
|
|
+ if not self._autoW then
|
|
|
+ -- 有指定宽度限制，需要截断
|
|
|
+ local displayText = self.text
|
|
|
+ local tw = font_measure(displayText, style)
|
|
|
+ if tw > self.w then
|
|
|
+ -- 逐字符截断，直到宽度合适
|
|
|
+ local truncated = ""
|
|
|
+ local i = 1
|
|
|
+ while i <= #displayText do
|
|
|
+ local char, charLen = get_utf8_char(displayText, i)
|
|
|
+ local testText = truncated .. char
|
|
|
+ if font_measure(testText, style) <= self.w then
|
|
|
+ truncated = testText
|
|
|
+ i = i + charLen
|
|
|
+ else
|
|
|
+ break
|
|
|
+ end
|
|
|
+ end
|
|
|
+ displayText = truncated
|
|
|
+ end
|
|
|
+ draw_text_direct(self.x, self.y, displayText, { color = self.color, style = style })
|
|
|
+ else
|
|
|
+ -- 自动宽度，直接显示
|
|
|
+ draw_text_direct(self.x, self.y, self.text, { color = self.color, style = style })
|
|
|
+ end
|
|
|
+end
|
|
|
+
|
|
|
+function Label:handleEvent(evt, x, y)
|
|
|
+ return false -- 文本不拦截事件
|
|
|
+end
|
|
|
+
|
|
|
+-- Picture组件 - 显示单图或轮播多图
|
|
|
+local Picture = {}
|
|
|
+Picture.__index = Picture
|
|
|
+
|
|
|
+function Picture:new(opts)
|
|
|
+ opts = opts or {}
|
|
|
+ local o = setmetatable({}, self)
|
|
|
+ o.x = opts.x or 0
|
|
|
+ o.y = opts.y or 0
|
|
|
+ o.w = opts.w or 80
|
|
|
+ o.h = opts.h or 80
|
|
|
+ o.src = opts.src
|
|
|
+ o.sources = opts.sources
|
|
|
+ o.index = opts.index or 1
|
|
|
+ o.autoplay = not not opts.autoplay
|
|
|
+ o.interval = opts.interval or 1000
|
|
|
+ o._last_switch = now_ms()
|
|
|
+ o.visible = opts.visible ~= false
|
|
|
+ o.enabled = opts.enabled ~= false
|
|
|
+ o._imageCache = {} -- v1.6.1：缓存图片加载状态，避免重复检查和重复打印警告
|
|
|
+ return o
|
|
|
+end
|
|
|
+
|
|
|
+function Picture:setSources(list)
|
|
|
+ self.sources = list
|
|
|
+ self.index = 1
|
|
|
+end
|
|
|
+
|
|
|
+function Picture:next()
|
|
|
+ if self.sources and #self.sources > 0 then
|
|
|
+ self.index = self.index % #self.sources + 1
|
|
|
+ end
|
|
|
+end
|
|
|
+
|
|
|
+function Picture:prev()
|
|
|
+ if self.sources and #self.sources > 0 then
|
|
|
+ self.index = (self.index - 2) % #self.sources + 1
|
|
|
+ end
|
|
|
+end
|
|
|
+
|
|
|
+function Picture:play()
|
|
|
+ self.autoplay = true
|
|
|
+end
|
|
|
+
|
|
|
+function Picture:pause()
|
|
|
+ self.autoplay = false
|
|
|
+end
|
|
|
+
|
|
|
+function Picture:draw()
|
|
|
+ if not self.visible then return end
|
|
|
+ -- 自动轮播
|
|
|
+ if self.autoplay and self.sources and #self.sources > 1 then
|
|
|
+ local t = now_ms()
|
|
|
+ if (t - self._last_switch) >= self.interval then
|
|
|
+ self:next()
|
|
|
+ self._last_switch = t
|
|
|
+ end
|
|
|
+ end
|
|
|
+ -- 选择当前图片路径
|
|
|
+ local path
|
|
|
+ if self.sources and #self.sources > 0 then
|
|
|
+ path = self.sources[self.index]
|
|
|
+ else
|
|
|
+ path = self.src
|
|
|
+ end
|
|
|
+
|
|
|
+ -- v1.6.1修复：检查文件是否存在，并改进占位符显示（使用缓存避免重复检查）
|
|
|
+ if type(path) == "string" and path ~= "" and path:lower():sub(-4) == ".jpg" then
|
|
|
+ -- 检查缓存
|
|
|
+ if self._imageCache[path] == nil then
|
|
|
+ -- 未缓存，首次检查文件是否存在
|
|
|
+ if io and io.exists and io.exists(path) then
|
|
|
+ self._imageCache[path] = true -- 缓存：文件存在
|
|
|
+ else
|
|
|
+ self._imageCache[path] = false -- 缓存：文件不存在
|
|
|
+ log.warn("Picture", "图片文件不存在:", path)
|
|
|
+ end
|
|
|
+ end
|
|
|
+
|
|
|
+ -- 根据缓存状态处理
|
|
|
+ if self._imageCache[path] == true then
|
|
|
+ lcd.showImage(self.x, self.y, path)
|
|
|
+ else
|
|
|
+ -- 文件不存在（已缓存），显示占位符
|
|
|
+ draw_image_placeholder(self.x, self.y, self.w, self.h, 0x4208, COLOR_WHITE)
|
|
|
+ end
|
|
|
+ elseif path then
|
|
|
+ -- path不是jpg或无效路径，显示占位符
|
|
|
+ draw_image_placeholder(self.x, self.y, self.w, self.h, 0x4208, COLOR_WHITE)
|
|
|
+ end
|
|
|
+ -- 如果path为nil，不显示任何内容（不绘制占位符）
|
|
|
+end
|
|
|
+
|
|
|
+function Picture:handleEvent(evt, x, y)
|
|
|
+ return false -- 默认不消费事件
|
|
|
+end
|
|
|
+
|
|
|
+-- MessageBox组件 - 消息框，包含标题、文本和按钮组
|
|
|
+local MessageBox = {}
|
|
|
+MessageBox.__index = MessageBox
|
|
|
+
|
|
|
+function MessageBox:new(opts)
|
|
|
+ opts = opts or {}
|
|
|
+ local o = setmetatable({}, self)
|
|
|
+ o.x = opts.x or 20
|
|
|
+ o.y = opts.y or 40
|
|
|
+ o.w = opts.width or opts.w or 280
|
|
|
+ o.h = opts.height or opts.h or 160
|
|
|
+ o.title = opts.title or "Info"
|
|
|
+ o.message = opts.message or ""
|
|
|
+ o.wordWrap = opts.wordWrap ~= false -- v1.6.1修复：默认启用自动换行，除非显式传入false
|
|
|
+ o.textSize = opts.textSize or opts.size -- 文本字号
|
|
|
+ local dark = (current_theme == "dark")
|
|
|
+ o.borderColor = opts.borderColor or (dark and COLOR_WHITE or COLOR_BLACK)
|
|
|
+ o.textColor = opts.textColor or (dark and COLOR_WHITE or COLOR_BLACK)
|
|
|
+ o.bgColor = opts.bgColor or (dark and COLOR_BLACK or COLOR_WHITE)
|
|
|
+ o.buttons = opts.buttons or { "OK" }
|
|
|
+ o.onResult = opts.onResult
|
|
|
+ o.visible = opts.visible ~= false -- v1.6.1修复：支持从opts读取visible参数，默认true
|
|
|
+ o.enabled = opts.enabled ~= false -- v1.6.1修复：支持从opts读取enabled参数，默认true
|
|
|
+
|
|
|
+ -- 内部按钮布局
|
|
|
+ o._btns = {}
|
|
|
+ local btn_w = 80
|
|
|
+ local gap = 12
|
|
|
+ local total_w = #o.buttons * btn_w + (#o.buttons - 1) * gap
|
|
|
+ local bx = o.x + (o.w - total_w) // 2
|
|
|
+ local by = o.y + o.h - 12 - 36
|
|
|
+ for i = 1, #o.buttons do
|
|
|
+ local label = o.buttons[i]
|
|
|
+ local b = Button:new({ x = bx, y = by, w = btn_w, h = 36, text = label })
|
|
|
+ b.onClick = function()
|
|
|
+ if o.onResult then o.onResult(label) end
|
|
|
+ o.visible = false
|
|
|
+ -- v1.6.1修复：不再禁用enabled，允许MessageBox复用
|
|
|
+ end
|
|
|
+ o._btns[#o._btns + 1] = b
|
|
|
+ bx = bx + btn_w + gap
|
|
|
+ end
|
|
|
+
|
|
|
+ -- 计算message文本可用区域
|
|
|
+ o._msgPadding = 10 -- 左右内边距
|
|
|
+ o._msgMaxWidth = o.w - o._msgPadding * 2
|
|
|
+ o._msgStartY = 36 -- message文本起始Y（相对于MessageBox）
|
|
|
+ -- v1.6.1修复：根据是否有按钮动态计算可用高度
|
|
|
+ if #o.buttons > 0 then
|
|
|
+ o._msgMaxHeight = o.h - 12 - 36 - o._msgStartY -- 有按钮：预留底部边距12 + 按钮高度36
|
|
|
+ else
|
|
|
+ o._msgMaxHeight = o.h - 10 - o._msgStartY -- 无按钮：只保留底部边距10
|
|
|
+ end
|
|
|
+
|
|
|
+ return o
|
|
|
+end
|
|
|
+
|
|
|
+function MessageBox:draw()
|
|
|
+ if not self.visible then return end
|
|
|
+ fill_rect(self.x, self.y, self.x + self.w - 1, self.y + self.h - 1, self.bgColor)
|
|
|
+ stroke_rect(self.x, self.y, self.x + self.w - 1, self.y + self.h - 1, self.borderColor)
|
|
|
+
|
|
|
+ -- 绘制标题
|
|
|
+ draw_text_direct(self.x + 10, self.y + 8, self.title, { color = self.textColor, style = { size = self.textSize } })
|
|
|
+
|
|
|
+ -- 绘制message文本
|
|
|
+ local msgX = self.x + self._msgPadding
|
|
|
+ local msgY = self.y + self._msgStartY
|
|
|
+ local style = { size = self.textSize }
|
|
|
+
|
|
|
+ if self.wordWrap then
|
|
|
+ -- 换行模式：在固定高度内显示多行，超出截断
|
|
|
+ local lines = wrap_text_lines(self.message, self._msgMaxWidth, style)
|
|
|
+ local lh = font_line_height(style)
|
|
|
+ local maxLines = math.floor(self._msgMaxHeight / lh)
|
|
|
+
|
|
|
+ for i = 1, math.min(#lines, maxLines) do
|
|
|
+ local yPos = msgY + (i - 1) * lh
|
|
|
+ draw_text_direct(msgX, yPos, lines[i], { color = self.textColor, style = style })
|
|
|
+ end
|
|
|
+ else
|
|
|
+ -- 无换行模式：单行显示
|
|
|
+ draw_text_direct(msgX, msgY, self.message, { color = self.textColor, style = style })
|
|
|
+ end
|
|
|
+
|
|
|
+ -- 绘制按钮
|
|
|
+ for i = 1, #self._btns do
|
|
|
+ self._btns[i]:draw()
|
|
|
+ end
|
|
|
+end
|
|
|
+
|
|
|
+function MessageBox:handleEvent(evt, x, y)
|
|
|
+ if not self.enabled then return false end
|
|
|
+ for i = 1, #self._btns do
|
|
|
+ local b = self._btns[i]
|
|
|
+ if hit_test(x, y, { x = b.x, y = b.y, w = b.w, h = b.h }) then
|
|
|
+ return b:handleEvent(evt, x, y)
|
|
|
+ end
|
|
|
+ end
|
|
|
+ return true -- 拦截其它事件
|
|
|
+end
|
|
|
+
|
|
|
+-- v1.6.1新增：MessageBox复用方法
|
|
|
+function MessageBox:show()
|
|
|
+ self.visible = true
|
|
|
+ self.enabled = true
|
|
|
+end
|
|
|
+
|
|
|
+function MessageBox:hide()
|
|
|
+ self.visible = false
|
|
|
+end
|
|
|
+
|
|
|
+function MessageBox:setTitle(title)
|
|
|
+ self.title = tostring(title or "")
|
|
|
+end
|
|
|
+
|
|
|
+function MessageBox:setMessage(message)
|
|
|
+ self.message = tostring(message or "")
|
|
|
+ -- 如果启用了换行，更新行缓存
|
|
|
+ if self.wordWrap then
|
|
|
+ local style = { size = self.textSize }
|
|
|
+ self._lines = wrap_text_lines(self.message, self._msgMaxWidth, style)
|
|
|
+ end
|
|
|
+end
|
|
|
+
|
|
|
+-- Window组件 - 窗口容器，支持子组件管理和子页面导航
|
|
|
+local Window = {}
|
|
|
+Window.__index = Window
|
|
|
+
|
|
|
+function Window:new(opts)
|
|
|
+ opts = opts or {}
|
|
|
+ local o = setmetatable({}, self)
|
|
|
+ local sw, sh = lcd.getSize()
|
|
|
+ o.x = opts.x or 0
|
|
|
+ o.y = opts.y or 0
|
|
|
+ o.w = opts.w or sw
|
|
|
+ o.h = opts.h or sh
|
|
|
+ o.backgroundImage = opts.backgroundImage
|
|
|
+ local dark = (current_theme == "dark")
|
|
|
+ o.backgroundColor = opts.backgroundColor or (dark and COLOR_WIN11_DARK_DIALOG_BG or COLOR_WIN11_LIGHT_DIALOG_BG)
|
|
|
+ o.children = {}
|
|
|
+ o.visible = opts.visible ~= false
|
|
|
+ o.enabled = opts.enabled ~= false
|
|
|
+ o._managed = nil
|
|
|
+ o:enableSubpageManager()
|
|
|
+ -- 滚动配置（0.1 版：纵向/横向）
|
|
|
+ o._scroll = nil
|
|
|
+ return o
|
|
|
+end
|
|
|
+
|
|
|
+function Window:add(child)
|
|
|
+ self.children[#self.children + 1] = child
|
|
|
+end
|
|
|
+
|
|
|
+function Window:remove(child)
|
|
|
+ for i = #self.children, 1, -1 do
|
|
|
+ if self.children[i] == child then
|
|
|
+ table.remove(self.children, i)
|
|
|
+ return true
|
|
|
+ end
|
|
|
+ end
|
|
|
+ return false
|
|
|
+end
|
|
|
+
|
|
|
+function Window:clear()
|
|
|
+ self.children = {}
|
|
|
+end
|
|
|
+
|
|
|
+function Window:setBackgroundImage(path)
|
|
|
+ self.backgroundImage = path
|
|
|
+end
|
|
|
+
|
|
|
+function Window:setBackgroundColor(color)
|
|
|
+ self.backgroundColor = color
|
|
|
+ self.backgroundImage = nil
|
|
|
+end
|
|
|
+
|
|
|
+function Window:draw()
|
|
|
+ -- 背景
|
|
|
+ if self.backgroundImage then
|
|
|
+ lcd.showImage(self.x, self.y, self.backgroundImage)
|
|
|
+ else
|
|
|
+ lcd.fill(self.x, self.y, self.x + self.w, self.y + self.h, self.backgroundColor)
|
|
|
+ end
|
|
|
+ -- 子组件
|
|
|
+ local offX, offY = 0, 0
|
|
|
+ if self._scroll and self._scroll.enabled then
|
|
|
+ if self._scroll.direction == "vertical" then
|
|
|
+ offY = self._scroll.offsetY or 0
|
|
|
+ elseif self._scroll.direction == "horizontal" then
|
|
|
+ offX = self._scroll.offsetX or 0
|
|
|
+ elseif self._scroll.direction == "both" then
|
|
|
+ offX = self._scroll.offsetX or 0
|
|
|
+ offY = self._scroll.offsetY or 0
|
|
|
+ end
|
|
|
+ end
|
|
|
+ for i = 1, #self.children do
|
|
|
+ local c = self.children[i]
|
|
|
+ if c and c.visible ~= false and c.draw then
|
|
|
+ local ox, oy = c.x, c.y
|
|
|
+ if self._scroll and self._scroll.enabled then c.x = ox + offX c.y = oy + offY end
|
|
|
+ c:draw()
|
|
|
+ if self._scroll and self._scroll.enabled then c.x, c.y = ox, oy end
|
|
|
+ end
|
|
|
+ end
|
|
|
+end
|
|
|
+
|
|
|
+function Window:handleEvent(evt, x, y)
|
|
|
+ if not self.enabled then return false end
|
|
|
+ if not hit_test(x, y, { x = self.x, y = self.y, w = self.w, h = self.h }) then return false end
|
|
|
+ -- 简易滚动（0.1）：vertical/horizontal
|
|
|
+ if self._scroll and self._scroll.enabled then
|
|
|
+ local sc = self._scroll
|
|
|
+ local contentW = sc.contentWidth or self.w
|
|
|
+ local contentH = sc.contentHeight or self.h
|
|
|
+ local minX = math.min(0, self.w - (contentW or self.w))
|
|
|
+ local maxX = 0
|
|
|
+ local minY = math.min(0, self.h - (contentH or self.h))
|
|
|
+ local maxY = 0
|
|
|
+ if evt == "TOUCH_DOWN" then
|
|
|
+ sc.startX = x
|
|
|
+ sc.startY = y
|
|
|
+ sc.baseOffsetX = sc.offsetX or 0
|
|
|
+ sc.baseOffsetY = sc.offsetY or 0
|
|
|
+ sc.dragging = false
|
|
|
+ sc.captured = false
|
|
|
+ -- 透传按下给命中的子组件，便于组件进入按下态；若后续进入拖拽会被取消
|
|
|
+ local tx = x - (sc.offsetX or 0)
|
|
|
+ local ty = y - (sc.offsetY or 0)
|
|
|
+ sc.downTarget = nil
|
|
|
+ for i = #self.children, 1, -1 do
|
|
|
+ local c = self.children[i]
|
|
|
+ if c and c.enabled ~= false and c.handleEvent and
|
|
|
+ hit_test(tx, ty, { x = c.x, y = c.y, w = c.w, h = c.h }) then
|
|
|
+ sc.downTarget = c
|
|
|
+ c:handleEvent("TOUCH_DOWN", tx, ty)
|
|
|
+ break
|
|
|
+ end
|
|
|
+ end
|
|
|
+ return true
|
|
|
+ elseif evt == "MOVE_Y" or evt == "MOVE_X" then
|
|
|
+ local dx = (x - (sc.startX or x))
|
|
|
+ local dy = (y - (sc.startY or y))
|
|
|
+ if not sc.dragging then
|
|
|
+ local m = math.max(math.abs(dx), math.abs(dy))
|
|
|
+ if m >= (sc.threshold or 10) then
|
|
|
+ sc.dragging = true
|
|
|
+ sc.captured = true
|
|
|
+ -- 进入拖拽，取消先前按下态
|
|
|
+ if sc.downTarget and sc.downTarget.handleEvent then
|
|
|
+ local tx = x - (sc.offsetX or 0)
|
|
|
+ local ty = y - (sc.offsetY or 0)
|
|
|
+ sc.downTarget:handleEvent("LONG_PRESS", tx, ty)
|
|
|
+ end
|
|
|
+ sc.downTarget = nil
|
|
|
+ else
|
|
|
+ -- v1.6.1修复：未达拖拽阈值时（观望期），转发MOVE给downTarget让其实时更新状态
|
|
|
+ if sc.downTarget and sc.downTarget.handleEvent then
|
|
|
+ local tx = x - (sc.offsetX or 0)
|
|
|
+ local ty = y - (sc.offsetY or 0)
|
|
|
+ sc.downTarget:handleEvent(evt, tx, ty)
|
|
|
+ end
|
|
|
+ end
|
|
|
+ end
|
|
|
+ if sc.dragging then
|
|
|
+ local nx = sc.baseOffsetX + dx
|
|
|
+ local ny = sc.baseOffsetY + dy
|
|
|
+ if sc.direction == "vertical" then
|
|
|
+ if ny < minY then ny = minY end
|
|
|
+ if ny > maxY then ny = maxY end
|
|
|
+ sc.offsetY = ny
|
|
|
+ elseif sc.direction == "horizontal" then
|
|
|
+ if nx < minX then nx = minX end
|
|
|
+ if nx > maxX then nx = maxX end
|
|
|
+ sc.offsetX = nx
|
|
|
+ else -- both
|
|
|
+ if nx < minX then nx = minX end
|
|
|
+ if nx > maxX then nx = maxX end
|
|
|
+ if ny < minY then ny = minY end
|
|
|
+ if ny > maxY then ny = maxY end
|
|
|
+ sc.offsetX, sc.offsetY = nx, ny
|
|
|
+ end
|
|
|
+ return true
|
|
|
+ end
|
|
|
+ return true
|
|
|
+ elseif evt == "SINGLE_TAP" or evt == "LONG_PRESS" then
|
|
|
+ if sc.dragging then
|
|
|
+ -- 滑动期间禁用点击；若启用分页，则在抬手时做“就近吸附”（无论是否触发 SWIPE）
|
|
|
+ if sc.pagingEnabled and (sc.direction == "horizontal" or sc.direction == "both") then
|
|
|
+ local pageW = sc.pageWidth or self.w
|
|
|
+ local totalW = sc.contentWidth or self.w
|
|
|
+ local pages = math.max(1, math.floor((totalW + pageW - 1) / pageW))
|
|
|
+ local cur = math.floor((-(sc.offsetX or 0) + pageW / 2) / pageW)
|
|
|
+ if cur < 0 then cur = 0 end
|
|
|
+ if cur > pages - 1 then cur = pages - 1 end
|
|
|
+ sc.offsetX = -cur * pageW
|
|
|
+ end
|
|
|
+ sc.dragging = false
|
|
|
+ sc.captured = false
|
|
|
+ sc.downTarget = nil
|
|
|
+ return true
|
|
|
+ end
|
|
|
+ -- 未拖拽：将事件分发给子组件（坐标转内容坐标）
|
|
|
+ local tx = x - (sc.offsetX or 0)
|
|
|
+ local ty = y - (sc.offsetY or 0)
|
|
|
+ for i = #self.children, 1, -1 do
|
|
|
+ local c = self.children[i]
|
|
|
+ if c and c.enabled ~= false and c.handleEvent and
|
|
|
+ hit_test(tx, ty, { x = c.x, y = c.y, w = c.w, h = c.h }) then
|
|
|
+ if c:handleEvent(evt, tx, ty) then sc.downTarget = nil return true end
|
|
|
+ end
|
|
|
+ end
|
|
|
+ sc.downTarget = nil
|
|
|
+ return true
|
|
|
+ elseif evt == "SWIPE_LEFT" or evt == "SWIPE_RIGHT" or evt == "SWIPE_UP" or evt == "SWIPE_DOWN" then
|
|
|
+ -- 抬手后的滑动手势：结束拖拽，并在需要时做分页吸附（仅横向）
|
|
|
+ sc.dragging = false
|
|
|
+ sc.captured = false
|
|
|
+ if sc.pagingEnabled and (sc.direction == "horizontal" or sc.direction == "both") then
|
|
|
+ local pageW = sc.pageWidth or self.w
|
|
|
+ local totalW = sc.contentWidth or self.w
|
|
|
+ local pages = math.max(1, math.floor((totalW + pageW - 1) / pageW))
|
|
|
+ -- 当前页（offsetX 为负值向右移动内容）
|
|
|
+ local cur = math.floor((-(sc.offsetX or 0) + pageW / 2) / pageW)
|
|
|
+ if evt == "SWIPE_LEFT" then cur = cur + 1 elseif evt == "SWIPE_RIGHT" then cur = cur - 1 end
|
|
|
+ if cur < 0 then cur = 0 end
|
|
|
+ if cur > pages - 1 then cur = pages - 1 end
|
|
|
+ sc.offsetX = -cur * pageW
|
|
|
+ end
|
|
|
+ return true
|
|
|
+ else
|
|
|
+ -- 其他事件（如 MOVE_X/SWIPE_*）在 0.1 版忽略或按需拦截
|
|
|
+ return true
|
|
|
+ end
|
|
|
+ end
|
|
|
+ -- 非滚动窗口：正常分发
|
|
|
+ for i = #self.children, 1, -1 do
|
|
|
+ local c = self.children[i]
|
|
|
+ -- v1.6.1修复：添加_capture检查，让已捕获的组件（如按下的Button）能收到移出范围的MOVE事件
|
|
|
+ if c and c.enabled ~= false and c.handleEvent and
|
|
|
+ (c._capture == true or hit_test(x, y, { x = c.x, y = c.y, w = c.w, h = c.h })) then
|
|
|
+ if c:handleEvent(evt, x, y) then return true end
|
|
|
+ end
|
|
|
+ end
|
|
|
+ return true -- 拦截窗口区域内未被子组件消费的事件
|
|
|
+end
|
|
|
+
|
|
|
+-- 启用简易滚动（0.1）
|
|
|
+function Window:enableScroll(opts)
|
|
|
+ opts = opts or {}
|
|
|
+ self._scroll = {
|
|
|
+ enabled = true,
|
|
|
+ direction = opts.direction or "vertical",
|
|
|
+ contentWidth = tonumber(opts.contentWidth or self.w) or self.w,
|
|
|
+ contentHeight = tonumber(opts.contentHeight or self.h) or self.h,
|
|
|
+ offsetX = 0,
|
|
|
+ offsetY = 0,
|
|
|
+ threshold = tonumber(opts.threshold or 10) or 10,
|
|
|
+ pagingEnabled = not not opts.pagingEnabled,
|
|
|
+ pageWidth = tonumber(opts.pageWidth or self.w) or self.w,
|
|
|
+ dragging = false,
|
|
|
+ captured = false,
|
|
|
+ }
|
|
|
+ return self
|
|
|
+end
|
|
|
+
|
|
|
+function Window:setContentSize(w, h)
|
|
|
+ if not self._scroll then return end
|
|
|
+ if w then self._scroll.contentWidth = tonumber(w) or self._scroll.contentWidth end
|
|
|
+ if h then self._scroll.contentHeight = tonumber(h) or self._scroll.contentHeight end
|
|
|
+end
|
|
|
+
|
|
|
+-- 启用子页面管理
|
|
|
+function Window:enableSubpageManager(opts)
|
|
|
+ opts = opts or {}
|
|
|
+ if not self._managed then
|
|
|
+ self._managed = {
|
|
|
+ pages = {},
|
|
|
+ backEventName = opts.backEventName or "NAV.BACK",
|
|
|
+ onBack = opts.onBack
|
|
|
+ }
|
|
|
+ sys.subscribe(self._managed.backEventName, function()
|
|
|
+ if self._managed.onBack then pcall(self._managed.onBack) end
|
|
|
+ local anyVisible = false
|
|
|
+ for _, pg in pairs(self._managed.pages) do
|
|
|
+ if pg and pg.visible ~= false then anyVisible = true break end
|
|
|
+ end
|
|
|
+ if not anyVisible then
|
|
|
+ self.visible = true
|
|
|
+ self.enabled = true
|
|
|
+ end
|
|
|
+ end)
|
|
|
+ end
|
|
|
+ return self
|
|
|
+end
|
|
|
+
|
|
|
+-- 配置子页面工厂
|
|
|
+function Window:configureSubpages(factories)
|
|
|
+ if not self._managed then self:enableSubpageManager() end
|
|
|
+ self._managed.factories = self._managed.factories or {}
|
|
|
+ for k, v in pairs(factories or {}) do
|
|
|
+ self._managed.factories[k] = v
|
|
|
+ end
|
|
|
+ return self
|
|
|
+end
|
|
|
+
|
|
|
+-- 显示子页面
|
|
|
+function Window:showSubpage(name, factory)
|
|
|
+ if not self._managed then error("enableSubpageManager must be called before showSubpage") end
|
|
|
+ for key, pg in pairs(self._managed.pages) do
|
|
|
+ if pg and pg.visible ~= false then
|
|
|
+ pg.visible = false
|
|
|
+ pg.enabled = false
|
|
|
+ end
|
|
|
+ end
|
|
|
+ if not self._managed.pages[name] then
|
|
|
+ local f = factory
|
|
|
+ if not f and self._managed.factories then f = self._managed.factories[name] end
|
|
|
+ if not f then error("no factory for subpage '" .. tostring(name) .. "'") end
|
|
|
+ self._managed.pages[name] = f()
|
|
|
+ self._managed.pages[name]._parentWindow = self
|
|
|
+ core.add(self._managed.pages[name])
|
|
|
+ end
|
|
|
+ self.visible = false
|
|
|
+ self._managed.pages[name].visible = true
|
|
|
+ self._managed.pages[name].enabled = true
|
|
|
+end
|
|
|
+
|
|
|
+-- 返回上级页面
|
|
|
+function Window:back()
|
|
|
+ if self._parentWindow then
|
|
|
+ self.visible = false
|
|
|
+ self.enabled = false
|
|
|
+ local parent = self._parentWindow
|
|
|
+ local anyVisible = false
|
|
|
+ if parent._managed and parent._managed.pages then
|
|
|
+ for _, pg in pairs(parent._managed.pages) do
|
|
|
+ if pg and pg.visible ~= false then anyVisible = true break end
|
|
|
+ end
|
|
|
+ end
|
|
|
+ if not anyVisible then
|
|
|
+ parent.visible = true
|
|
|
+ parent.enabled = true
|
|
|
+ end
|
|
|
+ end
|
|
|
+end
|
|
|
+
|
|
|
+-- 关闭子页面
|
|
|
+function Window:closeSubpage(name, opts)
|
|
|
+ if not self._managed or not self._managed.pages then return false end
|
|
|
+ opts = opts or {}
|
|
|
+ local pg = self._managed.pages[name]
|
|
|
+ if not pg then return false end
|
|
|
+ pg.visible = false
|
|
|
+ pg.enabled = false
|
|
|
+ if opts.destroy == true then
|
|
|
+ core.remove(pg)
|
|
|
+ self._managed.pages[name] = nil
|
|
|
+ collectgarbage("collect")
|
|
|
+ end
|
|
|
+ local anyVisible = false
|
|
|
+ for _, p in pairs(self._managed.pages) do
|
|
|
+ if p and p.visible ~= false then anyVisible = true break end
|
|
|
+ end
|
|
|
+ if not anyVisible then
|
|
|
+ self.visible = true
|
|
|
+ self.enabled = true
|
|
|
+ end
|
|
|
+ return true
|
|
|
+end
|
|
|
+
|
|
|
+-- ProgressBar组件 - 进度条，支持百分比显示和主题适配
|
|
|
+local ProgressBar = {}
|
|
|
+ProgressBar.__index = ProgressBar
|
|
|
+
|
|
|
+function ProgressBar:new(opts)
|
|
|
+ opts = opts or {}
|
|
|
+ local o = setmetatable({}, self)
|
|
|
+ o.x = opts.x or 0
|
|
|
+ o.y = opts.y or 0
|
|
|
+ o.w = opts.width or opts.w or 200
|
|
|
+ o.h = opts.height or opts.h or 24
|
|
|
+ o.progress = math.max(0, math.min(100, opts.progress or 0))
|
|
|
+ o.showPercentage = opts.showPercentage ~= false
|
|
|
+ o.text = opts.text
|
|
|
+ o.textSize = opts.textSize or opts.size
|
|
|
+ local dark = (current_theme == "dark")
|
|
|
+ o.backgroundColor = opts.backgroundColor or (dark and COLOR_GRAY or 0xC618)
|
|
|
+ o.progressColor = opts.progressColor or (dark and COLOR_BLUE or 0x001F)
|
|
|
+ o.borderColor = opts.borderColor or (dark and COLOR_WHITE or 0x8410)
|
|
|
+ o.textColor = opts.textColor or (dark and COLOR_WHITE or COLOR_BLACK)
|
|
|
+ o.visible = opts.visible ~= false
|
|
|
+ o.enabled = opts.enabled ~= false
|
|
|
+ return o
|
|
|
+end
|
|
|
+
|
|
|
+function ProgressBar:setProgress(value)
|
|
|
+ self.progress = math.max(0, math.min(100, value))
|
|
|
+end
|
|
|
+
|
|
|
+function ProgressBar:getProgress()
|
|
|
+ return self.progress
|
|
|
+end
|
|
|
+
|
|
|
+function ProgressBar:setText(text)
|
|
|
+ self.text = text
|
|
|
+end
|
|
|
+
|
|
|
+function ProgressBar:draw()
|
|
|
+ if not self.visible then return end
|
|
|
+
|
|
|
+ -- 绘制背景（可选：只绘制内区，避免与边框重复像素）
|
|
|
+ local padding = 1
|
|
|
+ fill_rect(self.x + padding, self.y + padding, self.x + self.w - padding, self.y + self.h - padding, self.backgroundColor)
|
|
|
+
|
|
|
+ -- 绘制边框
|
|
|
+ stroke_rect(self.x, self.y, self.x + self.w, self.y + self.h, self.borderColor)
|
|
|
+
|
|
|
+ -- 计算进度条填充
|
|
|
+ padding = 1
|
|
|
+ local inner_left = self.x + padding
|
|
|
+ local inner_top = self.y + padding
|
|
|
+ local inner_right = self.x + self.w - padding -- 包含式
|
|
|
+ local inner_bottom = self.y + self.h - padding -- 包含式
|
|
|
+ local inner_width = inner_right - inner_left
|
|
|
+ local fill_width = math.floor(inner_width * (self.progress / 100))
|
|
|
+ if fill_width > 0 then
|
|
|
+ local x1 = inner_left
|
|
|
+ local x2 = inner_left + fill_width
|
|
|
+ fill_rect(x1, inner_top, x2, inner_bottom, self.progressColor)
|
|
|
+ end
|
|
|
+
|
|
|
+ -- 绘制文本
|
|
|
+ if self.showPercentage or self.text then
|
|
|
+ local display_text = self.text or (self.progress .. "%")
|
|
|
+ draw_text_in_rect_centered(self.x, self.y, self.w, self.h, display_text, {
|
|
|
+ color = self.textColor,
|
|
|
+ style = { size = self.textSize },
|
|
|
+ padding = 2
|
|
|
+ })
|
|
|
+ end
|
|
|
+end
|
|
|
+
|
|
|
+function ProgressBar:handleEvent(evt, x, y)
|
|
|
+ return false -- 进度条默认不处理触摸事件
|
|
|
+end
|
|
|
+
|
|
|
+
|
|
|
+-- ================================
|
|
|
+-- 主模块导出
|
|
|
+-- ================================
|
|
|
+
|
|
|
+local M = {}
|
|
|
+
|
|
|
+-- 核心API导出
|
|
|
+M.init = core.init
|
|
|
+M.add = core.add
|
|
|
+M.remove = core.remove
|
|
|
+M.clear = core.clear
|
|
|
+M.render = core.render
|
|
|
+M.handleTouchEvent = core.handleTouchEvent
|
|
|
+M.debug = core.debug
|
|
|
+M.getTheme = core.getTheme
|
|
|
+
|
|
|
+-- 硬件支持
|
|
|
+M.hw = hw
|
|
|
+
|
|
|
+-- 事件系统
|
|
|
+M.event = event
|
|
|
+
|
|
|
+-- 组件构造函数
|
|
|
+M.Button = function(opts) return Button:new(opts) end
|
|
|
+M.CheckBox = function(opts) return CheckBox:new(opts) end
|
|
|
+M.Label = function(opts) return Label:new(opts) end
|
|
|
+M.Picture = function(opts) return Picture:new(opts) end
|
|
|
+M.MessageBox = function(opts) return MessageBox:new(opts) end
|
|
|
+M.Window = function(opts) return Window:new(opts) end
|
|
|
+M.ProgressBar = function(opts) return ProgressBar:new(opts) end
|
|
|
+
|
|
|
+-- 字体 API 导出
|
|
|
+M.font = {
|
|
|
+ set = function(style) return font_set(style) end,
|
|
|
+ measure = function(text, style) return font_measure(text, style) end,
|
|
|
+ lineHeight = function(style) return font_line_height(style) end
|
|
|
+}
|
|
|
+
|
|
|
+-- 对外导出常用颜色常量，便于在业务侧直接使用
|
|
|
+M.COLOR_WHITE = COLOR_WHITE
|
|
|
+M.COLOR_BLACK = COLOR_BLACK
|
|
|
+M.COLOR_GRAY = COLOR_GRAY
|
|
|
+M.COLOR_BLUE = COLOR_BLUE
|
|
|
+M.COLOR_RED = COLOR_RED
|
|
|
+M.COLOR_GREEN = COLOR_GREEN
|
|
|
+M.COLOR_YELLOW = COLOR_YELLOW
|
|
|
+M.COLOR_CYAN = COLOR_CYAN
|
|
|
+M.COLOR_MAGENTA = COLOR_MAGENTA
|
|
|
+M.COLOR_ORANGE = COLOR_ORANGE
|
|
|
+M.COLOR_PINK = COLOR_PINK
|
|
|
+-- Windows 11 Light模式颜色
|
|
|
+M.COLOR_WIN11_LIGHT_DIALOG_BG = COLOR_WIN11_LIGHT_DIALOG_BG
|
|
|
+M.COLOR_WIN11_LIGHT_BUTTON_BG = COLOR_WIN11_LIGHT_BUTTON_BG
|
|
|
+M.COLOR_WIN11_LIGHT_BUTTON_BORDER = COLOR_WIN11_LIGHT_BUTTON_BORDER
|
|
|
+-- Windows 11 Dark模式颜色
|
|
|
+M.COLOR_WIN11_DARK_DIALOG_BG = COLOR_WIN11_DARK_DIALOG_BG
|
|
|
+M.COLOR_WIN11_DARK_BUTTON_BG = COLOR_WIN11_DARK_BUTTON_BG
|
|
|
+M.COLOR_WIN11_DARK_BUTTON_BORDER = COLOR_WIN11_DARK_BUTTON_BORDER
|
|
|
+
|
|
|
+return M
|
江访