Delphi-PRAXiS
Seite 3 von 3     123   

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Sonstige Fragen zu Delphi (https://www.delphipraxis.net/19-sonstige-fragen-zu-delphi/)
-   -   Brauche HILFE beim PingPong-Spiel!!!! (https://www.delphipraxis.net/60400-brauche-hilfe-beim-pingpong-spiel.html)

ste_ett 8. Jan 2006 21:01

Re: Brauche HILFE beim PingPong-Spiel!!!!
 
Zitat:

Code:
Panel1.Top := Panel1.Top - 2 // Hier nehme ich nicht dec, da es ja um zwei ernidriegt
                             // werden soll.

Properties kann man, wie oben schon gesagt nicht per "Dec()" ändern, aber das mit der Verringerung um mehr als 1 ist kein Problem. :)

Code:
var
  a: Integer;
begin
  Dec(a, 2);
end;

faux 8. Jan 2006 21:10

Re: Brauche HILFE beim PingPong-Spiel!!!!
 
Zitat:

Zitat von ste_ett
Properties kann man, wie oben schon gesagt nicht per "Dec()" ändern

Das liegt daran, dass eine Property den Rückgabewert einer Funktion zurück gibt. ;)

Laura100 9. Jan 2006 14:45

Brauche HILFE beim PingPong-Spiel!!!!
 
WOW!!!ihr seit echt hilfsbereit! :thumb:
ich komme echt gut voran!!DANKE,DANKE,DANKE!!!! :hello:
nur ein problem hab ich jetzt noch.

ich muss es irgendwie schaffen,dass der ball vom button (torwart) abprallt . ???
und das mit dem punkte zählen war noch nicht ausführlich genug erklärt... :oops: :oops: :oops:

Freu mich auf rückmeldungen!

euer LAURIENCHEN

MasterDG 9. Jan 2006 16:44

Re: Brauche HILFE beim PingPong-Spiel!!!!
 
Hallo

Also erst mal zum Punkte zählen. Du kannst ja abfragen ob der Ball auf der linken oder rechten Seite einen bestimmten Wert über- bzw unterschritten hat. Als Werte sollte man natürlich die Kanten der Schläger benutzen.

Also in etwa so:

Delphi-Quellcode:
//linker Schläger
if Ball.Left <= 34 then
begin
inc(torespieler1);
reset;//Hier musste halt alles wieder zurücksetzen
end;
Für den rechten Schläger musste des halt selber machen.


Also ich würde das mit dem Abprallen des Schlägers so machen(evt. hat ja jemand ne bessere Möglichkeit)

Delphi-Quellcode:
//linker Schläger
if (Ball.Left = 35) and (Ball.Top > Schläger.Top) and (Ball.Top < Schläger.Top + Schläger.Height) then
begin
//hier halt den Code zum abprallen an einer Kante
end;
Hoffe das hilft dir weiter. :-D

Gruß
MasterDG


Alle Zeitangaben in WEZ +1. Es ist jetzt 08:14 Uhr.
Seite 3 von 3     123   

Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz