Objectlist.Add(). überladen

[Lemmy]

Guten Morgen,

und man sollte vielleicht erwähnen, dass TObjectList von TList abgeleitet ist. Weiterhin sollte man erwähnen, dass es zwischen einem Zeiger und einer Instanz in Delphi keine wesentlichen Unterschiede vorhanden sind - eine Instanz ist im Grunde ein Zeiger auf die Objektstruktur. Deshalb passiert bei der Freigabe hier genau das:

Delphi-Quellcode:

  EinObjekt := TObject.Create();
    EinObjekt.Name := '1';
    Objektliste.Add(EinObjekt);
    {EinObjekt.Destroy;
    EinObjekt := nil;   Das Objekt in der Liste geht auch verloren!}
    EinObjekt := TObject.Create();
    EinObjekt.Name := '2';
    Objektliste.Add(EinObjekt);

Wenn Du "EinObject.Destroy" machst, dann gibts Du das Objekt frei - in der Liste ist aber immer noch die Adresse des Objektes gespeichert, das inzwischen aber nicht mehr existiert.

Grüße

[chaosben]

Und weil wir gerade bei den guten Ratschlägen sind:
Nimm doch eine TList/TObjectList aus der Unit Generics.Collections.
Da kannst du den Typ deiner Objekte angeben und sparst dir das casten.

//edit: Sorry ... seh grad deine Delphi-Version. (Generics funzen erst ab 2009) Vergiss meinen Kommentar einfach.

[himitsu]

Man sollte .Destroy aber nicht direkt aufrufen, sondern stattdessen .Free :angle2;

Zitat:

Generics.Collections

Ab Delphi 2010 (Generics eben)

Da Lazarus ja auch Generics bietet, wird sich das dort vermutlich auch irgendwo verstecken. (dieses nutzt der TE)

[DeddyH]

Ich sehe da etwas von Delphi 5

[himitsu]

Zitat von DeddyH:

Ich sehe da etwas von Delphi 5

Links im Profil: FreePascal / Lazarus

Die D5 sind hier im Subforum die Standardeinstellung, wenn man nix Anderes auswählt.
(darum hatte ich mir ja eigentlich mal im Bugtracker gewünscht, dieses abzuändern)