常用多线程模板与鱼刺类多线程线程池应用小例子

部分代码:

.版本 2 .支持库 EThread .支持库 iext .程序集 窗口程序集_启动窗口 .程序集变量 已计算数量, 整数型 .程序集变量 列表框表项索引, 整数型 .程序集变量 线程数, 整数型 .程序集变量 许可证, 整数型 .子程序 __启动窗口_创建完毕 许可证 = 创建进入许可证 () .子程序 子_多线程循环判断 列表框表项索引 = -1 .判断循环首 (已计算数量 ≠ 超级列表框1.取表项数 ()) .如果真 (线程数 < 到整数 (编辑框_线程数.内容)) 线程数 = 线程数 + 1 列表框表项索引 = 列表框表项索引 + 1 启动线程 (&计算, , ) .如果真结束 .判断循环尾 () .子程序 计算 .局部变量 表项sy, 整数型 .局部变量 结果, 文本型 进入许可区 (许可证) ' 操作程序集变量的时候加一下许可区,不然会导致置标题为空的情况!!!! 表项sy = 列表框表项索引 - 1 退出许可区 (许可证) 结果 = 到文本 (到数值 (超级列表框1.取标题 (表项sy, 1)) + 到数值 (超级列表框1.取标题 (表项sy, 2))) 超级列表框1.置标题 (表项sy, 3, 结果) 已计算数量 = 已计算数量 + 1 线程数 = 线程数 - 1 超级列表框1.保证显示 (表项sy) .子程序 _按钮计算_被单击 启动线程 (&子_多线程循环判断, , ) .子程序 生成随机数值 .局部变量 i, 整数型 .局部变量 表项索引, 整数型 置随机数种子 () .计次循环首 (到整数 (编辑框生成数.内容), i) 表项索引 = 超级列表框1.插入表项 (-1, 到文本 (i), , , , ) 超级列表框1.置标题 (表项索引, 1, 到文本 (取随机数 (1, 99))) 超级列表框1.置标题 (表项索引, 2, 到文本 (取随机数 (1, 99))) .计次循环尾 () .子程序 _按钮生成_被单击 启动线程 (&生成随机数值, , ) .子程序 __启动窗口_将被销毁 删除进入许可证 (许可证)
相关文件下载地址
©下载资源版权归作者所有;本站所有资源均来源于网络,仅供学习使用,请支持正版!

常用多线程模板与鱼刺类多线程线程池应用小例子》有0个想法

发表回复

您的电子邮箱地址不会被公开。 必填项已用*标注