Ergebnis der Suchanfrage

• Forum: Object-Pascal / Delphi-Language

  Re: Hund, Katze und das Klonen von Tieren (OOP-Problem)

    Delphi
    by Khabarakh, 15. Apr 2008
  Wenn du nur eine neue Klasse eines Typs erstellen willst, geht das über Metaklassen:
  TTierKlasse = class of TTier;
  
  class function TKlonerei.Clone(Tier: TTier): TTier;
  begin
  // ohne Cast würde TObject.Create aufgerufen werden
  result := TTierKlasse(Tier.ClassType).Create;
  end;
  Wenn du stattdessen eine Instanz wirklich kopieren willst, wird's schon etwas komplizierter. Als Pattern gibt...