Einzelnen Beitrag anzeigen

Benutzerbild von mirage228
mirage228

Registriert seit: 23. Mär 2003
Ort: Münster
3.750 Beiträge
 
Delphi 2010 Professional
 
#3

Re: Ein mir unverständliches Problem ist aufegtaucht.

  Alt 10. Mai 2006, 16:08
Hi,

Du musst eine Klasse mit einem Delphi-Referenz durchsuchenconstructor erzeugen, nicht mit einer Prozedur (Edit: und in dieser musst Du auch nicht "Create" aufrufen )

Delphi-Quellcode:
type
  TBall = class(TObject)
  // der Rest...
  constructor Create(aX,aY,aVX,aVY,aR:Integer;acolor:TColor);
end;

// ..
procedure TForm1.FormCreate(Sender: TObject);
begin
  Basketball := TBall.Create(50,50,3,-4,10,RGB(255,255,0));
end;
Auch würde ich Dir empefehlen, die "BasketBall" Variable in den public Abschnittes des Forms zu velagern.
Außerdem solltest Du bedenken, dass es nicht besonders gut ist, wenn Du aus der TBall Klasse heraus auf die globale Form-Variable zugreifst. Es wäre besser, wenn Du dem TBall im Konstruktor noch einen TCanvas übergeben kannst, auf dem der Ball sich dann zeichnet.

mfG
imrage228
David F.

May the source be with you, stranger.
PHP Inspection Unit (Delphi-Unit zum Analysieren von PHP Code)
  Mit Zitat antworten Zitat