Ergebnis der Suchanfrage

• Forum: Sonstige Fragen zu Delphi

  Re: "Bitte eine Taste drücken" und dann Virtual Ke

    Delphi
    by Lannes, 1. Dez 2005
  Hallo,
  wenn du auch z.B die Tasten oder , ... ins Edit schreiben willst dann so:
  
  uses Menus;//<----Unit einbinden
  //...
  procedure TForm1.FormKeyDown(Sender: TObject; var Key: Word;
  Shift: TShiftState);
  begin
  Edit1.Text := ShortCutToText(Key);
  key := 0;//<---- damit Taste nicht ausgeführt wird