|
Registriert seit: 17. Jun 2009
616 Beiträge
|
AW: TObjectList.Free erzeugt AV
6. Feb 2015, 21:31
Delphi-Quellcode:
CompList.OwnsObjects := False;
try
CompList.Remove( AComponent );
finally
CompList.OwnsObjects := True;
end;
Wenn Du "CompList.Extract( AComponent )" nimmst, dann brauchst Du .OwnObjects nicht zu verändern und auch den "try finally" - Block kannst Du Dir sparen.
Programmieren ist die Kunst aus Nullen und Einsen etwas sinnvollen zu gestalten.
Der bessere Künstler ist allerdings der Anwender, denn dieser findet Fehler, welche sich der Programmierer nicht vorstellen konnte.
|