TEdit, Tastaturpuffer gefüllt?

[hathor]

Für's Warten gibt es GETLASTINPUTINFO:

Delphi-Quellcode:

function LastInput: DWord;
var
  LInput: TLastInputInfo;
begin
  LInput.cbSize := SizeOf(TLastInputInfo);
  GetLastInputInfo(LInput);
  Result := GetTickCount - LInput.dwTime;
end;