• 全部

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

ivt 2004-09-04 11:37:08
我有几个窗体，一个是主窗体。
现在当进入到非主窗体时，我希望能
检测到键盘、鼠标在5分钟内没有响应就
自动返回到主窗体，请问应该怎么实现呀
关注当中......
...全文
84 点赞 收藏 4
写回复
4 条回复
切换为时间正序
当前发帖距今超过3年，不再开放新的回复
发表回复
碧海情天-赵亮 2004-09-05
不错
是不是可以把下面的TIMER1.ENABLED=TRUE去掉,直接在设计期就置为TRUE,打开子窗体即计时.否则,设计期若为FALSE的话就反倒达不到目的了,只要没有操作就一直不计时了嘛.
另外可以不必在每个控件的KEYDOWN事件中都加入代码吧.只要设置窗体的KEYPREVIEW属性为真,只在窗体的键盘事件中写上escapetime=0就可以了.
另外TIMER控件的interval=1000约等于一秒,要表示5分钟,应该让 escapetime 与 5*60 相比较.
 回复 赞
ivt 2004-09-05
楼上的方法确实不错。变通的方法也很有创意。
都是用API，
敬请给出使用这些API的代码，好吗？
 回复 赞
rainstormmaster 2004-09-05
看http://community.csdn.net/Expert/topic/3338/3338715.xml?temp=.5497553里我的回复
 回复 赞
northwolves 2004-09-04
有个笨办法，呵呵：
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
 回复 赞
发帖
VB基础类
创建于2007-09-28

7479

社区成员

19.7w+

社区内容

VB 基础类
申请成为版主
帖子事件
创建了帖子
2004-09-04 11:37
社区公告
暂无公告