Auf Pfeiltasten reagieren

[himitsu]

Ach ja, das andere geht natürlich auch nicht.

Zitat:

procedure TForm1.FormKeyPress(Sender: TObject; var Key: Char);
begin
if Key = Ord('a') then ShowMessage('bla');
end;

Key ist vom Typ Char, daher ist es so richtig:

Delphi-Quellcode:

Procedure TForm1.FormKeyPress(Sender: TObject; Var Key: Char); 
  Begin 
    If Key = 'a' Then ShowMessage('Das Kleine a wurde gedrückt'); 
  End;

http://www.FrankNStein.de/Smiley-Kuss.gif * * http://www.FrankNStein.de/Smiley-Spinne.gif * * * http://www.FrankNStein.de/Smiley-Winken.gif