Snake einmal anders

[Matze]

Der Vollständigkeit halber eine Möglichkeit, wie du die besagten Tasten (#x) ermittaln kannst (Taste drücken und du siehst es):

Delphi-Quellcode:

procedure TForm1.FormCreate(Sender: TObject);
begin
  KeyPreView := true;
end;

procedure TForm1.FormKeyDown(Sender: TObject; var Key: Word;
  Shift: TShiftState);
begin
  ShowMessage('Taste: #' + IntToStr(Key));
end;