DPR中处理Procedure A与Procedure B互相调用的方法

在DPR文件里遇到两个过程互相调用的情况，因为没有interface部分做提前声明，直接写会触发编译错误——编译器处理第一个过程时，不知道另一个过程的存在。解决这个问题最直接的方式是使用前置声明（forward declaration），具体写法如下：

procedure B; forward; // 先声明B的存在，告诉编译器后续会有完整定义

procedure A;
begin
  ...
  B; // 此时编译器已经知道B的存在，不会报错
  ...
end;

procedure B;
begin
  ...
  A;
  ...
end;

原理很简单：forward关键字会让编译器先记录这个过程的名称和参数（这里无参数），等后面遇到该过程的完整实现时，再把声明和定义关联起来。你也可以选择前置声明A，把procedure A; forward;放在B的实现前面，效果完全一致。

如果项目结构允许，也可以把这两个互相调用的过程提取到单独的单元中，在单元的interface部分声明两个过程，然后在DPR里引用该单元，这种方式更符合Delphi的代码组织习惯，但如果一定要把代码留在DPR里，前置声明是最优解。

内容的提问来源于stack exchange，提问作者zeus