Zitat:
FreeAndNil(objectlist);
ich habe es entsprechend geändert.
Aber geändert hat sich nichts.
Das ist der Vorgang zum löschen
Delphi-Quellcode:
procedure Tf_hauptform.Button2Click(Sender: TObject);
var i : integer;
begin
for I := objectlist.Count to ObjectList.Count - 1 do
begin
objectlist.Delete(i);
end;
FreeAndNil(objectlist);
end;
Roland