1:
2:
3:
4:
5:
6:
7:

type
  TParticle = class(TObject)
  constructor Create(iPosX, iPosY,iSx,iSy: Integer);
  procedure paint;
  destructor Destroy;
  PosX,PosY,Sx,Sy : Integer;
  end;                    

1:
2:
3:
4:
5:
6:

constructor TParticle.create(iPosX, iPosY,iSx,iSy: Integer);
begin
  Inherited Create;
  PosX := 0;
...
end;                    

Ebil - So 23.11.08 16:20

---

Oh mist du hattest recht.
Ich hatte einfach paricle[I].create und nicht
particle[I] := Tparticle.create...

Danke ;D

Ebil

Moderiert von matze: Delphi-Tags hinzugefügt

Entwickler-Ecke.de based on phpBB
Copyright 2002 - 2011 by Tino Teuber, Copyright 2011 - 2025 by Christian Stelzmann Alle Rechte vorbehalten.
Alle Beiträge stammen von dritten Personen und dürfen geltendes Recht nicht verletzen.
Entwickler-Ecke und die zugehörigen Webseiten distanzieren sich ausdrücklich von Fremdinhalten jeglicher Art!