Einzelnen Beitrag anzeigen

Benutzerbild von Fussel9
Fussel9

Registriert seit: 25. Mai 2009
322 Beiträge
 
Turbo Delphi für Win32
 
#3

AW: Kollision mit Reflektion - Ich raffs net...

  Alt 9. Feb 2011, 22:35
Verzeihet, mir wart nicht geläufig das Dudenschreiben bei Hofe sind...

Ja ich verstehe den Quelltext nicht...

und zwar diese Stelle
Delphi-Quellcode:
       sball.left:=sball.left+bx;
       if sball.left < 0 then
          begin
          sball.left := 1;
          bx := -bx;
          end;
          if sball.left > pgrenze.width - sball.width then
          begin
          sball.left := pgrenze.width - sball.width;
          bx := -bx;
          end;

       sball.top := sball.top+by;
       if sball.top < 0 then
          begin
          sball.Top := 1;
          by := -by;
          end;
       if sball.top > pgrenze.height - sball.height then
          begin
          sball.top := pgrenze.height - sball.height;
          by := -by;
          end;
wieso: if sball.left > pgrenze.width - sball.width then
begin
sball.left := pgrenze.width - sball.width;

Und der Quelltext den ich geschrieben habe diente nur dazu festzustellen ob eine Kollision vorliegt evtl. auch noch wo..(oben unten rechts links) und nicht der reflektion ...


Ich hoffe das meine Ausführungen der deutschen Syntax genuge wurden...