Ergebnis der Suchanfrage

• Forum: Tutorials und Kurse

  Re: Snake (das Spiel)

    Delphi
    by thepaul, 28. Dez 2004
  Hiermit kann man dann auch die Pfeiltasten zur Steuerung benutzen:
  procedure TForm1.FormKeyDown(Sender: TObject; var Key: Word;
  Shift: TShiftState);
  begin
  case Key of
  VK_UP: Button2.Click;
  VK_DOWN: Button5.Click;
  VK_RIGHT: Button4.Click;
  VK_LEFT: Button3.Click;
  end;