TC官方合作论坛

标题: 等待按键怎么弄啊 [打印本页]

作者: wudichb 时间: 2013-11-27 12:43
标题: 等待按键怎么弄啊
我想弄个先开始程序之后什么都不做
然后程序等待按键
当我按下F2的时候执行一下程序或者创建一个线程
但是我用天使里面的等待按键
放在循环里面等待按键变成了无限循环创建无限个线程了

while(真)

复制代码

如果是按键精灵的话
key= waitkey()
程序运行到这之后程序就不走了，就一直等待用户输入键盘指令知道我输入了才行
但是我上面的代码，我启动程序后他什么都没做但是当我按下F2之后
就变成了无限循环，key就一直以等于1无限循环，然后我线程的程序就写了个弹窗操作他就变成了无限弹窗

作者: wudichb 时间: 2013-11-27 12:43
while(真)
key=0
shwnd=ts.GetMousePointWindow()
if(ts.IsBind(shwnd)==0)
key=ts.WaitKey(113,0)
if(key==1)
线程.开启("dkqsj.主程序",shwnd)
key=ts.WaitKey(0,0)
else
endif
else
help.messagebox("此窗口已绑定")
endif
endwhile

作者: zxw445 时间: 2013-11-27 15:09

wudichb 发表于 2013-11-27 12:43
while(真)
key=0
shwnd=ts.GetMousePointWindow()

你可以当你按 F12触发时，跳出循环。这样不就可以了？

欢迎光临 TC官方合作论坛 (http://bbs.52tc.co/)