求助线程关闭问题

lc890722

1. var 线程句柄
   
2. 功能 固定点击()
   
3.     线程句柄 = 线程开启("点击线程","")
   
4. 结束
   
5. 功能 点击线程()
   
6.     变量 dm=插件("dm.dmsoft")
   
7.     变量 dm_ret = dm.BindWindow(hwnd,"normal","windows3","normal",0)
   
8.     var i=0
   
9.     while(1)
   
10.         dm.MoveTo(150,250)
    
11.         dm.LeftClick()
    
12.         i++
    
13.         标签设置文本("点击次数","已经点击次数:"&i)
    
14.         等待(50)
    
15.     end  
    
16. 结束
    
17. 功能 停止点击()
    
18.     线程关闭(线程句柄)
    
19. 结束

复制代码

求助为什么线程无法关闭.是不是我写错了?

如果我设置等待时间稍微长一点就可以关闭

另外     线程关闭(线程句柄,1)  这样也试过了,仍然不行


除非我设置 等待(1000) 或者死命的按鼠标点按钮才能停止(按多了不小心又开启了线程)

言术

var 线程句柄=0

功能 固定点击()
    如果(线程句柄==0)
        线程句柄 = 线程开启("点击线程","")
    结束
结束

功能 停止点击()
    如果(线程句柄!=0)
        线程关闭(线程句柄)
        线程句柄=0
    结束
结束

功能 点击线程()
    变量 dm=插件("dm.dmsoft")
    变量 dm_ret = dm.BindWindow(hwnd,"normal","windows3","normal",0)
    var i=0
    while(1)
        dm.MoveTo(150,250)
        dm.LeftClick()
        i++
        标签设置文本("点击次数","已经点击次数:"&i)
        等待(50)
    end  
结束

lc890722

言术 发表于 2016-3-17 05:14
var 线程句柄=0

功能 固定点击()

加了判断仍然无法关闭线程,除非我快速的点击关闭进程的按钮
另外说一下,线程开启的时候,我的界面还有编辑框同时也不能用了,无法改变编辑框的值.还有单选框也不能点击(除非我非常快速的点击单选框)