Entwickler-Ecke

Delphi Language (Object-Pascal) / CLX - Bitte um Hilfe beim Abprallen von 2 Shapes


Theo51 - Mo 24.02.14 21:12
Titel: Bitte um Hilfe beim Abprallen von 2 Shapes
Hallo,

ich programmiere ein kleines pong Spiel in Delphi. ich bin dabei ein absoluter Anfänger und komme leider an einer Stelle nicht weiter. Ich habe ein klassiches Ping Pong gestaltet. Also zwei Balken die mit Tasten gesteuert werden und ein Ball der durch das Spielfeld fliegt. Alles sind Shape Objekte.

Das Abprallen von den Seiten funktioniert sehr gut. Leider bekomme ich das Abprallen von den Shapes nicht hin.

Kann mir da jemand einen Ansatz geben?

Hier zeige ich mal wie ich das abprallen von der Wand geschrieben habe:


Delphi-Quelltext 
1:
2:
3:
4:
 
if (ybegin+ball.height>=form1.Clientheight) then begin
      geschwy:= -20;
      ybegin:= form1.clientheight-ball.height;
    end;

So wie muss ich das nun schreiben das es von dem Shapes abprallt? Ich bin schon jetzt dankbar für eure Hilfe.

Viele Grüße. M.R

Moderiert von user profile iconNarses: Delphi-Tags hinzugefügt


gerd8888 - Mo 24.02.14 21:21
:welcome:

Wenn der Ball oben rausläuft, willst Du die Geschwindigkeit verringern und den Ball wieder ganz oben erscheinen lassen.
Wenn Du noch ein Shape hast, musst du noch die y-shape länge abziehen. Oder?

Gerd


GuaAck - Mo 24.02.14 22:42
... und wohl auch shape.top, also (shape.top+shape.height),

Gruß GuaAck


Fiete - Di 25.02.14 12:29
Moin,
schau mal hier nach http://www.entwickler-ecke.de/viewtopic.php?t=80910&highlight=oop+fiete

Gruß Fiete


Entwickler-Ecke.de based on phpBB
Copyright 2002 - 2011 by Tino Teuber, Copyright 2011 - 2025 by Christian Stelzmann Alle Rechte vorbehalten.
Alle Beiträge stammen von dritten Personen und dürfen geltendes Recht nicht verletzen.
Entwickler-Ecke und die zugehörigen Webseiten distanzieren sich ausdrücklich von Fremdinhalten jeglicher Art!