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;
本站仅提供存储服务,所有内容均由用户发布,如发现有害或侵权内容,请
点击举报。