Delphi-PRAXiS
Seite 2 von 2     12   

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Multimedia (https://www.delphipraxis.net/16-multimedia/)
-   -   Delphi Pong Spiel - Ball bewegt sich nicht (https://www.delphipraxis.net/92018-pong-spiel-ball-bewegt-sich-nicht.html)

fransa 13. Mai 2007 16:07

Re: Pong Spiel - Ball bewegt sich nicht
 
Ja hab ich :) Soviel weiß ich dann auch noch.

Nils_13 13. Mai 2007 16:49

Re: Pong Spiel - Ball bewegt sich nicht
 
Ich würde vorschlagen, dass du dich mal im Forum umhörst, so wird das nichts, vorallem, weil zumindest ich nicht ansatzweise ein Pong entdeckt.
Hier mal der verschönerte Code (ein Teil davon):
Delphi-Quellcode:
var
  frmMain : TfrmMain;
  d      : Integer = 5;
  f      : Integer;
  g      : Integer;
  x5      : Integer = 150;
  y5      : Integer = 100;
  x6      : Integer = 180;
  y6      : Integer = 130;

implementation

{$R *.dfm}

procedure TfrmMain.FormCreate(Sender: TObject);
begin
  img.Canvas.Brush.color := clWhite;
  img.Canvas.Rectangle(0, 0, 600, 400);
  img.Canvas.Brush.Color :=clMaroon;
  img.Canvas.Ellipse(x5, y5, x6, y6);
end;

procedure TfrmMain.FormKeyDown(Sender: TObject; var Key: Word;
  Shift: TShiftState);
begin
  img2.Canvas.Brush.Color := clNavy;
  img2.Canvas.Rectangle(100, 100, 150, 200);
  if (GetAsyncKeyState(VK_UP) <> 0) then
    img2.Top:=img2.top - d;
  if (GetAsyncKeyState(VK_DOWN) <> 0) then
    img2.Top:=img2.top + d;
end;

fransa 13. Mai 2007 17:04

Re: Pong Spiel - Ball bewegt sich nicht
 
Tut mir Leid, wenn ich das jetzt nicht verstehe, aber was ist daran anders?

Nils_13 13. Mai 2007 17:11

Re: Pong Spiel - Ball bewegt sich nicht
 
Ich will dir damit sagen, dass ich mich mit deinem Code auseinandergesetzt habe, ihn in meinen Codestil umgewandelt habe und nicht durchgestiegen bin. Außerdem ist das nur ein Vorschlag, wie du deine Codes übersichtlicher gestalten könntest. Später bleiben dir dadurch Fehler erspart.

fransa 13. Mai 2007 17:18

Re: Pong Spiel - Ball bewegt sich nicht
 
Okay danke.
Werde jetzt aber gehen und morgen in der Schule nochmal gucken.

fransa 15. Mai 2007 17:48

Re: Pong Spiel - Ball bewegt sich nicht
 
Also, dass der Ball sich bewegt, habe ich dann doch noch irgendwie hinbekommen, aber jetzt ist das Hauptproblem noch das Abprallen vom Schläger.
Der Schläger ist bei mir ein Image. Der Ball ist eine Ellipse. Muss ich dann die x/y Werte des Balles und den Schläger gleichsetzen oder müssen die sich überlappen oder wie macht man das?

fransa 15. Mai 2007 18:10

Re: Pong Spiel - Ball bewegt sich nicht
 
Dass der Ball sich bewegt, habe ich doch noch irgendwie hingekriegt, aber wie macht man das mit dem Abprallen vom Schläger?
Mein Schläger ist ein Image und mein Ball eine Ellipse.
Muss man die x/y- Werte mit dem Schläger gleich setzen oder wie macht man das?

.chicken 18. Mai 2007 14:27

Re: Pong Spiel - Ball bewegt sich nicht
 
Also, du musst nach jeder Bewegung des Balls prüfen ob er sich in dem Rechteck befindet.
Dazu prüfst du einfach ob er sich hinter der X-Linie des Rechtecks befindet. Wenn das der Fall ist prüfst du noch ob er sich zwischen Top und Bottom des Rechtecks befindet.
Ist das der Fall dann kehrst du einfach die X-Bewegung um.
Ist das nicht der Fall, dann hat der andere Spiele gepunktet ;-)

QuickAndDirty 18. Mai 2007 15:32

Re: Pong Spiel - Ball bewegt sich nicht
 
Wuste garnicht das das überhaupt mit image geht...hab immer Paintbox genutzt.


Alle Zeitangaben in WEZ +1. Es ist jetzt 22:12 Uhr.
Seite 2 von 2     12   

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