可用分押宝游戏火热进行中...	专题改版：Java Web 专题

怎么样做一个程序10分钟没有任何操作的时候,让他弹出一个输入密码框?

楼主dreamover（梦醒了〖http://hellfire.cn〗）2005-04-03 16:37:19 在 Delphi / VCL组件开发及应用提问

如题! 问题点数：20、回复次数：14Top

1 楼shove（shove）回复于 2005-04-03 16:44:50 得分 0

我想应该是判断有无键盘、鼠标动作吧
这个很麻烦，

定义全局变量 Times:integer;
Times := 0;

放个 TTimer 在 MainForm 或 DataModule,捕捉键盘鼠标事件，只要有，设 Times := 0;
无 inc(Times);
如果 Times >=10分钟,
Show->密码框Top

2 楼longchaohui（阿龙）回复于 2005-04-03 20:06:41 得分 0

核心问题是捕获键盘鼠标消息而已，
那要用到钩子，
你可以搜搜键盘和鼠标的钩子程序，
应该有不少的Top

3 楼winstarr（星仁）回复于 2005-04-03 21:02:53 得分 0

就是捕捉消息的过程。Top

4 楼Heyongfeng（小何）回复于 2005-04-04 11:27:08 得分 0

搜索一下贴子就有答案了.Top

5 楼luxuewei5214（小卢)(以下内容仅供参考）回复于 2005-04-04 15:41:21 得分 20

检测系统空闲时间函数（ms）
function lastinput:dword;
var linput:tlastinputinfo;
begin
linput.cbsize:=sizeof(tlastinputinfo);
getlastinputinfo(linput);
result:=gettickcount-linput.dwtime;
end;
然后在timer事件里判断，result大于10分钟就调出你的密码窗口。
和屏保的原理一样。Top

6 楼skertone（）回复于 2005-04-04 19:57:07 得分 0

TApplicationEvent.OnIdle() 事件中，开始计时10分钟即可Top

7 楼dreamover（梦醒了〖http://hellfire.cn〗）回复于 2005-04-10 10:30:08 得分 0

计时好说,怎么捕捉键盘和鼠标事件啊?
用钩子?我只想看看操作员有没有操作也不是监视他什么操作,用钩子是不是有点大材小用了,高手有没有比较简单的办法?用applicationevent1能不能解决问题?Top

8 楼dreamover（梦醒了〖http://hellfire.cn〗）回复于 2005-04-10 10:41:37 得分 0

luxuewei5214(小卢) ( )

你那个函数单位是什么?秒么?
怎么用,能说具体点么Top

9 楼gogogo（嘿嘿）回复于 2005-04-10 10:53:52 得分 0

好贴，收藏Top

10 楼dreamover（梦醒了〖http://hellfire.cn〗）回复于 2005-04-16 15:13:50 得分 0

onidle()事件,倒底是怎么回事,为什么我有操作的时候,他也在计数?Top

11 楼wangbao20001766（豹子）回复于 2005-04-16 15:31:05 得分 0

enTop

12 楼zhoujie99（潇雨歇）回复于 2005-04-16 15:37:52 得分 0

有意思，帮顶！Top

13 楼dreamover（梦醒了〖http://hellfire.cn〗）回复于 2005-04-16 17:00:07 得分 0

小卢那个函数好用,已用
希望有高手能仔细讲讲onidle,听明白了另开贴给分Top

14 楼yeeyee（我要换工作！）回复于 2005-04-17 14:00:53 得分 0

Timer 方便，时间促发Top