KeyPress und Pfeiltasten

[Nils_13]

Hi,

wie kann man in FormKeyPress prüfen, ob eine Pfeiltaste gedrückt wird ?

Dieser Code liefert keine Nachricht, wenn ich eine Pfeiltaste drücke, bei anderen Tasten hingegen schon:

Delphi-Quellcode:

procedure TfrmMain.FormKeyPress(Sender: TObject; var Key: Char);
begin
  ShowMessage(Key);
end;

Beide hier gezeigten Möglichkeiten liefern auch keine Nachricht:

Delphi-Quellcode:

procedure TfrmMain.FormKeyPress(Sender: TObject; var Key: Char);
begin
  if Ord(Key) = VK_LEFT then
    ShowMessage('asd');
  if VkKeyScan(Key) = VK_LEFT then
    ShowMessage('asd');
end;

Dann kam ich also auf die Idee, einfach mal bei KeyDown Key (Word) ausgeben zu lassen. Das Ergebnis ist 37. Aber auch das hat nichts gebracht.

Delphi-Quellcode:

procedure TfrmMain.FormKeyPress(Sender: TObject; var Key: Char);
begin
  if Word(Key) = 37 then
    ShowMessage('asd');
end;

Wenn ich 37 zu einem Char machen würde (Char(37)), kommt % raus. Wie komme ich nun an den richtigen Word-Wert ? Gibt es noch bessere Lösungsmöglichkeiten als diese, noch nicht ganz funktionierende ?