多线程超级列表框检测项问题

清流啊

.版本 2
.支持库 iext

.局部变量 执行数量, 整数型
.局部变量 线程数量, 整数型
.局部变量 创建状态, 逻辑型
.局部变量 投递计次, 整数型
.局部变量 空闲线程, 整数型

线程操作.置CPU亲和性 ()
执行数量 ＝ 到整数 (超级列表框1.取表项数 ())

' -------------------------------------------
线程数量 ＝ 到整数 (编辑框_注册线程.内容)
.如果真 (执行数量 ＜ 线程数量)  ' 当注册数量没有线程数量多时
    线程数量 ＝ 执行数量
.如果真结束

' --------------------------------------

创建状态 ＝ 线程池.创建 (线程数量, 线程数量, , , , , )  ' 你给的注册数量或者线程不是0的时候 创建成功
.如果真 (取反 (创建状态))  ' 没创建成功
    信息框 (“线程创建失败”, 0, , )

    ' 按钮_开始运行.禁止 ＝ 假
    ' 按钮_结束运行.禁止 ＝ 真
    返回 ()  ' 停止了
.如果真结束

' ------------------------------------------------
投递计次 ＝ 0
.判断循环首 (投递计次 ＜ 执行数量)
    空闲线程 ＝ 线程池.取_空闲线程数 ()  ' 0  没有空闲   1   2
    .判断循环首 (空闲线程 ＝ 0)
        .如果真 (线程池.取_状态 () ≠ 1)  ' 不要去打扰
            返回 ()
        .如果真结束
        空闲线程 ＝ 线程池.取_空闲线程数 ()
        程序_延时 (50, )
    .判断循环尾 ()
    ' ----------------------说明有空闲线程----------------
    .计次循环首 (空闲线程, )
        处理事件 ()
        线程池.投递任务 (&收件人订单号, 投递计次, )
        原子_递增 (投递计次)
        程序_延时 (200, )
    .计次循环尾 ()
.判断循环尾 ()
线程池.销毁 (, )


大佬现在这个线程是执行超级列表框1全部的数据
怎么改让他多线程执行超级列表框选中的数据呢

b0y

其实你直接执行全部 然后在线程内 根据索引判断这一条有没有勾选就行了

补充内容 (2023-10-26 13:38):
否则你还要先取出勾选的 在根据勾选数量创建线程  

北惜

为什么一定要多线程呢  不饿能用存取键值对的方式给他置进去吗

yuzhong

感谢分享 感谢分享

清流啊

已经解决了

yuzhong

11111111111111111111111111111