Animal2 := TAnimalClass(Animal1.ClassType).Create;
Will man den Constructor überschreiben, dann muß bei sowas natürlich spätestens in diesem Basistyp das als VIRTUAL (oder DYNAMIC) deklariert sein, und in den Nachfahren natürlich OVERRIDE.
Ein Therapeut entspricht 1024 Gigapeut.