"forward"为什么不能在public中声明?有什么用啊？请问

摘自Macro Cantu的Essential Pascal第六章－过程与函数
Forward 声明 
当使用一个标识符（任何类型）时，编译器必须已经知道该标识符指的是什么。为此，你通常需要在例程使用之前提供一个完整的声明。然而在某些情况下可能做不到这一点，例如过程A调用过程B，而过程B又调用过程A，那么你写过程代码时，不得不调用编译器尚未看到其声明的例程。欲声明一个过程或函数，而且只给出它的名字和参数，不列出其实现代码，需要在句尾加forward 关键字：procedure Hello; forward;
在后面应该补上该过程的完整代码，不过该过程代码的位置不影响对它的调用。下面的例子没什么实际意义，看过后你会对上述概念有所认识：procedure DoubleHello; forward;procedure Hello;
begin
  if MessageDlg ('Do you want a double message?',
      mtConfirmation, [mbYes, mbNo], 0) = mrYes then
    DoubleHello
  else
    ShowMessage ('Hello');
end;procedure DoubleHello;
begin
  Hello;
  Hello;
end;
上述方法可用来写递归调用：即DoubleHello 调用Hello，而Hello也可能调用DoubleHello。当然，必须设置条件终止这个递归，避免栈的溢出。上面的代码可以在例DoubleH 中找到，只是稍有改动。尽管 forward 过程声明在Delphi中不常见，但是有一个类似的情况却经常出现。当你在一个单元（关于单元的更多内容见下一章）的interface 部分声明一个过程或一个函数时，它被认为是一个forward声明，即使没有forward关键字也一样。实际上你不可能把整个例程的代码放在interface 部分，不过你必须在同一单元中提供所声明例程的实现。类内部的方法声明也同样是forward声明，当你给窗体或其组件添加事件时， Delphi会自动产生相应的代码。在TForm 类中声明的事件是forward 声明，事件代码放在单元的实现部分。下面摘录的源代码中有一个Button1Click 方法声明：type
  TForm1 = class(TForm)
    ListBox1: TListBox;
    Button1: TButton;
    procedure Button1Click(Sender: TObject);
  end;