Inherited "überspringen"?

[Uwe Raabe]

Zitat von hoika:

Oberklasse(Self).proc;

Das geht in jedem Fall schief, da du damit auch nur die virtuelle Methode, also wieder Unterklasse2.Proc, aufrufst und so in einen Stack-Overflow läufst.

Die einzige Möglichkeit, die mir dazu einfällt ist schon arg bösartig:

Delphi-Quellcode:

procedure Unterklasse2.Proc;
begin
  asm
    mov eax,self
    call Oberklasse.Proc
  end;
//  inherited;
  Writeln('Unterklasse2');
end;