forward [提前声明]

最新推荐文章于 2024-04-21 15:49:06 发布

seagull327

最新推荐文章于 2024-04-21 15:49:06 发布

阅读量537

点赞数

分类专栏：类类型文章标签： integer interface function

本文链接：https://blog.csdn.net/haiou327/article/details/6665399

版权

类类型专栏收录该内容

34 篇文章 0 订阅

订阅专栏

通常只在implementation部分使用。如果两个函数都在implementaion部分实现，而没有在interface部分声明才需要这个关键字。例如FuncA和FuncB要相互调用，为了让FuncA知道有FuncB存在，就在FuncA的前面先声明一次FuncB并加上forward。如果FuncB在interface中声明过了就不再需要了。

function FuncB(a: Integer): Integer; forward;

function FuncA(a: Integer): Integer;
begin
  Result := FuncB(a) + 12;
end;

function FuncB(a: Integer): Integer;
begin
  if (a > 99) then Result := 99
  else
    Result := FuncA(a) + 12;
end;