Ist Vererbung streng linear?

[Neutral General]

Wie mkinzler schon gesagt hat: Sowas funktioniert in Delphi nicht.

Was du allerdings machen kannst ist ein eine Klasse auf Basis mehrerer Interfaces.

Also z.B.

Delphi-Quellcode:

type
  IOne = interface(IUnknown) 
    ['..']
    procedure One;
  end;

  ITwo = interface(IUnknown)
    ['..']
    procedure Two;
  end;

  TOneTwo = class(TInterfacedObject, IOne, ITwo)
  public
    procedure One;
    procedure Two;
  end;

Ist natürlich jetzt nicht so das was du wolltest aber naja. Sowas ähnliches halt

Gruß
Neutral General