Probleme bei Spielbedienung

[Jonski]

Hi Leute,

eigentlich wollte ich für einen Freund ein Spiel proggn, aber meine Bitmap bewegt sich nicht!
Ich habe schon alle Sachen die ich je falsch gemacht habe überprüft, doch es geht einfach nicht!

Mein Text:

Delphi-Quellcode:

procedure TForm1.FormKeyDown(Sender: TObject; var Key: Word;
  Shift: TShiftState);
begin

case Key of
// Links
  VK_Left: Image3.Left := Image3.Left -10;
// Rechts
  VK_Right: Image3.Left := Image3.Left +10;
end;
end;

Danke für eure Hilfe!

[himitsu]

1. die Überschirft ist absolut nicht aussagekräftig

2. Stichwort "Debuggen": hast du auch geprüft, ob die Funktion aufgerufen wird und wenn ja, ob die Parameter dem Entsprechen, was du erwartest?

[Jonski]

Also Debugger läuft alles aber wie is das mit den parametern gemeint?

[zeras]

Habe gerade deinen Code in ein neues Projekt eingebaut.
Geht alles!!!
Hast du vielleicht mehrere Images, weil deines Image3 ist und du das falsche bewegst??

[Jonski]

Ich über denke das alles nochmal und progge es neu!

[Namenloser]

Setz mal KeyPreview auf True. Und bitte gib dem Thread einen aussagekräftigen Titel.

[Jonski]

Habs neu gemacht, aber jetzt habe ich das Problem:

Delphi-Quellcode:

// Schießen
  VK_Up:
  Schuss.Top := 520;
  Schuss.Left := 450;
  Schuss.Show;

Delphi zeigt an: Konstantenausdruck erwartet!

PS.: Wie kann ich das Thema umbenennen?

[Balu der Bär]

Delphi-Quellcode:

VK_Up:

Liegt wohl an dem : statt ;.

Thread benennst du durch den Edit-Button im ersten Post um, wenn noch keine 24h um sind.

[SirThornberry]

Könntest du bitte dem Thema, entsprechend den Forenregeln, einen aussagekräftigen Titel geben? :)

[Jonski]

Tja jetzt geht alles bis auf die erste Zeile der Procedur!

Delphi-Quellcode:

case Key of
// Links
  VK_Left;
  Panzer.Left := Panzer.Left -8;
  X:= X -8;

Alle anderen Bedienungen gehen, außer die!

@ SirThornberry: Habs versucht!

[Klaus01]

Delphi-Quellcode:

case Key of
  VK_Left : begin
              Panzer.Left := Panzer.Left -8;
              X:= X -8;
            end;

Grüße
Klaus

[himitsu]

Delphi-Quellcode:

case Key of
  // Links
  VK_Left:
  begin
    Panzer.Left := Panzer.Left -8;
    X:= X -8;
  end;

[zeras]

Zitat:

Zitat von Jonski

Tja jetzt geht alles bis auf die erste Zeile der Procedur!

Delphi-Quellcode:

case Key of
// Links
  VK_Left; //hier sollte kein Semikolon stehen, sondern ein Doppelpukt und vielleicht noch ein begin/end, wenn die Zuweisung "x:=x-8" auch mitgemacht werden soll. Wenn du immer 8 abziehen willst, dann wäre es besser, diesen als Konstantenausdruck zu deklarieren.
  Panzer.Left := Panzer.Left -8;
  X:= X -8;

Alle anderen Bedienungen gehen, außer die!

[Jonski]

Jetzt habe ich leider das Problem, dass der Focus wenn ich auf den Startbutton klicke dort landet und ich mit den Pfeiltasten nur zwischen 2 Buttons wechsele!

Ich habe es schon mit SetFocus auf Form1 versucht klappt aber nicht.

Also meine Frage: Wie kann ich mit W A S D steuern, weil bei mir sagt der da undefinierter Bezeichner. (Muss ich da vielleicht eine Bibliothek laden oder ähnliches?)

[fkerber]

Hi!

Wo sagt er was von undefinierter Bezeichner? Wie sieht dein Code aus?
Hast du schon mal hier gesucht?

Grüße, Frederic

[Jonski]

1. Ich habe den Code auf einem anderen PC!
2. Ja mache ich meistens^^
3. z.B. VK_A ist der undefinierte Bezeichner!

Ich habe hier nur eine Tabelle der Tastenbefehle gefunden und so habe ich das auch versucht, doch es ging nicht!

[himitsu]

Kennst du die Suchfunktion schon?

VK_A > http://www.delphipraxis.net/internal...t.php?t=167798
(gleich das zweite Ergebnis ... direkt nach deinem Thread, also quasi das erste Ergebnis)

[Jonski]

Danke probier ich morgen mal aus!