delphi获取闲置时间

本文整理自网络，侵删。

 function GetLastInput: integer; //获取闲置时间
var
LInput: TLastInputInfo;
begin
Result := 0;
try
LInput.cbSize := SizeOf(TLastInputInfo);
GetLastInputInfo(LInput);
Result := ((GetTickCount - LInput.dwTime) div 1000);
except
end;
end; 

相关阅读 >>

Delphi 判断是否为文件名

Delphi 全局钩子锁定键盘

Delphi产生不重复随机数的算法

Delphi 动态添加资源文件

Delphi一句话复制整个文件夹(当然包括嵌套文件夹)

Delphi下idhttp配合cookiemanager获取cookie

Delphi listboxadditems() 不重复添加edit1

Delphi ord chr byte等转换

Delphi 搜索内存偏移函数

Delphi 给力版 getprocaddress

更多相关阅读请进入《Delphi》频道 >>

转载请注明出处：木庄网络博客 » delphi获取闲置时间