Im Konstruktor virtuelle Methode aufrufen?

**DGL-luke**

Hallo,

funktioniert der folgende Quelltext?

Delphi-Quellcode:

			initialization

type

  TAbstrakt = class

  public

    constructor Create;

    procedure VirtualInit; virtual; abstract;

  end;

  TKonkret = class

  public

    procedure VirtualInit; override;

  end;

implementation

constructor TAbstrakt.Create;

begin

  DoSomethingUseful;

  VirtualInit;

end;

procedure TKonkret.VirtualInit;

begin

  DoSomethingEleAsUseful;

end;

Dass TAbstrakt.Create mit einem abstrakten Error fehlschlägt, ist klar; wie sieht es mit TKonkret.Crete aus? Ich werd das jetzt natürlich ausprobieren, aber meine Klassen sind schon ziemlich dick, deswegen ist das Debuggen nicht mehr so leicht, wenn plötzlich aus heiterem Himmel irgendwo ein Abstrakter Error auftaucht...

Im Konstruktor virtuelle Methode aufrufen?

Im Konstruktor virtuelle Methode aufrufen?

Forumregeln