EXUI超级列表框多项选择

易语言 2021-07-24 07:38:50

EXUI超级列表框多项选择

用到多项选择这个功能,但搜到的只有旧支持库的按ctrl或shift选择的,研究后做了这个方案,仅供有这方面需求的参考。

局_句柄 = 组件取窗口绑定组件 (超级列表框EX1.取窗口句柄 ())
超级列表框EX1.插入列 (-1, 1, , , , 1, , , , , , , , , , 0)
组件插入元素 (局_句柄, #元素归属_超列项目, 0, -1, 1)
组件置颜色元素属性 (局_句柄, #元素归属_超列项目, 0, 0, -1, 0, #元素布局_顶边_居中, 0, 0, 超级列表框EX1.宽度, 30, 0)
.计次循环首 (5, i)
超级列表框EX1.插入列 (-1, 1, , “表头列【” + 到文本 (i) + “】”, -65536, 110, , , , , , 1, , , , 1)
.计次循环尾 ()
.计次循环首 (100, i)
超级列表框EX1.插入项目 (-1, 1, , 30)
.计次循环首 (5, ii)
超级列表框EX1.置项目文本 (i - 1, ii, 取文本 (“第%s行,第%s列”, 到文本 (i), 到文本 (ii + 1)))
.计次循环尾 ()
.计次循环尾 ()