AGB  ·  Datenschutz  ·  Impressum  







Anmelden
Nützliche Links
Registrieren
Zurück Delphi-PRAXiS Sprachen und Entwicklungsumgebungen Sonstige Fragen zu Delphi Delphi Problem mit Kollisionsabfrage (erledigt)
Thema durchsuchen
Ansicht
Themen-Optionen

Problem mit Kollisionsabfrage (erledigt)

Ein Thema von malo · begonnen am 6. Jan 2005 · letzter Beitrag vom 7. Jan 2005
 
Benutzerbild von malo
malo

Registriert seit: 19. Sep 2004
2.115 Beiträge
 
#1

Problem mit Kollisionsabfrage (erledigt)

  Alt 6. Jan 2005, 16:51
Ich bin grad dabei einen kleinen Pong-Klon zu schreiben. Dazu hab ich eine Kollisionsabfrage geschrieben. Diese funktioniert auch soweit, nur die Handlung, wenn der Ball nicht getroffen wurde, wird nicht ausgeführt... Hier einmal der ganze Code mit Kollisionsabfrage:

Delphi-Quellcode:
if Ball.Top >= Schlaeger1.Top-25 then // Kollision mit Schlaeger 1
  begin
    if (Ball.Left < Schlaeger1.Left+Schlaeger1.Width) and (Ball.Left > Schlaeger1.Left) then
    begin
    Richtung := not Richtung;
    inc(y_move);
    end else
       begin // Ball nicht gefangen
       if Ball.Top = Schlaeger1.Top then begin

       Timer1.Enabled := false; // der Ball wird gestoppt
       ShowMessage('Spieler2 hat einen Punkt!');
       Ball.Top := 208; // Ball wird auf Startposition zurückgesetzt
       Ball.Left := 312;
       end;
    end;
  end;
Wo ist der Fehler darin? Ich find ihn einfach nicht
  Mit Zitat antworten Zitat
 


Forumregeln

Es ist dir nicht erlaubt, neue Themen zu verfassen.
Es ist dir nicht erlaubt, auf Beiträge zu antworten.
Es ist dir nicht erlaubt, Anhänge hochzuladen.
Es ist dir nicht erlaubt, deine Beiträge zu bearbeiten.

BB-Code ist an.
Smileys sind an.
[IMG] Code ist an.
HTML-Code ist aus.
Trackbacks are an
Pingbacks are an
Refbacks are aus

Gehe zu:

Impressum · AGB · Datenschutz · Nach oben
Alle Zeitangaben in WEZ +1. Es ist jetzt 07:46 Uhr.
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