TC线程问题

110022

变量 线程ID
功能 执行()
循环(真)
    调试输出(随机数(0,100))
    等待（500）
结束
结束

功能 启动_热键()
    线程ID=线程开启("执行","")
结束

功能 终止_热键()
    线程关闭(线程ID)
结束

按启动热键两次后程序会同时运行两次，怎样实现按启动热键一次后程序运行再按一次启动热键程序不会在重复运行一次。
有大神明白我的意思吗？会的大神帮忙一下。谢谢！！

言术

1. 变量 线程ID=0
   
2. 功能 执行()
   
3.     循环(真)
   
4.         调试输出(随机数(0,100))
   
5.         等待(500)
   
6.     结束
   
7. 结束
   
8. 
   
9. 功能 启动_热键()
   
10.     如果(线程ID==0)
    
11.         线程ID=线程开启("执行","")
    
12.     结束
    
13. 结束
    
14. 
    
15. 功能 终止_热键()
    
16.     如果(线程ID!=0)
    
17.         线程关闭(线程ID)
    
18.         线程ID=0
    
19.     结束
    
20. 结束
    

复制代码

110022

言术 发表于 2015-11-27 06:11

完美的解决了我的问题，非常感谢！！！