exui超级列表框操作卡顿问题

a1254185431

超列循环插入，置项目文本和 删除项目特别快的时候 软件整体卡，卡到所有数据插入完了才能动，怎么解决啊，组件提交任务 和 处理事件都用了，还是卡，求指点

你的猫

  

窗口程序集名	保 留	保 留	备 注
窗口程序集_启动窗口
变量名	类 型	数组	备 注
订单数据缓冲	文本型	0	0
停止处理	逻辑型
处理线程句柄	整数型
图片缓存	整数型

子程序名	返回值类型	公开	备 注
__启动窗口_创建完毕

EXUI.初始化ExUI ()
图片缓存 ＝ EXUI.图片_载入从字节集 ( #图片_商品 )  ' 预加载图片到内存

子程序名	返回值类型	公开	备 注
_按钮_开始处理_被单击

停止处理 ＝ 假
启动线程 (&订单处理线程, , 处理线程句柄)

子程序名	返回值类型	公开	备 注
订单处理线程

变量名	类 型	静态	数组	备 注
原始数据	文本型
局_数据量	整数型
批次数据	文本型		0
当前索引	整数型

判断循环首 (停止处理 ＝ 假)
原始数据 ＝ 网站_对接_获取已付款状态订单 (1)
json.解析 (原始数据, , , )

局_数据量 ＝ json.取属性数量 ("result.data")
如果真 (局_数据量 ＝ 0)
程序_延时 (1000)
到循环尾 ()

' 批量提取数据
重定义数组 (订单数据缓冲, 假, 局_数据量)
计次循环首 (局_数据量, n)
订单数据缓冲 [n] ＝ json.取文本 ("result.data[%d].param[i].value", n) ＋ "——" ＋
json.取文本 ("result.data[%d].number", n) ＋ "——" ＋
json.取文本 ("result.data[%d].ordersN", n) ＋ "——" ＋
文本_取出中间文本 (json.取文本 ("result.data[%d].logs", n), "createdAt" ＋ #引号 ＋ ":" ＋ #引号, #引号 ＋ "]]", , )
计次循环尾 ()

' 分批次更新界面
当前索引 ＝ 1
判断循环首 (当前索引 ≤ 局_数据量)
重定义数组 (批次数据, 假, 取最小值 (50, 局_数据量 － 当前索引 ＋ 1))
计次循环首 (取数组成员数 (批次数据), i)
批次数据 [i] ＝ 订单数据缓冲 [当前索引 ＋ i － 1]
计次循环尾 ()

调用子程序 (&批量插入订单, 真, 批次数据)  ' 异步提交

当前索引 ＝ 当前索引 ＋ 取数组成员数 (批次数据)
程序_延时 (10)  ' 控制提交频率
判断循环尾 ()

程序_延时 (3000)  ' 轮询间隔
判断循环尾 ()

子程序名	返回值类型	公开	备 注
批量插入订单
参数名	类 型	参考	可空	数组	备 注
数据组	文本型

变量名	类 型	静态	数组	备 注
表项索引组	整数型		0
操作锁	逻辑型

' 锁定界面更新
EXUI.超级列表框_置UI更新 (子类_订单等待区_超级列表框KX_订单等待.取窗口句柄 (), 假)
操作锁 ＝ 子类_订单等待区_超级列表框KX_订单等待.锁更新 ()
' 批量插入表项
子类_订单等待区_超级列表框KX_订单等待.插入表项 (-1, 取数组成员数 (数据组), , , , )
重定义数组 (表项索引组, 假, 取数组成员数 (数据组))
' 预计算布局

变量名	类 型	静态	数组	备 注
局_项目统一高度 ＝ 86
局_商品主图 ＝ 图片缓存

' 批量设置数据
计次循环首 (取数组成员数 (数据组), i)
表项索引组 [i] ＝ 子类_订单等待区_超级列表框KX_订单等待.取表项数 () － 取数组成员数 (数据组) ＋ i

' 使用EXUI原生批量设置接口
EXUI.超级列表框_置项文本多列 (子类_订单等待区_超级列表框KX_订单等待.取窗口句柄 (), 表项索引组 [i], {
{0, "id." ＋ 文本_取左边 (数据组 [i], "——", , )},
{1, "订单数量：" ＋ 文本_取中间 (数据组 [i], "——", 2, )},
{3, 文本_取指定变量文本 (数据组 [i], 3)},
{4, 文本_取指定变量文本 (数据组 [i], 4)},
{6, "待处理"},
{7, "等待下发"}
})

' 批量设置图片
EXUI.超级列表框_置项图片 (子类_订单等待区_超级列表框KX_订单等待.取窗口句柄 (), 表项索引组 [i], 1, 局_商品主图)
计次循环尾 ()
' 批量设置样式
EXUI.超级列表框_置列颜色批量 (子类_订单等待区_超级列表框KX_订单等待.取窗口句柄 (), {
{0, -11907766},
{5, -11907766},
{8, -12746753}
})
' 解除锁定
子类_订单等待区_超级列表框KX_订单等待.锁更新 (操作锁)
EXUI.超级列表框_置UI更新 (子类_订单等待区_超级列表框KX_订单等待.取窗口句柄 (), 真)

子程序名	返回值类型	公开	备 注
_按钮_停止处理_被单击

停止处理 ＝ 真

i支持库列表	支持库注释
ExuiKrnln	(未知支持库)
EThread	多线程支持库

.版本 2<br /> .支持库 ExuiKrnln<br /> .支持库 EThread<br /> <br /> .程序集 窗口程序集_启动窗口<br /> .程序集变量 订单数据缓冲, 文本型, , "0", 0<br /> .程序集变量 停止处理, 逻辑型<br /> .程序集变量 处理线程句柄, 整数型<br /> .程序集变量 图片缓存, 整数型<br /> <br /> .子程序 __启动窗口_创建完毕<br /> EXUI.初始化ExUI ()<br /> 图片缓存 ＝ EXUI.图片_载入从字节集 (#图片_商品)  ' 预加载图片到内存<br /> <br /> .子程序 _按钮_开始处理_被单击<br /> 停止处理 ＝ 假<br /> 启动线程 (&订单处理线程, , 处理线程句柄)<br /> <br /> .子程序 订单处理线程<br /> .局部变量 原始数据, 文本型<br /> .局部变量 局_数据量, 整数型<br /> .局部变量 批次数据, 文本型, , "0"<br /> .局部变量 当前索引, 整数型<br /> <br /> 判断循环首 (停止处理 ＝ 假)<br />     原始数据 ＝ 网站_对接_获取已付款状态订单 (1)<br />     json.解析 (原始数据, , , )<br />     <br />     局_数据量 ＝ json.取属性数量 ("result.data")<br />     .如果真 (局_数据量 ＝ 0)<br />         程序_延时 (1000)<br />         到循环尾 ()<br />     .如果真结束<br />     <br />     ' 批量提取数据<br />     重定义数组 (订单数据缓冲, 假, 局_数据量)<br />     .计次循环首 (局_数据量, n)<br />         订单数据缓冲 [n] ＝ json.取文本 ("result.data[%d].param<i>.value", n) ＋ "——" ＋ <br />                           json.取文本 ("result.data[%d].number", n) ＋ "——" ＋ <br />                           json.取文本 ("result.data[%d].ordersN", n) ＋ "——" ＋ <br />                           文本_取出中间文本 (json.取文本 ("result.data[%d].logs", n), "createdAt" ＋ #引号 ＋ ":" ＋ #引号, #引号 ＋ "]]", , )<br />     .计次循环尾 ()<br />     <br />     ' 分批次更新界面<br />     当前索引 ＝ 1<br />     .判断循环首 (当前索引 ≤ 局_数据量)<br />         重定义数组 (批次数据, 假, 取最小值 (50, 局_数据量 － 当前索引 ＋ 1))<br />         .计次循环首 (取数组成员数 (批次数据), i)<br />             批次数据 <i> ＝ 订单数据缓冲 [当前索引 ＋ i － 1]<br />         .计次循环尾 ()<br />         <br />         调用子程序 (&批量插入订单, 真, 批次数据)  ' 异步提交<br />         <br />         当前索引 ＝ 当前索引 ＋ 取数组成员数 (批次数据)<br />         程序_延时 (10)  ' 控制提交频率<br />     .判断循环尾 ()<br />     <br />     程序_延时 (3000)  ' 轮询间隔<br /> 判断循环尾 ()<br /> <br /> .子程序 批量插入订单<br /> .参数 数据组, 文本型<br /> .局部变量 表项索引组, 整数型, , "0"<br /> .局部变量 操作锁, 逻辑型<br /> <br /> ' 锁定界面更新<br /> EXUI.超级列表框_置UI更新 (子类_订单等待区_超级列表框KX_订单等待.取窗口句柄 (), 假)<br /> 操作锁 ＝ 子类_订单等待区_超级列表框KX_订单等待.锁更新 ()<br /> <br /> ' 批量插入表项<br /> 子类_订单等待区_超级列表框KX_订单等待.插入表项 (-1, 取数组成员数 (数据组), , , , )<br /> 重定义数组 (表项索引组, 假, 取数组成员数 (数据组))<br /> <br /> ' 预计算布局<br /> .局部变量 局_项目统一高度 ＝ 86<br /> .局部变量 局_商品主图 ＝ 图片缓存<br /> <br /> ' 批量设置数据<br /> .计次循环首 (取数组成员数 (数据组), i)<br />     表项索引组 <i> ＝ 子类_订单等待区_超级列表框KX_订单等待.取表项数 () － 取数组成员数 (数据组) ＋ i<br />     <br />     ' 使用EXUI原生批量设置接口<br />     EXUI.超级列表框_置项文本多列 (子类_订单等待区_超级列表框KX_订单等待.取窗口句柄 (), 表项索引组 <i>, {<br />         {0, "id." ＋ 文本_取左边 (数据组 <i>, "——", , )},<br />         {1, "订单数量：" ＋ 文本_取中间 (数据组 <i>, "——", 2, )},<br />         {3, 文本_取指定变量文本 (数据组 <i>, 3)},<br />         {4, 文本_取指定变量文本 (数据组 <i>, 4)},<br />         {6, "待处理"},<br />         {7, "等待下发"}<br />     })<br />     <br />     ' 批量设置图片<br />     EXUI.超级列表框_置项图片 (子类_订单等待区_超级列表框KX_订单等待.取窗口句柄 (), 表项索引组 <i>, 1, 局_商品主图)<br /> .计次循环尾 ()<br /> <br /> ' 批量设置样式<br /> EXUI.超级列表框_置列颜色批量 (子类_订单等待区_超级列表框KX_订单等待.取窗口句柄 (), {<br />     {0, -11907766},<br />     {5, -11907766},<br />     {8, -12746753}<br /> })<br /> <br /> ' 解除锁定<br /> 子类_订单等待区_超级列表框KX_订单等待.锁更新 (操作锁)<br /> EXUI.超级列表框_置UI更新 (子类_订单等待区_超级列表框KX_订单等待.取窗口句柄 (), 真)<br /> <br /> .子程序 _按钮_停止处理_被单击<br /> 停止处理 ＝ 真

易肆玖

数据过多分页显示

王不饿

给上 延时

小麒QCC

1、分页
2、加上处理事件命令
3、用线程

a1254185431

王不饿 发表于 2025-5-18 21:36
给上 延时

没用，给延迟是有点效果，多了还是卡

zs5819

用虚表不会卡