Du bräuchtest quasi sowas:
Delphi-Quellcode:
type
THiddenClass = class
protected
procedure Irgendwas; virtual;
end;
TVisibleClass = class(THiddenClass)
public
procedure Irgendwas; inherited;
end;
Das gibt Delphi nicht her - wär aber ein nettes Enhancement.
Hätte aber
imho keinen wirklichen Nutzen, sondern unterstützt nur die Faulheit eines Programmierers in einigen wenigen Fällen.