探测键盘、鼠标的响应问题....

[ivt]

我有几个窗体，一个是主窗体。
现在当进入到非主窗体时，我希望能
检测到键盘、鼠标在5分钟内没有响应就
自动返回到主窗体，请问应该怎么实现呀
关注当中......

[northwolves]

有个笨办法，呵呵：
static escapetime as integer

timer1: interval=1000; escapetime=escapetime+1: if escapetime= 50 则timer1.enabled=false,返回主窗体

所有子窗体和控件mousedown: timer1.enabled=true: escapetime=0
所有子窗体和控件keydown: timer1.enabled=true:escapetime=0

[rainstormmaster]

看http://community.csdn.net/Expert/topic/3338/3338715.xml?temp=.5497553里我的回复

[ivt]

楼上的方法确实不错。变通的方法也很有创意。
都是用API，
敬请给出使用这些API的代码，好吗？

[碧海情天-赵亮]

不错
是不是可以把下面的TIMER1.ENABLED=TRUE去掉,直接在设计期就置为TRUE,打开子窗体即计时.否则,设计期若为FALSE的话就反倒达不到目的了,只要没有操作就一直不计时了嘛.
另外可以不必在每个控件的KEYDOWN事件中都加入代码吧.只要设置窗体的KEYPREVIEW属性为真,只在窗体的键盘事件中写上escapetime=0就可以了.
另外TIMER控件的interval=1000约等于一秒,要表示5分钟,应该让 escapetime 与 5*60 相比较.