本文整理自网络,侵删。
以下是获取空闲时间的代码,主要用到了GetLastInputInfo,关于这个API的用法,可以参考
http://baike.baidu.com/link?url=mujG74H8KaH5fnAlIsItz3r2EZWQd1CvVt2x2B_wHlsGYfra7XbBa_BcvVrwj2YPAWtyvLQ6CdVH2e2Qa38FOq
使用前记得初始化结构体TLastInputInfo,并给cbSize赋值,否则函数将返回False
function GetIdleTime: Cardinal;
var
pill: TLastInputInfo;
begin
ZeroMemory(@pill, SizeOf(pill));
pill.cbSize := SizeOf(pill);
GetLastInputInfo(pill);
Result := GetTickCount - pill.dwTime;
end;
相关阅读 >>
Delphi研究之驱动开发篇(六)--利用section与用户模式程
Delphi d10.x 安卓app开发中按返回键后程序不退出程序的方法
Delphi:取得浏览器地址,网址(支持ie,firefox)
更多相关阅读请进入《Delphi》频道 >>