typisierten Pointer abgeleiteter Klasse Basisklasse zuweisen

[mkinzler]

Bei Klassen brauchst du keine Zeiger, das die "Variablen" ja Referenzen(Zeiger) auf die Objekte sind.

Delphi-Quellcode:

type
  TMeineBasisklasse = class
  private
     ...
  public
     ...
  ...
  end;

  Subklasse1 = class( TMeineBasisKlasse)
  private 
      ...
  ...
  end;

...
var

  Obj1: TMeineBasisKlasse; //Referenz auf Basisklasse
  SubObj1: TSubKlasse; //Referenz auf Subobjekt 

...
  SubObj1 := TSubKlasse.Create;
  Obj1 := SubObj1; // Referenz auf Basisklasse kann Objekt der Subklasse referenzieren

Da eine IS-A Beziehung zwischen abgeleiteter Klasse und ihrer (oder einer) Basisklassen besteht, kann eine Objekt einer Subklasse immer wie ein Objekt der Basisklasse verwendet werden.