精易模板 关于 线程_销毁 的BUG反馈

YJF

因最近写的一个小工具老是出问题，多线程开久了就卡死。之前发了一个贴：http://bbs.125.la/thread-13716752-1-1.html

关于这个问题，发现是模块里的命令（线程_销毁()）有问题，不能正常已经启动的线程句柄。导致句柄数量越来越多，达到2000以上后就失败了。2000以上的线程返回句柄都是0.

经测试，只要用  线程_销毁()    这个命令就有问题。用系统自带的 关闭线程句柄() 这个问题就没问题。

附测试代码供有查看。

  

窗口程序集名	保 留	保 留	备 注
窗口程序集1
变量名	类 型	数组	备 注
jb	整数型

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

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

计次循环首 (10000, i)
启动线程 (&a, , jb)
调试输出 (到文本 (i) ＋ “ ” ＋ 到文本 (jb))
' 线程_销毁 (jb)'精易模块里的命令，使用这个命令将无法正常关闭线程句柄，当句柄数量达到2000以上后就卡死失败了。
关闭线程句柄 (jb) ' 系统自带命令，正常关闭。
处理事件 ()
计次循环尾 ()

子程序名	返回值类型	公开	备 注
a

i支持库列表	支持库注释
EThread	多线程支持库
spec	特殊功能支持库

.版本 2<br /> .支持库 EThread<br /> .支持库 spec<br /> <br /> .程序集 窗口程序集1<br /> .程序集变量 jb, 整数型<br /> <br /> .子程序 _窗口1_创建完毕<br /> .局部变量 i, 整数型<br /> <br /> .计次循环首 (10000, i)<br /> 启动线程 (&a, , jb)<br /> 调试输出 (到文本 (i) ＋ “ ” ＋ 到文本 (jb))<br /> ' 线程_销毁 (jb)'精易模块里的命令，使用这个命令将无法正常关闭线程句柄，当句柄数量达到2000以上后就卡死失败了。<br /> 关闭线程句柄 (jb) ' 系统自带命令，正常关闭。<br /> <br /> 处理事件 ()<br /> <br /> .计次循环尾 ()<br /> <br /> .子程序 a