Einzelnen Beitrag anzeigen

Benutzerbild von Sko
Sko

Registriert seit: 11. Sep 2005
327 Beiträge
 
Turbo Delphi für Win32
 
#4

Re: Problem mit Schläger beim Pong Spiel

  Alt 17. Mär 2007, 11:22
öhm, sorry, falsch rum gedacht^^

Delphi-Quellcode:
If (Key = VK_DOWN) and (Schlaeger2.Top < (Panel.Height - Schlaeger2.Height)) then //Pfeiltaste nach unten
  begin
    Schlaeger2.Top :=Schlaeger2.top + 20;
  end
  else if (Key = VK_UP) and (Schlaeger2.Top > 0) then //Pfeiltraste nach oben
  begin
    Schlaeger2.Top := Schlaeger2.Top - 20;
  end

// --- Steuerung Schläger 1
  else if (Key = 65) and (Schlaeger1.Top < (Panel.Height - Schlaeger1.Height)) then //A Taste
  begin
    Schlaeger1.Top := Schlaeger1.Top + 20;
  end
  else if (Key = 81) and (Schlaeger1.Top > 0) then //Q Taste
    Schlaeger1.Top := Schlaeger1.Top - 20;
end;
MfG Sko
Zitat von Phoenix:
[OT]Phoenix guckt in die Glaskugel, zuckt mit den Flügelspitzen, krächzt etwas von wegen 'Boden' und 'Scherben' und schubbst die Kugel in Richtung Tischkante.[/OT]
Rockbox
  Mit Zitat antworten Zitat