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 ?