Delphi 项目结构

 

 

unit的结构：

//单元标头             unit Name：

 

 

//interface区 

uses子句区域           #include。声明资源文件。

{uses Dialogs；}

自定义单元的引用：

uses 

unit1 in 'path' {Form1};

 

const

type                    相当于class，独立的

procedure()        //procedure不能有返回值。

                 //[Error] Unit1.pas(15): Unsatisfied forward or external declaration: 'TForm1.getpt'；要想函数被其他单元使用，要在Var声明，

 

var

 

//implementation区    单元私有

         //枚举类型要放在函数或者过程之外声明。

只有实现过程和函数。//如果在interface里面没有写上声明。函数或者过程将是私有。

在里面不能有begin...end的语句，在过程或者函数之前。 '.' expected but 'FUNCTION' found；

但是可以放在最后。

 

 {$R *.res}

//initialization区    程序的最初入口

 

 

 

 

 

//finalization区    

 

 

 

//end.

 

 

 

---

unit：unitName；

 

     interface:

    {接口部分开始}

 

    uses:

  {声明引用的单元列表，相当于包含头文件，如果声明的话必须紧跟在interface之后}

 {声明变量、常量、类型、过程和函数，相当于提前声明}

 

 

{接口部分结束}

implementation:

{实现部分开始}

uses:

{定义过程和函数的实现，必须接跟implementation之后}

{变量、常量、过程、函数列表，如果写的话，要与interface一致。}

{定义单元私有的变量、常量、过程和函数，这部分对于用户是不可见的。}

 

{$R *.dmf}

 

 

initialization:

{程序的最初入口}

 

finalizaton:

{在程序结束时，要做的事情}

 

end.