Wenn du die
Unit Winapi.Windows eingebunden hast, sollte er das automatisch finden.
Hallo,
die verlinkten Beispiele ist ein bisschen overdressed.
Aber das Stichwort ist Hook [...]
Hooks werden nur so wie ich es weiß öfters von Virenscannern erkannt. Ob das jetzt bei diesem auch der Fall ist weiß ich nicht. Habe auch noch nie mit Hooks arbeiten müssen. TLastInputInfo ist eben relativ einfach zu verwenden und kann regelmäßig über einen TTimer abgefragt werden.
Hier nur ein kleines Beispiel wie ich es umgesetzt habe:
Delphi-Quellcode:
LastInputInfo.cbSize := SizeOf(TLastInputInfo);
if GetLastInputInfo(LastInputInfo) then begin
if ((GetTickCount - LastInputInfo.dwTime) >= Cardinal(InactivityValue * 60000)) then begin
DoLockDatabase(True); // Sperrt in meinem Fall die Datenbank
end;
end;