Ist doch ganz einfach:
Objekte sind Pointer.
Du machst also folgendes:
Delphi-Quellcode:
MyObject := TObject.Create; // Ein Objekt erstellen
for i := 0 to 100 do
MyOtherObject.setObject (Myobject); // Jedem Objekt diesen Pointer geben
MyObject.Free;// Dieses Objekt freigeben
Merkst du was ? Du gibst am Ende das Objekt frei, af das die Klassen im Array nacher nochg zugreifen möchten.
Du müsstest das .Free weglassen, und stattdessen FreeAndNil (FObj) im destzructor von TField aufrufen.
jfheins
Ups, wo war der rote Kasten ...
