Ballspiel(Pongähnlich)

[karrax]

Hallo Com,
habe eine Frage undzwar wurde mir die Aufgabe gestellt, das ich mit einem Timer ein Shape durch den ganzen
Bildschirm fliegen lassen soll und wenn es an die Bildschirmränder prallt soll es die Richtung ändern.
Ich habe leider keine Ahnung wie ich die sache in angriff nehmen muss.
Ich weis das der Befehl x := -x die Bewegungsrichtung ändert, dass war es aber auch.
Wäre schön wenn man mir helfen kann

Karrax

[Back2Code]

Auf welcher Komponente / Hintergrund willst du den Ball zeichnen?

Du könntest ein Drawgrid nehmen dann lässt du die Bewegungen mithilfe eines Arrayes ablaufen und am Rand wechselt es dann wieder die Richtung wenn der Ball entweder auf 0 oder das Ende vom Array trifft.

[baumina]

Ich gehe mal davon aus, dass du so eine Art "fertige Lösung" suchst. Wie wäre es z.B. damit? http://www.youtube.com/watch?v=FsI8cyhVbWw

[Back2Code]

Schau dir das mal an

http://delphi.about.com/od/gameprogr.../fdac_pong.htm

http://delphi.about.com/od/gameprogramming/

[DeddyH]

Stichwort für die Forensuche: Kollisionskontrolle, damit sollten sich etliche Beispiele finden lassen.

[karrax]

Es soll kein Pong sein nur so etwas ähnliches.
Als Ball wollte ich ein Shape verwenden und es Rund machen. Dieser Ball soll dann einfach im Bildschirm rumfliegen und wenn er gegen eine Wand prallt dann die Richtung ändern.
Dafür darf ich aber nue einen Timer verwenden

[DeddyH]

Dann pack doch einen Timer auf die Form und ändere innerhalb dessen OnTimer-Ereignisses die Position des Shapes. Wenn das klappt, implementiere noch die Kollisionskontrolle und fertig.

[karrax]

sorry das ich nachfragen muss aber habe erst seid sehr kurzem delphi. was genau soll ich denn in dem timer einstellen und wie mache ich das mit der kollision?

[DeddyH]

Du hast einen Timer und ein Shape. Für den Timer sind die Eigenschaften Enabled ("timern" oder nicht) und Interval (Zeit in Milisekunden zwischen 2 Auslösern) wichtig. Auf der "Ereignisse"-Seite des Objektinspektors kannst Du dann einen Doppelklick neben "OnTimer" machen, Delphi erstellt Dir dann das Code-Gerüst und weist gleichzeitig diese Methode dem entsprechenden Ereignis automatisch zu. So, innerhalb dieser Methode veränderst Du am Besten testhalber einfach nur mal die Position des Shapes (Left und Top ändern). Danach deklarierst Du Dir 2 Variablen für den gewünschten Versatz auf der X- und der Y-Achse und verwendest diese dann innerhalb der Timer-Methode. Zur Kollisionskontrolle musst Du dann nur noch die aktuellen Koordinaten und Dimensionen mit denen des Formular- bzw. Bildschirmrands vergleichen. Bei Kollision drehst Du dann nur noch das Vorzeichen der entsprechenden Variablen um.

[karrax]

Also ich hab geschaft das sich das Shape mit left unf top bewegt. aber bei dem rest blicke ich noch nicht so durch