TProc的内部(存储器)表示和参考

Question

有没有人知道Delphi如何代表程序的参考？

例如

var
  proc: TProc;
...
proc = procedure begin beep end;

我们在"proc"中得到了什么？

我知道对于"方法变量","过程地址"的内存表示是4个字节,"对象地址"后面是4个字节,但是"对过程的引用"有些不同,我无法弄明白.

我想要这个的原因是因为我有一些遗留代码,我想让它与引用一起工作.

有人知道吗？

Answer 1

方法引用实现为COM样式的接口,其中一个方法被调用Invoke,它具有与方法引用相同的签名.

所以TProc看起来像这样:

type
  TProc = interface(IInterface) // so inherits QI, AddRef, Release
     procedure Invoke;
  end;

这是一个有效的问题,因为Delphi与C++产品具有互操作性.通过使用预先存在的引用计数类型和习惯用法(COM生存期规则),可以在方法参考级别与C++互操作.

匿名方法生成一个隐藏类,该类实现与方法引用接口同构的接口,即完全相同的形状,但不具有相同的符号标识.隐藏类不直接实现方法引用接口,因为它可能需要多次实现接口(单个块可能包含多个匿名方法,所有方法都分配给相同方法引用类型的位置).