Einzelnen Beitrag anzeigen

Benutzerbild von Phoenix
Phoenix
(Moderator)

Registriert seit: 25. Jun 2002
Ort: Hausach
7.606 Beiträge
 
#3

Re: Richtig/sauber freigeben - nur wie?

  Alt 7. Okt 2009, 11:39
Zitat von LDericher:
Delphi-Quellcode:

  TFontSpecification = record
    FontID: integer;
    Family: TFontFamily;
    Name: string;
  end;

  TFontSpecificationArray = array of TFontSpecification;

  TFontTable=class
  private
    fontSpecifications: TFontSpecificationArray;
    {...}
  end;
Das ist das, was ich als erstes machen würde
Aber davon mal abgesehen, das SetLength auf 0 sollte den Speicher defakto auch wieder freigeben.

Ausser natürlich, TFontFamily ist ein Objekt oder ein Struct, welches Objekte enthält.
Das bedeutet, du müsstest dann vorher im Destruktor deiner Table durch fontSpecifications durchlaufen und alle Objekte in dem Array manuell freigeben.
Betrifft wie gesagt nur Objekte - Structs und Wertetypen sind aussen vor, die werden sofort sauber freigegeben.
Sebastian Gingter
Phoenix - 不死鳥, Microsoft MVP, Rettungshundeführer
Über mich: Sebastian Gingter @ Thinktecture Mein Blog: https://gingter.org
  Mit Zitat antworten Zitat