启动线程中CPU和内存占用高

依然是海洋

写的一段代码只要是超级列表框取标题，再用数据一直重复POSTcha询，再以返回的数据判断结果置标题去，数据少的时候还好，数据一多就卡顿，而且cpu和内存占用高。


程序本身用的启动线程命令，中间的间隔也用的延时命令，应该怎么优化呢

samll88

  

子程序名	返回值类型	公开	备 注
超级列表框_快速导入数据
参数名	类 型	参考	可空	数组	备 注
超级列表框	超级列表框
文件路径	文本型				路径优先
总文本	文本型				路径为空时导入文本
列隔符	文本型				默认#表格空格符
保留原有数据	逻辑型				默认不保留  如果保留 必须是没经过删除的数据 超列的删除是标记删除

变量名	类 型	静态	数组	备 注
字节集	快速字节集对象
文本	快速文本对象
行组	文本型		0
i	整数型
原表项数	整数型
列组	文本型		0
n	整数型

超级列表框.禁止重画 ()
超级列表框.可视 ＝ 假  ' 可视的话会耽误更多时间
如果真 (是否为空 (列隔符))
列隔符 ＝ #表格空格符

判断 (文件路径 ≠ “”)  ' 路径优先
文本.从文件读 (文件路径)
文本.置文本 (总文本)

行组 ＝ 文本.分割文本 ( #换行符, )
文本.清除文本 ()
如果真 (保留原有数据 ＝ 真)
字节集.添加 (超级列表框.表项)

计次循环首 (取数组成员数 (行组), i)
列组 ＝ 分割文本 (行组 [i], 列隔符, )
计次循环首 (取数组成员数 (列组), n)
判断 (n ＝ 1)
' 字节集 ＝ { 0 } ＋ 到字节集 (图片索引) ＋ 到字节集 (状态图片) ＋ 到字节集 (缩进数目) ＋ 到字节集 (项目数值) ＋ 到字节集 (表项标题) ＋ { 0, 0 }  ' 图片索引默认为-1 ' 状态图片默认为-1
字节集.添加 ({ 0, 255, 255, 255, 255, 255, 255, 255, 255, 0, 0, 0, 0, 0, 0, 0, 0 }, 到字节集 (列组 [n]), { 0, 0 })
字节集.添加 ({ 1, 255, 255, 255, 255, 255, 255, 255, 255, 0, 0, 0, 0, 0, 0, 0, 0 }, 到字节集 (列组 [n]), { 0, 0 })

计次循环尾 ()
计次循环尾 ()
超级列表框.表项 ＝ 字节集.取字节集 (, )
超级列表框.允许重画 ()
字节集.清除字节集 ()
超级列表框.可视 ＝ 真

i支持库列表	支持库注释
commobj	通用对象支持库
iext	扩展界面支持库一

.版本 2<br /> .支持库 commobj<br /> .支持库 iext<br /> <br /> .子程序 超级列表框_快速导入数据, , 公开<br /> .参数 超级列表框, 超级列表框<br /> .参数 文件路径, 文本型, 可空, 路径优先<br /> .参数 总文本, 文本型, 可空, 路径为空时导入文本<br /> .参数 列隔符, 文本型, 可空, 默认#表格空格符<br /> .参数 保留原有数据, 逻辑型, 可空, 默认不保留  如果保留 必须是没经过删除的数据 超列的删除是标记删除<br /> .局部变量 字节集, 快速字节集对象<br /> .局部变量 文本, 快速文本对象<br /> .局部变量 行组, 文本型, , "0"<br /> .局部变量 i, 整数型<br /> .局部变量 原表项数, 整数型<br /> .局部变量 列组, 文本型, , "0"<br /> .局部变量 n, 整数型<br /> <br /> <br /> 超级列表框.禁止重画 ()<br /> 超级列表框.可视 ＝ 假  ' 可视的话会耽误更多时间<br /> .如果真 (是否为空 (列隔符))<br />     列隔符 ＝ #表格空格符<br /> .如果真结束<br /> <br /> .判断开始 (文件路径 ≠ “”)  ' 路径优先<br />     文本.从文件读 (文件路径)<br /> .默认<br />     文本.置文本 (总文本)<br /> .判断结束<br /> <br /> 行组 ＝ 文本.分割文本 (#换行符, )<br /> 文本.清除文本 ()<br /> <br /> .如果真 (保留原有数据 ＝ 真)<br />     字节集.添加 (超级列表框.表项)<br /> .如果真结束<br /> <br /> .计次循环首 (取数组成员数 (行组), i)<br />     列组 ＝ 分割文本 (行组 <i>, 列隔符, )<br />     .计次循环首 (取数组成员数 (列组), n)<br />         .判断开始 (n ＝ 1)<br />             ' 字节集 ＝ { 0 } ＋ 到字节集 (图片索引) ＋ 到字节集 (状态图片) ＋ 到字节集 (缩进数目) ＋ 到字节集 (项目数值) ＋ 到字节集 (表项标题) ＋ { 0, 0 }  ' 图片索引默认为-1 ' 状态图片默认为-1<br />             字节集.添加 ({ 0, 255, 255, 255, 255, 255, 255, 255, 255, 0, 0, 0, 0, 0, 0, 0, 0 }, 到字节集 (列组 [n]), { 0, 0 })<br />         .默认<br />             字节集.添加 ({ 1, 255, 255, 255, 255, 255, 255, 255, 255, 0, 0, 0, 0, 0, 0, 0, 0 }, 到字节集 (列组 [n]), { 0, 0 })<br />         .判断结束<br /> <br />     .计次循环尾 ()<br /> .计次循环尾 ()<br /> <br /> <br /> <br /> 超级列表框.表项 ＝ 字节集.取字节集 (, )<br /> 超级列表框.允许重画 ()<br /> 字节集.清除字节集 ()<br /> 超级列表框.可视 ＝ 真

最快的方法是用虚表

wtflxk

用虚表模块显示超级列表框就好了

依然是海洋

samll88 发表于 2026-7-25 21:02
[e=0].版本 2
.支持库 commobj
.支持库 iext

导入数据并不卡，数据顶多也就几十条而已。

依然是海洋

wtflxk 发表于 2026-7-25 21:23
用虚表模块显示超级列表框就好了

导入数据并不卡，数据顶多也就几十条而已。多的是对于网页返回的判断和如果真命令，以及对超级列表框的取标题和置标题

禁回忆

注意这么几个雷区，按你的描述，你大概率在线程里做请求，然后请求结果写组件。
这么搞会有几个问题
线程里直接操作超级列表框组件，UI组件跨线程访问在大量操作下会锁界面，CPU暴涨。
你还在线程里用了延时，UI消息循环堵塞，多线程大量并发占用资源
post请求有没有节流处理，你启动线程了，有没有做多线程的处理
频繁的置标题，每次都触发整个组件的重绘
线程是很宝贵的资源，不要随意创建线程


你理解了这些，解决方案也就有了，
主线程负责UI界面，当作UI线程用，只负责组件的读写更新，放一个时钟，30ms读一次业务数据去批量更新
工作线程负责只请求post，请求结果看你需求放在哪
消息队列也好，一个原子操作的变量也好
然后把post请求做节流处理，确保上次请求完成才请求下一次。开启 HTTP 连接复用，不要每次post都创建新对象、新会话
替换掉延时，线程内用sleep。
批量置标题时关闭重绘，上边有哥们的代码里提到了

算法艺术家

把数据映射到哈希表里，或者数组里，超级列表框只用于显示，超级列表框也不需要返回条一刷新显示，可以放循环里 一秒钟一刷新显示就行

tj5523

看情况，卡的不是更新列表，是循环处理大量数据占用CPU导致的，考虑利用队列加多线程处理，数据存到内存，固定时间刷新更新显示

补充内容 (2026-7-26 17:26):
或者post请求修改为异步，同步请求等待时间不会释放性能，少量不影响，量大后会出现等待响应空闲时间太多，cpu不释放，实际上并没干啥事

右手胜过左手

莫不是把整个响应内容都往列表框中塞了？

lisen98876

运行时，一次性将列表的内容写到数组。多线程分配使用数组，必须做好许可证。线程从数组读取内容去测试，并将结果写到数组（也要用许可）。之后时钟定时刷新列表状态（许可）