TC官方合作论坛

 找回密码
 立即注册
查看: 2004|回复: 9

[问题] 线程关不掉????

[复制链接]
发表于 2015-5-13 08:02:37 | 显示全部楼层 |阅读模式

马上加入TC

您需要 登录 才可以下载或查看,没有帐号?立即注册

x
功能 等待按键()
    循环(真)
        如果(鼠标等待点击() == 1004)
            等待(100)
            变量 个数 = 列表框获取选项个数("列表框1")
            遍历(变量 i = 0; i < 个数; i++)
                变量 文本 = 列表框获取文本("列表框1",i)
                调试输出("文本="&文本)
                如果(文本==1)  
                    等待(350)
                    超级键盘按键(49)
                否则如果(文本==2)
                    等待(350)
                    超级键盘按键(50)
                否则如果(文本==3)
                    等待(350)
                    超级键盘按键(51)
                否则如果(文本==4)
                    等待(350)
                    超级键盘按键(52)
                否则如果(文本==5)
                    等待(350)
                    超级键盘按键(53)
                结束
               
            结束  
        结束
结束
回复

使用道具 举报

发表于 2015-5-13 08:27:47 | 显示全部楼层
你这个是无线循环啊,不会自己结束的
回复 支持 反对

使用道具 举报

 楼主| 发表于 2015-5-13 08:37:42 | 显示全部楼层
是啊,就是让他啊无限循环   不知道怎么关闭
回复 支持 反对

使用道具 举报

发表于 2015-5-13 09:00:52 | 显示全部楼层
  1. 变量 赋值跳出
  2. 功能 停止循环()
  3. 赋值跳出="跳出循环"
  4. 结束

  5. 功能 等待按键()
  6.     循环(真)
  7. 如果(赋值跳出==跳出循环)
  8. 赋值跳出=空
  9. 跳出
  10. 否则
  11.         如果(鼠标等待点击() == 1004)
  12.            ..
  13.                 结束
  14.                
  15.             结束  
  16.         结束
  17. 结束
复制代码


没用过5.0,这是思路
回复 支持 反对

使用道具 举报

发表于 2015-5-13 09:07:09 | 显示全部楼层
你是怎么调用这个线程的?
回复 支持 反对

使用道具 举报

发表于 2015-5-13 09:47:44 | 显示全部楼层
如果(键盘等待按键()==13)//比如回车
    返回
结束
回复 支持 反对

使用道具 举报

发表于 2015-5-13 11:05:42 | 显示全部楼层
没跳出怎么搞
回复 支持 反对

使用道具 举报

发表于 2015-5-13 12:20:31 | 显示全部楼层
变量 线程句柄   //全局变量
线程句柄=线程开启(“等待按键”,“”) //调用的时候用线程开启并赋值给线程句柄

线程关闭(线程句柄)// 退出或者热键调用关闭线程
回复 支持 反对

使用道具 举报

 楼主| 发表于 2015-5-13 13:10:26 | 显示全部楼层
buxing
回复

使用道具 举报

发表于 2015-6-10 11:02:52 | 显示全部楼层

  1. 变量 xhwnd

  2. 功能 开_点击()
  3.     xhwnd=线程开启("等待按键","")
  4. 结束

  5. 功能 关_点击()
  6.     线程关闭(xhwnd)
  7. 结束

  8. 功能 等待按键()
  9.     循环(真)
  10.         如果(鼠标等待点击() == 1004)
  11.             等待(100)
  12.             变量 个数 = 列表框获取选项个数("列表框1")
  13.             遍历(变量 i = 0; i < 个数; i++)
  14.                 变量 文本 = 列表框获取文本("列表框1",i)
  15.                 调试输出("文本="&文本)
  16.                 如果(文本==1)  
  17.                     等待(350)
  18.                     超级键盘按键(49)
  19.                 否则如果(文本==2)
  20.                     等待(350)
  21.                     超级键盘按键(50)
  22.                 否则如果(文本==3)
  23.                     等待(350)
  24.                     超级键盘按键(51)
  25.                 否则如果(文本==4)
  26.                     等待(350)
  27.                     超级键盘按键(52)
  28.                 否则如果(文本==5)
  29.                     等待(350)
  30.                     超级键盘按键(53)
  31.                 结束
  32.                
  33.             结束  
  34.         结束
  35.     结束
复制代码
回复 支持 反对

使用道具 举报

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

关闭

推荐上一条 /2 下一条

关闭

小黑屋|TC官方合作论坛 (苏ICP备18045623号)

GMT+8, 2024-10-2 11:55 , Processed in 0.038684 second(s), 23 queries .

Powered by 海安简单软件服务部

© 2008-2019 版权所有 保留所有权利

快速回复 返回顶部 返回列表