函数的声明

 

    unit Unit1; interface uses ... private fun1(); //函数 声明 public end; var Form1: TDWForm; implementation {$R *.dfm} fun1(); //函数 实现 end;

 

     1、在interface部分 有声明的函数，可以在 单元体任何部分被调用，也就是说 fun1（）的实现部分，可以放在被调用部分后----此时，实现部分的函数 要加上 “本函数归谁所有”，即 Form1.fun1()

 

 

     2、或者，干脆不要声明，直接在implementation里写函数，但要注意的是，被调用的函数、过程要放在调用过程之前。