Allgemeine Frage zu Listen.

[ngott2]

Hallo,
ich hätte mal eine allgemeine zu einer Tobjectlist.
Wenn ich zu einer Liste Objekte hinzufüge (OwnsObjects ist true)
und die Liste nachher mit Freeandnil wieder freigebe müsste er den Speicher doch eigentlich wieder Freigeben oder ?
Die werden mir danach aber immer noch als Memleak angezeigt und der Destructor der Objekte wird auch nicht aufgerufen.

Hat jemand eine Idee warum der Destructor nicht aufgerufen wird und es immer noch Speicherleaks gibt ?

Gruß,
ngott2

[BUG]

Ich denke das ist eine Frage wo ein minimales Beispielprogramm (klein(st)es Programm wo dieser Fehler auftritt) nützlich wäre.

[baumina]

Objekte, die du erzeugst, musst du auch wieder freigeben, unabhängig davon, ob du diese auch noch zusätzlich in einer Objektliste führst.

[Der schöne Günther]

Doch, das ist doch grade der Sinn einer TObjectList- Die Objekte gehören dieser Liste. Wenn die Liste zerstört wird, zerstört sie auch alle Objekte die ihr gehören.

Ist ja nicht anders wie bei einem Formular- Der gehören die darauf enthaltenen Komponenten auch.

[Bjoerk]

Wenn es eigene Objecte sind, die der Liste hinzugefügt werden. Haben die einen destructor und wenn ja hast du das override dort vergessen?

[baumina]

Stimmt, ich nehm alles zurück und behaupte das Gegenteil

Zitat:

Ist die Eigenschaft OwnsObjects auf true gesetzt (Voreinstellung), verwaltet TObjectList den Speicher seiner Objekte, das heißt, ein Objekt wird freigegeben, wenn sein Index neu zugewiesen wird, wenn es mit der Methode Delete, Remove oder Clear aus der Liste entfernt wird oder wenn die Instanz TObjectList selbst aufgelöst wird.

[haentschman]

Moin...

Zitat:

Die werden mir danach aber immer noch als Memleak angezeigt und der Destructor der Objekte wird auch nicht aufgerufen.

...das ist mir noch nie vorgekommen.
Folgende Ideen dazu:
1. Du überschreibst den Listeninhalt mit neuen Objekten. Dann wird das ursprüngliche Objekt nicht entfernt beim Zerstören der Liste.
2. Die Wahrscheinlichkeit geht gegen 0 das das FreeAndNil verantwotlich ist. Versuche mal nur Free.

...ansonsten kann man dir, wie schon gesagt, nur helfen mit ein wenig Quellcode.

[mkinzler]

Zitat:

1. Du überschreibst den Listeninhalt mit neuen Objekten. Dann wird das ursprüngliche Objekt nicht entfernt beim Zerstören der Liste.

Zitat:

...das heißt, ein Objekt wird freigegeben, wenn sein Index neu zugewiesen wird

Zitat:

2. Die Wahrscheinlichkeit geht gegen 0 das das FreeAndNil verantwotlich ist. Versuche mal nur Free.

FreeAnNil( obj); ruft obj.Free auf

[Sir Rufo]

Minimalst sollte es so aussehen

Delphi-Quellcode:

TFoo = class
public
  destructor Destroy; override;
end;

destructor TFoo.Destroy;
begin
  inherited;
end;

procedure Test;
var
  LList : TObjectList<TFoo>;
begin
  LList := TObjectList<TFoo>.Create;
  try
    LList.Add( TFoo.Create );
  finally
    FreeAndNil( LList );
  end;
end;
end;