Delphi-Quellcode:
TMeineKlasse = class(TDieKlasse)
end;
TMeineKlasseHelper = class(TAndereKlasse) helper for TMeineKlasse
end;
Quasi so, sozusagen indirekte Mehrfachvererbung.
//Edit:
Mach es grad über verschachtelte Klassen, Helper wäre aber eleganter gewesen.