Zeit seit letzter Tastatureingabe

[JasonDX]

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