Zuweisung eines Methodenzeigers bei vererbten Interfaces

[dpg123]

Zitat von Olli73:

Warum nicht einfach

Delphi-Quellcode:

procedure TForm1.FormCreate(Sender: TObject);
var
  lB: MInterfB;
begin
  ShowMessage(factoryB.exec1);
  (*
  lB := self.factoryB;
  Self.getInterfA := MInterfA( lB );
  ShowMessage(self.getInterfA.exec1());
  *);
end;

Oder habe ich dein Problem falsch verstanden?

Das Ziel ist factoryB über den Datentyp MInterfA mit der Variable getInterfA an andere Programmteile zu übergeben. Der vorgestellte Code war nur ein Minimalbsp um das Problem zu veranschaulichen.