Question

如何在Delphi中进行程序的前向声明并在其他地方实现？我想做这样的C代码，但是在Delphi中：

void FooBar();

void FooBar()
{
    // Do something
}

Answer 1

您可以使用forward指令执行此操作，如下所示：

procedure FooBar(); forward;

...
//later on

procedure FooBar()
begin
    // Do something
end;

只有在您将其声明为内部函数时才需要这样做。（即已经在你单位的implementation部分内。）任何声明为类的方法或单元的interface部分的内容，都被自动理解为向前声明。

Answer 2

通过单元的接口/实现部分，这是一种方法。

Unit YourUnit;

Interface

  procedure FooBar();  // procedure declaration


Implementation

// Here you can reference the procedure FooBar()

procedure FooBar();
begin
  // Implement your procedure here
end;

您还应该查看有关forward declarations的文档，其中提到了另一个选项，例如@MasonWheeler回答。

德尔福的程序正向声明

2 个答案: