Entwickler-Ecke

Algorithmen, Optimierung und Assembler - Pong KI


Leuchtturm - Sa 07.10.06 13:43
Titel: Pong KI
Hi,
ich habe mir mal die PongKI [http://www.delphi-library.de/viewtopic.php?t=60727] angekuckt.
Das Programm wird anstandslos compilierd aber es funktioniert nicht :?
Ich habe das Programm mal im Anhang, dieses ist aber noch ohne Wandkolission meinerseits :wink:

Zum Problem:
Ich glaube das es so auch nicht funktionieren kann weil ich den Ball als TSimpleObject erstelle und dann als Record bewegen will.
Was müsste ich da ändern :?:
Ich kapiers nähmlich nicht ganz wie das funktioniert :lol:
Danke im Vorraus
Leuchtturm
:wave:


F34r0fTh3D4rk - Sa 07.10.06 14:16


Delphi-Quelltext
1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
type
  TBall = class(TSimpleObject)
    constructor Create;
    destructor Destroy;
    procedure Free;
  private
    Fradius: integer;
    procedure SetRadius(Value: integer);
  public  
    velocity: TVector2D;
    property radius: integer read Fradius write SetRadius;  
  end;


dan schreibst du in SetRadius die änderungen für width und height rein und fertig ist das ganze.


mfg


Leuchtturm - Sa 07.10.06 14:28

Warum sind im folgenden Code(gehighlightet):

Delphi-Quelltext
1:
2:
3:
4:
5:
6:
7:
    
     constructor Create; 
     destructor Destroy; 
     procedure Free; 
  private
    Fradius: integer;
     procedure SetRadius(Value: integer); 

folgende Fehler
Fehler hat folgendes geschrieben:
Ungenügende Forward- oder External-Deklarationen:'TBall1.Create'
Ungenügende Forward- oder External-Deklarationen:'TBall1.Destroy'
Ungenügende Forward- oder External-Deklarationen:'TBall1.Free'
Ungenügende Forward- oder External-Deklarationen:'TBall1.SetRadius'
??


Marco D. - Sa 07.10.06 14:35

Weil du diese Methoden nicht definiert hast, sprich du musst sie mit Inhalt füllen:

Delphi-Quelltext
1:
2:
3:
4:
5:
constructor TBall.Create;
begin
//blubb
end;
usw.


F34r0fTh3D4rk - Sa 07.10.06 14:35

http://www.christian-stelzmann.de/artikel/crashkurs.htm


Leuchtturm - Sa 07.10.06 14:50

Danke:

Delphi-Quelltext
1:
2:
3:
4:
constructor TBall1.Create;
begin
inherited Create();
end;

FEHLER hat folgendes geschrieben:
nicht genügend wirkliche Parameter
:gruebel:
Ich weiß nicht was da hinsoll.

Ich habe auch in der Deklaration keine weiteren Parameter angegeben


F34r0fTh3D4rk - Sa 07.10.06 15:16

user profile iconLeuchtturm hat folgendes geschrieben:
Danke:

Delphi-Quelltext
1:
2:
3:
4:
constructor TBall1.Create;
begin
inherited Create();
end;

FEHLER hat folgendes geschrieben:
nicht genügend wirkliche Parameter
:gruebel:
Ich weiß nicht was da hinsoll.

Ich habe auch in der Deklaration keine weiteren Parameter angegeben


user profile iconF34r0fTh3D4rk hat folgendes geschrieben:
http://www.christian-stelzmann.de/artikel/crashkurs.htm