求问一个多线程 问题!

小小彬

  

子程序名	返回值类型	公开	备 注
__启动窗口_创建完毕

变量名	类 型	静态	数组	备 注
进程数组	进程信息		0
计次	整数型
a	整数型

如果真 (大漠_注册 () ＝ 假)
信息框 (“插件注册失败”, 0, , )
超级列表框2.全部删除 ()
枚举进程 (进程数组)
dm.初始化_Mac (“dm.dll”, “3.1233”, 假, , )
a ＝ 0
计次循环首 (取数组成员数 (进程数组), 计次)
如果真 (到文本 (进程数组 [计次].进程名称) ＝ “Wow.exe”)
a ＝ a ＋ 1
超级列表框2.插入表项 (计次, 到文本 (进程数组 [计次].进程ID), , , , )

计次循环尾 ()
对象个数 ＝ a
dm.创建大漠对象 (对象个数)
计次循环首 (对象个数, )
线程许可证 ＝ 线程_创建许可证 ()
计次循环尾 ()

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

变量名	类 型	静态	数组	备 注
临时句柄	整数型
数组成员	整数型
i	整数型
句柄存在	逻辑型
有空线程	逻辑型
句柄	文本型
类名	整数型

临时句柄 ＝ dm.窗口_模糊取顶层句柄 (对象个数, 编辑框_窗口类名.内容, 编辑框_窗口标题.内容)
数组成员 ＝ 取数组成员数 (多线程)
调试输出 (临时句柄)
调试输出 (多线程)
调试输出 (数组成员)
判断 (数组成员 ＞ 对象个数)
计次循环首 (数组成员, i)
判断 (多线程 [i].窗口句柄 ＝ 临时句柄)
句柄存在 ＝ 真
多线程 [i].线程状态 ＝ “启动”
多线程 [i].线程句柄 ＝ 线程_启动 (&启动线程, 多线程 [i].对象地址)
跳出循环 ()
句柄存在 ＝ 假

计次循环尾 ()
如果真 (句柄存在 ＝ 假)
判断 (数组成员 ＞ 对象个数)
计次循环首 (数组成员, i)
判断 (多线程 [i].线程状态 ＝ “停止” 且 i ＞ 对象个数)
有空线程 ＝ 真
多线程 [i].窗口句柄 ＝ 临时句柄
多线程 [i].对象地址 ＝ i
多线程 [i].线程句柄 ＝ 线程_启动 (&启动线程, 多线程 [i].对象地址)
跳出循环 ()
有空线程 ＝ 假

计次循环尾 ()
如果真 (有空线程 ＝ 假)
信息提示框 (“线程占满，请结束一条线程后再启动”, #确认钮 ＋ #信息图标, “提示”, _启动窗口.取窗口句柄 ())

临时信息.窗口句柄 ＝ 临时句柄
临时信息.对象地址 ＝ 数组成员 ＋ 1
临时信息.线程状态 ＝ “启动”
临时信息.线程句柄 ＝ 线程_启动 (&启动线程, 临时信息.对象地址)
加入成员 (多线程, 临时信息)


临时信息.窗口句柄 ＝ 临时句柄
临时信息.对象地址 ＝ 数组成员 ＋ 1
临时信息.线程状态 ＝ “启动”
临时信息.线程句柄 ＝ 线程_启动 (&启动线程, 临时信息.对象地址)
加入成员 (多线程, 临时信息)

i支持库列表	支持库注释
iext	扩展界面支持库一
spec	特殊功能支持库

.版本 2<br /> .支持库 iext<br /> <br /> .子程序 __启动窗口_创建完毕<br /> .局部变量 进程数组, 进程信息, , "0"<br /> .局部变量 计次, 整数型<br /> .局部变量 a, 整数型<br /> <br /> .如果真 (大漠_注册 () ＝ 假)<br />     信息框 (“插件注册失败”, 0, , )<br /> .如果真结束<br /> 超级列表框2.全部删除 ()<br /> 枚举进程 (进程数组)<br /> <br /> dm.初始化_Mac (“dm.dll”, “3.1233”, 假, , )<br /> a ＝ 0<br /> .计次循环首 (取数组成员数 (进程数组), 计次)<br /> <br />     .如果真 (到文本 (进程数组 [计次].进程名称) ＝ “Wow.exe”)<br />         a ＝ a ＋ 1<br />         超级列表框2.插入表项 (计次, 到文本 (进程数组 [计次].进程ID), , , , )<br /> <br />     .如果真结束<br /> <br /> .计次循环尾 ()<br /> 对象个数 ＝ a<br /> dm.创建大漠对象 (对象个数)<br /> .计次循环首 (对象个数, )<br />     线程许可证 ＝ 线程_创建许可证 ()<br /> .计次循环尾 ()<br /> .版本 2<br /> .支持库 spec<br /> <br /> .子程序 _开始按钮_被单击<br /> .局部变量 临时句柄, 整数型<br /> .局部变量 数组成员, 整数型<br /> .局部变量 i, 整数型<br /> .局部变量 句柄存在, 逻辑型<br /> .局部变量 有空线程, 逻辑型<br /> .局部变量 句柄, 文本型<br /> .局部变量 类名, 整数型<br /> <br /> 临时句柄 ＝ dm.窗口_模糊取顶层句柄 (对象个数, 编辑框_窗口类名.内容, 编辑框_窗口标题.内容)<br /> 数组成员 ＝ 取数组成员数 (多线程)<br /> 调试输出 (临时句柄)<br /> 调试输出 (多线程)<br /> 调试输出 (数组成员)<br /> .判断开始 (数组成员 ＞ 对象个数)<br />     .计次循环首 (数组成员, i)<br />         .判断开始 (多线程 <i>.窗口句柄 ＝ 临时句柄)<br />             句柄存在 ＝ 真<br />             多线程 <i>.线程状态 ＝ “启动”<br />             多线程 <i>.线程句柄 ＝ 线程_启动 (&启动线程, 多线程 <i>.对象地址)<br />             跳出循环 ()<br />         .默认<br />             句柄存在 ＝ 假<br />         .判断结束<br /> <br />     .计次循环尾 ()<br />     .如果真 (句柄存在 ＝ 假)<br />         .判断开始 (数组成员 ＞ 对象个数)<br />             .计次循环首 (数组成员, i)<br />                 .判断开始 (多线程 <i>.线程状态 ＝ “停止” 且 i ＞ 对象个数)<br />                     有空线程 ＝ 真<br />                     多线程 <i>.窗口句柄 ＝ 临时句柄<br />                     多线程 <i>.对象地址 ＝ i<br />                     多线程 <i>.线程句柄 ＝ 线程_启动 (&启动线程, 多线程 <i>.对象地址)<br />                     跳出循环 ()<br />                 .默认<br />                     有空线程 ＝ 假<br />                 .判断结束<br /> <br />             .计次循环尾 ()<br />             .如果真 (有空线程 ＝ 假)<br />                 信息提示框 (“线程占满，请结束一条线程后再启动”, #确认钮 ＋ #信息图标, “提示”, _启动窗口.取窗口句柄 ())<br />             .如果真结束<br /> <br />         .默认<br />             临时信息.窗口句柄 ＝ 临时句柄<br />             临时信息.对象地址 ＝ 数组成员 ＋ 1<br />             临时信息.线程状态 ＝ “启动”<br />             临时信息.线程句柄 ＝ 线程_启动 (&启动线程, 临时信息.对象地址)<br />             加入成员 (多线程, 临时信息)<br /> <br />         .判断结束<br /> <br />     .如果真结束<br /> <br /> .默认<br />     临时信息.窗口句柄 ＝ 临时句柄<br />     临时信息.对象地址 ＝ 数组成员 ＋ 1<br />     临时信息.线程状态 ＝ “启动”<br />     临时信息.线程句柄 ＝ 线程_启动 (&启动线程, 临时信息.对象地址)<br />     加入成员 (多线程, 临时信息)

， 为啥 我开了3条线程，只有 俩条线程  不重复 工作，第三条线程 就肯定跟 前俩条 其中的一条 操作的信息是重复的！


求大神帮解答一下 谢谢了！！

小小彬

晕阿，这帖子没人回答，精币也不给退回去了阿

小小彬

自己给自己回答，退回精币