Einzelnen Beitrag anzeigen

mkinzler
(Moderator)

Registriert seit: 9. Dez 2005
Ort: Heilbronn
39.851 Beiträge
 
Delphi 11 Alexandria
 
#7

Re: Auf ein als "private" deklariertes Interface z

  Alt 31. Aug 2008, 16:17
Oder verwende eine lokale Hilfsklasse in der 2. Unit:

Delphi-Quellcode:
implementation

TClassOneH = class( TClassOne)
private
   FInterface: IInterface; reintroduce;
end;

...

procedure TClassTwo.DoSomething;
begin
  (Klasse1 as TclassOneH).FInterface.DoSomethingElse; // Methode von FInterface ausführen
end;
Markus Kinzler
  Mit Zitat antworten Zitat