Objekt kopieren

[alzaimar]

Natürlich, indem Du die einzelnen Elemente der Liste klonst. Es gibt ja die Eigenschaft Assign, die Du für die Listen-Elemente überschreiben könntest. Oder Du überschreibst die 'Assign'-Methode der Liste und erstellst Kopien.

Wir leiten unsere Objekte nicht von TObject ab, sondern von einem Nachfahren von TObject, dem wir dann eigene Grundfunktionalität beibringen. Eine davon ist die Clone-Methode (Funktion). Sie liefert eine exakte Kopie des Objektes. Nur das Objekt selbst weiss ja am Besten, wie es sich reproduziert (da würdest Du dir auch nicht reinreden lassen )

Eine Collection kann sich dann sehr einfach klonen:

Delphi-Quellcode:

Function TMyCollection.Clone : TMyCollection;
Var
  i : Cardinal;

Begin
  Result := TMyCollection.Create;
//  <Copy Attributes>
  For i:=0 to Count- 1 do
    Result.Add (Items[i].Clone);
End;

Eine weitere Möglichkeit ist es, die Klasse von TPersistent abzuleiten, um dann die Reader und Writer Methoden zu erweitern. Dann kannst Du eine Kopie anlegen, indem du das Quellobjekt in einen Stream schreibst, und dann in die Kopie reinlädst.