Forum: Multimedia
Delphi
by rawsoul,
24. Okt 2007
Wie beschrieben: es ist die Kollisionsabfrage inclusive der Vektoränderung. Ich kommentiere es einfach mal, vielleicht hilft es Dir ja.
var
//dies ist dein Geschwindigkeitsvektor mit .x und .y Eigenschaft.
geschwindigkeit:tpoint;
//deine restlichen Abfragen/Prozedurabläufe
Forum: Multimedia
Delphi
by rawsoul,
23. Okt 2007
Setze doch mal einfacher an:
var
geschwindigkeit:tpoint;
if (ball.left<feld.left) or (ball.left>feld.width+feld.left-ball.width) then geschwindigkeit.x:=-geschwindigkeit.x;
if (ball.top<feld.top) or (ball.top>feld.height+feld.top-ball.height) then geschwindigkeit.y:=-geschwindigkeit.y;