Hallo Leute,
ich habe irgendwie ein kleines Problem beim Löschen aus meiner TOjectlist. Rufe ich im Destructor das Delete auf, bekomme ich eine Zugriffsverletzung. Ersezte ich delete durch free (ohne Schleife) bekomme ich den gleichen Fehler. Ich blicks irgendwie nicht.
Dankbar für jeden Tip.
Delphi-Quellcode:
type TStreamlist= class (TObjectlist)
private
FStreamObjectList:TObjectlist;
.....
constructor TStreamlist.create;
begin;
inherited create;
FStreamObjectList:=TObjectList.Create(true);
end;
destructor TStreamlist.destroy;
begin;
while FStreamObjectList.Count>0 do
begin
FStreamObjectList.delete(0); {Zugriffsverletzung}
end;
inherited Destroy;
end;