Luckie zeigt
hier eine Funktion, mit der angegeben wird, wie lange die letzte Eingabe des Benutzers vergangen ist.
Delphi-Quellcode:
function SecondsIdle: DWord;
var
liInfo: TLastInputInfo;
begin
liInfo.cbSize := SizeOf(TLastInputInfo) ;
GetLastInputInfo(liInfo) ;
Result := (GetTickCount - liInfo.dwTime) DIV 1000;
end;
Dabei wird auf die Funktion
GetLastInputInfo zurückgegriffen.
Benötigte Units:
Windows
greetz
Mike