TObjectList und Delete

[Sir Rufo]

1. Das Entfernen der Objekt-Instanzen (Free) erfolgt weder in der Methode Delete, noch in der Methode Remove, sondern in der Methode Notify, so wie das in der OH auch vermerkt ist für TList:
   

   Zitat von System.Classes.TList.Delete:

   Das Objekt kann freigegeben werden, indem die Methode Notify überschrieben wird

   Und genau das hat man bei der TObjectList so gemacht, man hat sich an die eigene Empfehlung gehalten
2. Bei Remove wird in der OH (ja, ist wohl suboptimal) nicht mitgeteilt, dass das wirkliche Entfernen durch den impliziten Aufruf von Delete erfolgt. In der Methode Remove wird nur über das Item der Index ermittelt und damit die Methode Delete aufgerufen.
   Damit gelten für Remove die gleichen Regeln wie für Delete

Genau für solche Momente (wo die OH Fragen offen lässt) lohnt sich eigentlich immer ein Blick in die Quellen:

Delphi-Quellcode:

procedure TList.Notify(Ptr: Pointer; Action: TListNotification);
begin
end;

procedure TObjectList.Notify(Ptr: Pointer; Action: TListNotification);
begin
{$IFNDEF AUTOREFCOUNT}
  if (Action = lnDeleted) and OwnsObjects then
    TObject(Ptr).Free;
{$ENDIF !AUTOREFCOUNT}
  inherited Notify(Ptr, Action);
end;