Klasse inkl. aller Unterklassen als Parameter übergeben

[Furtbichler]

Zitat von implementation:

Wie wäre es mit sowas?

Delphi-Quellcode:

type
  TElternklasse = class; // <<--- Diese Zeile ist markiert (siehe Frage weiter unten)

  TKindklasse1 = class(TElternklasse)
    ...
  end;

  TKindklasse2 = class(TElternklasse)
    ...
  end;

  TElternklasse = class
  private
    FKind1: TKindklasse1;
    FKind2: TKindklasse2;
  public
    property Kind1: TKindklasse1 read FKind1;
    property Kind2: TKindklasse2 read FKind2;
  end;

Wozu dient die Vorwärtsdeklaration? (markierte Zeile)?