以下代码可以获取系统空闲时间。
function IdleTime: DWord;
var
LastInput: TLastInputInfo;
begin
LastInput.cbSize := SizeOf(TLastInputInfo);
GetLastInputInfo(LastInput);
Result := (GetTickCount - LastInput.dwTime) DIV 1000;
end;
是否可以单独获得键盘空闲时间?让用户移动他/她的鼠标——没关系。是否可以确定键盘空闲了多长时间?