Hallo,
ich hatte ein Spiel programmiert mit einer Figur, die sich bewegen lies.
das ganze sah wie folgt aus:
Delphi-Quelltext
1: 2: 3: 4: 5: 6: 7: 8: 9: 10: 11: 12: 13: 14: 15: 16:
| procedure TForm1.FormKeyDown(Sender: TObject; var Key: Word; Shift: TShiftState);
begin if key = vk_up then hoch:= 1; if key = vk_down then runter:= 1; if key = vk_left then links:= 1; if key = vk_right then rechts:= 1; end;
procedure TForm1.FormKeyUp(Sender: TObject; var Key: Word; Shift: TShiftState); begin if key = vk_up then hoch:= 0; if key = vk_down then runter:=0; if key = vk_left then links :=0; if key = vk_right then rechts :=0; end; |
und damals hat auch alles wunderbar funktoniert
nur habe ich diesen Teil
Delphi-Quelltext
1: 2: 3: 4: 5: 6: 7:
| procedure TForm1.FormKeyUp(Sender: TObject; var Key: Word; Shift: TShiftState); begin if key = vk_up then hoch:= 0; if key = vk_down then runter:=0; if key = vk_left then links :=0; if key = vk_right then rechts :=0; end; |
gelöscht und seit dem bewegt sich die Figur nicht mehr.
Und wenn ich es versuche unter Form1 unter Ereignisse wieder einzustellen kommt folgender Fehler
undefinierte Bezeichnung FormkeyUp
und ; erwartet , aber ) gefunden (ich habe das überprüft aber da fehlt nirgendwo ein ;
Bitte helft mir
ich muss das Projekt bis Übermorgen abgeben und es lief vorher wirklich einwandfrei
Moderiert von
Narses: Delphi-Tags hinzugefügt