Constructor from Instance

[uligerhardt]

Zitat von Rollo62:

Sorry, aber warum will man sowas überhaupt machen, mir fällt dazu kaum ein Use-Case ein.
Bestenfalls wäre ein duplizieren einer Instanz, wozu ich dann immer eine explizite Methode ".Clone" dafür anlegen würde, die auch was entsprechend vorbereiten kann.

Naja, in Delphi ist es ja üblich, in Klassenhierarchien eine Methode Assign zu haben. Dann kannst du Clone so implementieren:

Delphi-Quellcode:

function TAnimal.Clone: TAnimal;
begin
  Result := TAnimalClass(ClassType).Create;
  Result.Assign(Self);
end;