Einzelnen Beitrag anzeigen

iLLe

Registriert seit: 17. Jul 2003
50 Beiträge
 
#7

Re: *Help* +Spiel Ping Pong (abprallen vom ball)

  Alt 17. Jul 2003, 22:41
das is der code den ich bis her habe der ball fliegt in der form herum naja auch wen ein schläger ihn nicht berührt aber ich kriegs einfach nicht hin bzw. konnte nicht schlafen
Delphi-Quellcode:
  shape1.Left:=shape1.left+x;
  shape1.top:=shape1.top+y;
{if  (shape1.top >Edit2.height) and (shape1.left>edit2.left)  then
      begin
  shape1.Left:=250;
  shape1.Visible:=false;
  Timer1.enabled:=false;
  exit
  end; }

if (shape1.left>=edit2.left-edit2.width) OR (shape1.left-shape1.width<edit1.left) then
   x:=x*-1;
if (shape1.top<0)OR(shape1.top+shape1.clientheight>form3.ClientHeight) then
    y:=y*-1 ;
[edit=Christian Seehase] Delphi Tags ergänzt Mfg, Christian Seehase[/edit]