Item in TList ändern / aktualisieren

[Luckie]

Also so:

Delphi-Quellcode:

procedure TPageCollection.Insert(Index: Integer; Item: TImageEnVect);
begin
  self.Items[Index].Free;
  inherited Items[Index] := Item;
end;

procedure TPageCollection.Update(Index: Integer; Item: TImageEnVect);
begin
  self.Items[Index] := Item;
end;

Besten Dank für eure Hilfe.