窗口程序集名 | 保 留 | 保 留 | 备 注 |
窗口程序集_启动窗口 | | | |
变量名 | 类 型 | 数组 | 备 注 |
_线程操作 | 鱼刺类_线程操作 | |
_线程池 | 鱼刺类_线程池 | |
文件组 | 文本型 | 0 |
a | 整数型 | |
_线程操作.
创建 (&主线程, , , , , , , , ,
) 变量名 | 类 型 | 静态 | 数组 | 备 注 |
iss | 整数型 | | |
ytre | 整数型 | | |
如果真 (取数组成员数 (文件组
) > 0
)
计次循环首 (取数组成员数 (文件组
), ytre
)
删除成员 (文件组, 1,
)
计次循环尾 ()
文件_枚举 (取运行目录 () +
“\图片\”,
“*.*”, 文件组, 真, ,
) _线程池.
创建 (取数组成员数 (文件组
) + 2, , ,
)
计次循环首 (取数组成员数 (文件组
), iss
) 
_线程池.
投递任务 (&处理子程序, iss,
)
计次循环尾 ()置随机数种子 ()随机后缀 =
到文本 (取随机数 (0, 1000000
))
文件更名 (文件组
[定位文件
],
取运行目录 () +
“\图片\” +
到文本 (定位文件
) +
“-” + 随机后缀 +
“.png”) a = a + 1
如果真 (a =
取数组成员数 (文件组
))
信息框 (“ok”, 0, ,
)
_线程操作.
强制结束 ()
_线程操作.
创建 (&主线程, ,
)变量名 | 类 型 | 静态 | 数组 | 备 注 |
n | 整数型 | | |
线程数 | 整数型 | | |
任务数 | 整数型 | | |
输出调试文本 (“任务开始”)线程数 = 5
_线程池.
创建 (线程数, , ,
) 任务数 = 100
计次循环首 (任务数, n
)
_线程池.
投递任务 (&处理子程序, n,
)
计次循环尾 ()
判断循环首 (_线程池.
取_是否完全空闲 () =
假)
程序_延时 (100, 0
)
判断循环尾 ()输出调试文本 (“任务结束”)输出调试文本 (“正在进行的任务:” +
到文本 (序号
))
随机数 =
取随机数 (1000, 3000
)程序_延时 (随机数, 0
) _线程池.
销毁 ()