多线程求助

ngrjsc

问题：有多个：子程序1  子程序2  子程序3 子程序4  子程序5  。。。。。。。。。。。。。。
总不能这样写吧，也太麻烦 还有就是关闭句柄麻烦：启动线程（& 子程序1，，  ）  启动线程（& 子程序2，， ）  启动线程（& 子程序3，， ）  启动线程（& 子程序4 ，， ） 启动线程（& 子程序5，， ）

网上很多，多线程，我也看不懂。。

麻烦老师帮写个代码， 把上述子程序 ，都写上。谢谢  
最后关闭---总线程句柄

正鑫软件开发

  

窗口程序集名	保 留	保 留	备 注
窗口程序集_启动窗口
变量名	类 型	数组	备 注
线程句柄	整数型	0	把线程定义为数组,每个成员对应一个线程句柄

子程序名	返回值类型	公开	备 注
_按钮1_被单击

变量名	类 型	静态	数组	备 注
a	整数型

清除数组 (线程句柄)
计次循环首 (10, a)  ' 10就代表10线程
加入成员 (线程句柄, 0)
启动线程 (&子程序1, a, 线程句柄 [a])
计次循环尾 ()

子程序名	返回值类型	公开	备 注
子程序1
参数名	类 型	参考	可空	数组	备 注
参数	整数型

' 执行你的代码
' 比如现在你执行完子程序1,需要开始子程序2
启动线程 (&子程序1, 参数, 线程句柄 [参数])

子程序名	返回值类型	公开	备 注
子程序2
参数名	类 型	参考	可空	数组	备 注
参数	整数型

子程序名	返回值类型	公开	备 注
单独停止某个线程
参数名	类 型	参考	可空	数组	备 注
参数	整数型

线程_销毁 (线程句柄 [参数])  ' 这个是停止
线程_挂起 (线程句柄 [参数])  ' 这个是暂停
线程_恢复 (线程句柄 [参数])  ' 这个是暂停后继续运行

子程序名	返回值类型	公开	备 注
全部停止线程

变量名	类 型	静态	数组	备 注
a	整数型

计次循环首 (取数组成员数 (线程句柄), a)
线程_销毁 (线程句柄)
计次循环尾 ()

i支持库列表	支持库注释
EThread	多线程支持库

.版本 2<br /> .支持库 EThread<br /> <br /> .程序集 窗口程序集_启动窗口<br /> .程序集变量 线程句柄, 整数型, , "0", 把线程定义为数组,每个成员对应一个线程句柄<br /> <br /> .子程序 _按钮1_被单击<br /> .局部变量 a, 整数型<br /> <br /> 清除数组 (线程句柄)<br /> .计次循环首 (10, a)  ' 10就代表10线程<br />     加入成员 (线程句柄, 0)<br />     启动线程 (&子程序1, a, 线程句柄 [a])<br /> .计次循环尾 ()<br /> <br /> .子程序 子程序1<br /> .参数 参数, 整数型<br /> <br /> ' 执行你的代码<br /> ' 比如现在你执行完子程序1,需要开始子程序2<br /> 启动线程 (&子程序1, 参数, 线程句柄 [参数])<br /> <br /> .子程序 子程序2<br /> .参数 参数, 整数型<br /> <br /> <br /> <br /> .子程序 单独停止某个线程<br /> .参数 参数, 整数型<br /> <br /> 线程_销毁 (线程句柄 [参数])  ' 这个是停止<br /> 线程_挂起 (线程句柄 [参数])  ' 这个是暂停<br /> 线程_恢复 (线程句柄 [参数])  ' 这个是暂停后继续运行<br /> <br /> .子程序 全部停止线程<br /> .局部变量 a, 整数型<br /> <br /> .计次循环首 (取数组成员数 (线程句柄), a)<br />     线程_销毁 (线程句柄)<br /> .计次循环尾 ()

ngrjsc

正鑫软件开发 发表于 2021-5-27 10:31
[e=2].版本 2
.支持库 EThread

老师是这样么

正鑫软件开发

ngrjsc 发表于 2021-5-27 10:47
老师是这样么

https://bbs.125.la/forum.php?mod ... 14670104&extra=
看这个