Einzelnen Beitrag anzeigen

Markus K.

Registriert seit: 26. Jan 2004
Ort: Halle
346 Beiträge
 
Delphi 2005 Personal
 
#8

Re: 2 Images gleichzeitig verschieben?

  Alt 10. Mär 2004, 15:03
In den Klammern gibst du an was geschehen soll, wenn du zwei Tasten auf einmal drückst. Und bei then fügst du dann die Prozeduren hinzu welche ausgeführt werden sollen.
Delphi-Quellcode:
if ((getkeystate(VK_LEFT)and 128)=128) and
   ((getkeystate(VK_DOWN)and 128)=128)
then begin
     MoveFighter (imgFighter1, LeftMove , NoJump );
     MoveFighter (imgFighter2, LeftMove , NoJump );
     end;
Den Teil brauchst du aber auch, da der obrige Code nur ausgeführt wird wenn du zwei Tasten auf einmal drückst.
Delphi-Quellcode:
if Key=VK_LEFT then MoveFighter (imgFighter1, LeftMove , NoJump );
if Key=VK_RIGHT then MoveFighter(imgFighter1, RightMove, NoJump );
if Key=VK_UP then MoveFighter (imgFighter1, NoMove , Jumphigh );
if Key=VK_DOWN then MoveFighter (imgFighter2, LeftMove , NoJump );
So hatte ich damals das selbe Problem gelöst, weiß allerdings nicht ob es dafür noch andere Möglichkeiten gibt.

Tschüß Markus
  Mit Zitat antworten Zitat