|
发表于 2024-11-26 11:45:10
|
显示全部楼层
重庆市重庆市
.版本 2
.子程序 _按钮1_被单击
_线程操作.创建 (&主线程, , )
.子程序 主线程, , , 主线程
.局部变量 n, 整数型
.局部变量 线程数, 整数型
.局部变量 任务数, 整数型
输出调试文本 (“任务开始”)
线程数 = 5
_线程池.创建 (线程数, , , )
' -----
任务数 = 100
.计次循环首 (任务数, n)
_线程池.投递任务 (&处理子程序, n, )
.计次循环尾 ()
' -----
.判断循环首 (_线程池.取_是否完全空闲 () = 假)
程序_延时 (100, 0)
.判断循环尾 ()
输出调试文本 (“任务结束”)
.子程序 处理子程序, , , ' 用来批量改名的子程序
.参数 序号, 整数型, , 这个是任务号码的同时也是文件号码
.局部变量 随机数, 整数型
输出调试文本 (“正在进行的任务:” + 到文本 (序号))
' 具体处理任务
随机数 = 取随机数 (1000, 3000)
程序_延时 (随机数, 0)
' ------
.子程序 _按钮停止任务_被单击
_线程池.销毁 ()
|
|