Alle Systemweiten Eingaben abfragen

[DeddyH]

Deklarier Dir ein privates Integer-Feld namens FPressedKey. Auf das greifst Du dann zu.

Delphi-Quellcode:

procedure TGlobalPressedKey.SetPressedKey(Key: Integer);
begin
  FPressedKey := Key;
end;

function TGlobalPressedKey.GetPressedKey: Integer;
begin
  Result := FPressedKey;
end;