Delphi 检测用户超过多长时间没有操作键盘或鼠标
博客专区 > vga 的博客 > 博客详情
Delphi 检测用户超过多长时间没有操作键盘或鼠标
vga 发表于3年前
Delphi 检测用户超过多长时间没有操作键盘或鼠标
  • 发表于 3年前
  • 阅读 409
  • 收藏 3
  • 点赞 0
  • 评论 3

【腾讯云】如何购买服务器最划算?>>>   

摘要: Delphi 检测用户超过多长时间没有操作键盘或鼠标


procedure TForm1.Timer1Timer(Sender: TObject);
var  vLastInputInfo: TLastInputInfo;
begin
vLastInputInfo.cbSize := SizeOf(vLastInputInfo);
GetLastInputInfo(vLastInputInfo);
if GetTickCount - vLastInputInfo.dwTime > 5000 then
begin
timer1.Enabled:= false;
showmessage('超过5秒,用户未动鼠标!');
end;
end;

共有 人打赏支持
粉丝 18
博文 315
码字总数 19199
评论 (3)
当时汉就来了
现在还能看到这个语言,13
vga
在 2015-02 排名 11
vga

引用来自“当时汉就来了”的评论

现在还能看到这个语言,13
在用 java?
×
vga
如果觉得我的文章对您有用,请随意打赏。您的支持将鼓励我继续创作!
* 金额(元)
¥1 ¥5 ¥10 ¥20 其他金额
打赏人
留言
* 支付类型
微信扫码支付
打赏金额:
已支付成功
打赏金额: