Auf ein als "private" deklariertes Interface zugreifen

[Apollonius]

Das geht aber so nicht, Markus. Erstens gibt es zu Feldern keine Direktiven. Zweitens darfst du gerade keinen as-Cast verwenden, da das Objekt ja nicht wirklich vo Typ TClassOneH ist. Funktionieren würde es so:

Delphi-Quellcode:

TClassOneH = class //nicht ableiten!
  FInterface: IInterface; //Deklaration kopieren
end; 

procedure TClassTwo.DoSomething;
begin
  TClassOneH(Klasse1).FInterface.DoSomethingElse;
end;