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.