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

时间:2011-07-04 13:50:09

标签: delphi reference

有没有人知道Delphi如何代表对程序的引用?

例如

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

我们在“proc”中得到了什么?

我知道对于“方法变量”,“过程地址”的内存表示是4个字节,“对象地址”后面是4个字节,但是“对过程的引用”有些不同,我无法理解它进行。

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

有人知道一些事情吗?

1 个答案:

答案 0 :(得分:10)

方法引用实现为COM样式的接口,其中包含一个名为Invoke的方法,该方法与方法引用具有相同的签名。

所以TProc看起来像这样:

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

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

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