Ich habe jetzt folgendes geändert aber das globale Objekt ist immernoch verfügbar:
Delphi-Quellcode:
destructor TFreeObjList.Destroy;
Var
i : Integer;
TmpObj : TObject;
begin
{for i:=0 to Count-1 do
begin
TmpObj := Objects[i];
if Assigned(TmpObj) then
FreeAndNil(TmpObj);
end; }
Inherited Destroy;
end;
procedure TForm4.FormCreate(Sender: TObject);
begin
MyObjList := TFreeObjList.Create;
MyObjList.OwnsObjects := True;
end;
Also hat sich eigentlich nichts dadurch geändert.
Was habe ich denn falsch gemacht bzw. falsch verstanden?
Gruß