Delphi函数找不到对方

Question

我正在写使用多种功能的德尔福计划,但遇到了问题我叫一个功能DivS的使用我的其他功能InplementS在其代码和InplementS使用DivS它的代码中

现在,如果我DivS之前输入了函数的代码InplementS,则使用DivSin InplementS不会被标记为错误,但是使用InplementSin DivS的代码将IS标记为错误相同,反之亦然

我怎样才能让它一起工作？

提前致谢

Answer 1

两种可能性:

• 使用forward指令:

  implementation
  
  procedure B; forward;
  
  procedure A;
  begin
    B;
  end;
  
  procedure B;
  begin
    A;
  end;
  

• 在接口部分中至少声明其中一个:

  procedure B;
  
  implementation
  
  procedure A;
  begin
    B;
  end;
  
  procedure B;
  begin
    A;
  end;