在Delphi中,可以将接口绑定到不实现的对象

让我说我有以下界面：

IMyInterface = interface
  ['{8A827997-0058-4756-B02D-8DCDD32B7607}']
    procedure Go;
  end;

在编译器的帮助下,是否可以在运行时绑定到此接口？

TMyClass = class(TObject,IInterface)
public
  function QueryInterface(const IID: TGUID; out Obj): HResult; stdcall;
  function _AddRef: Integer; stdcall;
  function _Release: Integer; stdcall;
  procedure Go; //I want to dynamically bind IMyInterface.Go here
end;

我试过一个简单的硬盘：

var MyInterface: IMyInterface;
begin
  MyInterface := IMyInterface(TMyClass.Create);
end;

但是编译器阻止了这一点.

然后我尝试一个cast,至少编译：

MyInterface := TMyClass.Create as IMyInterface;

所以我想象的关键是让QueryInterface返回一个有效的指针到被查询的接口的实现.在运行时如何构建一个？

我已经通过System.pas挖掘了,所以我至少对GetInterface,GetInterfaceEntry和InvokeImplGetter的工作方式很熟悉. (非常感谢Embacadero选择离开pascal源与优化的程序集).我可能没有正确阅读,但似乎可以有一个偏移量为零的接口条目,在这种情况下,有一种替代方法使用InvokeImplGetter分配接口.

我的最终目标是模拟一些具有反思支持语言的动态代理和嘲讽的能力.如果我可以成功地绑定到具有与接口相同的方法名称和签名的对象,那将是一个很大的第一步.这是甚么可能的,或者我正在树上错误的树？