Problem mit Klasse (in Klasse)

[jfheins]

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 ...