Räumt SetLength(A,0) auch Objekte auf?

[Uli]

Hallo,
hier mal wieder ein typische Anfänger Frage.
Räumt SetLength(A,0) auch Objekte auf?
Beispiel:

var A: array of TObject;
begin
SetLength(A, 1);
A[0].Create();
...
SetLength(A, 0);
end.

Wird A[0].Free beim "entfernen" des dynamischen Arrays automatisch aufgerufen?
Ich vermute ja, ich muss das selber tun, bevor ich SetLength(A, 0) aufrufe.

[theo]

Ich vermute ja, ich muss das selber tun, bevor ich SetLength(A, 0) aufrufe.

Du vermutest richtig. Die Objekte könnten ja auch anderswo noch gebraucht werden.
Besser eignet sich TObjectList
http://www.freepascal.org/docs-html/fcl ... tlist.html" onclick="window.open(this.href);return false;
Wenn du OwnsObjects auf true setzt, werden diese "gefreed".

Ich verstehe sowieso nicht, wieso sich v.a. Neulinge immer mit Arrays abmühen. Es gibt doch wunderbare Klassen, die das alles fehlerunanfällig erledigen.

[mschnell]

Automatisches free für gespeicherte Instanzen gibt es nur bei bei TObjectList, wenn die entsprechende Option gesetzt ist.

-Michael

[Uli]

Danke für Eure Antworten.
Ich stamme noch aus dem Zeitalter, wo bei 64K Speicher Schluss war und man verkettete Listen noch selber mit Pointern realisieren musste. Vielleicht wird es Zeit, dass ich mal langsam im 21 Jahrhundert ankomme und mehr Klassen nutze.

[marcov]

Ich vermute ja, ich muss das selber tun, bevor ich SetLength(A, 0) aufrufe.

Du vermutest richtig. Die Objekte könnten ja auch anderswo noch gebraucht werden.
Besser eignet sich TObjectList
http://www.freepascal.org/docs-html/fcl ... tlist.html" onclick="window.open(this.href);return false;
Wenn du OwnsObjects auf true setzt, werden diese "gefreed".

Ich verstehe sowieso nicht, wieso sich v.a. Neulinge immer mit Arrays abmühen. Es gibt doch wunderbare Klassen, die das alles fehlerunanfällig erledigen.

Und sich durch 26 Ebenen von Notifier wursteln, und noch immer nicht skalieren. IMHO sind die Container Klassen einer die Schwachpunkte von Delphi/Lazarus

[theo]

@marcov: Du kommst immer mit so pingeligen Performance Argumenten wenn man Neulinge auf den richtigen Pfad bringen will.
Natürlich hast du im Prinzip recht, aber oft spielt das doch gar keine Rolle. Assembler wäre natürlich noch besser.