Freigabe von Objekten in Objekten

[himitsu]

Delphi-Quellcode:

Objekt1 := TObjekt1.Create(ZuBenutzendesFormular,1);
Objekt1 := TObjekt1.Create(ZuBenutzendesFormular,2);

Eine Variable, aber 2 Objekte ... ergo, wwird das 1. nie freigegeben, da dessen Referenz durch das Zweite überschrieben wird !

der Owner (Besitzer) von Objekt 2 ist ja wohl das Objekt 1
Objekt2 := TObjekt2.Create(Self);