多线程关闭时出错，TC崩溃！帮忙看一下！！

lixi8833

脚本开启的时候一直没问题，已按终止热键就显示崩溃！求大神指教！！  下面是码源：

变量 线程句柄数组=数组() , 窗口句柄数组=数组(),sf=数组(),换豆=数组()
变量 dm = 数组()



功能 热键0_热键()
    //这里添加你要执行的代码
    如果(浏览框获取文本("浏览框0")=="")
        消息框("请选择吃分号和狗粮号名字路径,否则脚本无法运行!!!!")
    否则如果(浏览框获取文本("浏览框1")=="")
        消息框("请选择吃分号和狗粮号名字路径,否则脚本无法运行!!!!")
    否则
        变量 窗口句柄 ,线程句柄
        窗口句柄=窗口获取鼠标所在句柄()
        变量  标题=窗口获取标题(窗口句柄)
        如果(标题=="剑灵")

            变量 下标 = 数组值查找(窗口句柄数组,窗口句柄,1)
            如果(下标==-1)   //是新的窗口
                数组追加元素(窗口句柄数组,窗口句柄)
                变量 大小 = 数组大小(窗口句柄数组)
                线程句柄=线程开启("攻守",大小-1)
                数组追加元素(线程句柄数组,线程句柄)
                //        数组增加元素(dx,窗口句柄,null)
            否则//旧的窗口
                如果(窗口句柄==窗口句柄数组[下标])
                    消息框("该窗口已经启动!!")
                    返回 0
                否则
                    数组追加元素(窗口句柄数组,窗口句柄)
                    变量 大小 = 数组大小(窗口句柄数组)
                    线程句柄=线程开启("攻守",大小-1)
                    数组追加元素(线程句柄数组,线程句柄)
                    //            数组增加元素(dx,窗口句柄,null)
                结束

            结束
        否则
            消息框("请选择正确的剑灵游戏窗口!!")
        结束
    结束
结束

功能 热键1_热键()
    //这里添加你要执行的代码
    如果(浏览框获取文本("浏览框0")=="")
        消息框("请选择吃分号和狗粮号名字路径,否则脚本无法运行!!!!")
    否则如果(浏览框获取文本("浏览框1")=="")
        消息框("请选择吃分号和狗粮号名字路径,否则脚本无法运行!!!!")
    否则
        变量 窗口句柄 ,线程句柄
        窗口句柄=窗口获取鼠标所在句柄()
        变量   标题=窗口获取标题(窗口句柄)
        如果(标题=="剑灵")
            变量 下标 = 数组值查找(窗口句柄数组,窗口句柄,1)
            如果(下标==-1)   //是新的窗口
                数组追加元素(窗口句柄数组,窗口句柄)
                变量 大小 = 数组大小(窗口句柄数组)
                线程句柄=线程开启("攻守2",大小-1)
                数组追加元素(线程句柄数组,线程句柄)
                //        数组增加元素(dx,窗口句柄,null)
            否则//旧的窗口
                如果(窗口句柄==窗口句柄数组[下标])
                    消息框("该窗口已经启动!!")
                    返回 0
                否则
                    数组追加元素(窗口句柄数组,窗口句柄)
                    变量 大小 = 数组大小(窗口句柄数组)
                    线程句柄=线程开启("攻守2",大小-1)
                    数组追加元素(线程句柄数组,线程句柄)
                    //            数组增加元素(dx,窗口句柄,null)
                结束

            结束
        否则
            消息框("请选择正确的剑灵游戏窗口!!")
        结束
    结束
结束



功能 终止_热键()
    变量   大小= 数组大小(线程句柄数组)

    遍历(变量 i = 0; i < 大小; i++)
        dm[i].UnBindWindow()
        等待(50)
        线程关闭(线程句柄数组[i])
    结束
    数组清空(线程句柄数组)
    数组清空(窗口句柄数组)
    数组清空(dm)

结束

qq1282666006

搞了这么久的TC 到了多线程多开 就很容易崩溃了 。。。