Irgendwo muss
FFont mit einem Objekt "belegt" werden. Das sollte, wie bei Objekten, die aus anderen Objekten zusammengesetzt (aggregiert) sind, innerhalb des Konstruktors geschehe. zB so:
Delphi-Quellcode:
constructor TMyClass.Create;
begin
inherited;
FFont:= TFont.Create;
//.. some more initialization code
end;
Das Exemplar sollte dann spätestens im Destruktor wieder freigegeben werden
Delphi-Quellcode:
destructor TMyClass.Destroy;
begin
FreeAndNil(FFont);
inherited;
end;