Wozu hat ein Object einen Constructor und einen Destructor ?
Delphi-Quellcode:
TSpielkarte = class(TGraphicControl)
private
FKartenListe: TImageList;
protected
public
constructor Create(AOwner: TComponent); override;
destructor Destroy; override;
published
end;
constructor TSpielkarte.Create(AOwner: TComponent);
begin
inherited;
FKartenListe := TImageList.Create(self);
FKarenListe.Height := 128; // Kartenliste füllen
[...]
end;
destructor TSpielkarte.Destroy;
begin
FKartenListe.Free;
inherited;
end;