Delphi 检测鼠标键盘多久没有活动

2021-03-12 18:30

阅读：554

标签：code tick send word str nbsp RoCE end bsp

function GetInputAwayTime():DWORD;  
var
  lpi:TLastInputInfo;
begin
  lpi.cbSize := sizeof(lpi);
  GetLastInputInfo(lpi);
  Result := Round((GetTickCount()-lpi.dwTime)/1000);
end;


procedure TForm1.Timer1Timer(Sender: TObject);
begin
Caption := IntToStr(GetInputAwayTime)
end;

Delphi 检测鼠标键盘多久没有活动

标签：code tick send word str nbsp RoCE end bsp

原文地址：https://www.cnblogs.com/windson/p/12587376.html

上一篇：用c#判断回文数和降序数

下一篇：Windows10右键添加CMD

文章来自：搜素材网的编程语言模块，转载请注明文章出处。
文章标题：Delphi 检测鼠标键盘多久没有活动
文章链接：http://soscw.com/index.php/essay/63776.html

亲，登录后才可以留言！

Delphi 检测鼠标键盘多久没有活动

评论

热门文章

推荐文章

最新文章

置顶文章