delphi 单元文件的说明 新浪

Delphi单元文件

　　1.库单元文件头:其中声明了库单元的名字.

　　2.Interface部分:

　　由保留字interface开始,结束于保留字implementation,它用来声明引用的单元,常量,数据类型,变量,过程和函数.在Interface部分声明的变量,常量,数据类型,过程,函数都可以供外部引用,对整个程序而言是共有的.也就是说,对于所有引用该单元的单元来说,这些声明都是可见和可访问的.

　　在Interface部分,只需写出过程和函数的首部,具体的定义是在下面的implementation部分给出的.

　　Interface部分又可分为多个可选部分,分别为单元引入部分(uses),常量说明部分,类型说明部分,变量说明部分,过程和函数声明部分.uses里是用来说明单元引入了哪些部分（包括其他单元和一些组件）；type里是用来申明有哪些类型的（包含申明类、过程等等）；var里是用来申明具体的变量和一些对象实例的。

　　3.Implementation部分:

　　Implementation部分分为两部分.一部分是声明部分,包括单元引用,常量,类型,变量,过程和函数的声明,这一点和Interface部分相似.

　　区别有两点:

　　(1):在Implementation部分声明的只对本单元是公共的,可见的,其他单元即使引用了该单元,也不能访问它们.

　　(2):在Implementation部分声明的过程和函数,不需要遵循先声明后定义的规则,而可以直接写出过程和函数的定义.另一部分是在Interface部分声明的过程和函数的定义.

　　4.Initialization部分:

　　用于初始化该库单元,此处的代码最先执行.如果多个库单元中包含Initialization部分,那么它们的执行顺序就和Program的uses部分引用单元的出现顺序是一致的.

　　5.Finalization部分:

　　通常用于释放Initialization部分分配的资源.如果多个库单元中包含Finalization部分,其执行顺序和Initialization部分正好相反.

下面是样例：

unit MainFrm; {库单元文件头}
　　interface　　 {接口部分}
　　uses　　　　
　Windows, Forms, StdCtrls;
　　type
　TForm1 = class(TForm)
　　procedure FormCreate(Sender: TObject);
　private
　　{ Private declarations }
　public
　　procedure MyButtonClick(sender:TObject);
　　{ Public declarations }
　end;
　　var
　Form1: TForm1;
　　implementation　{实现部分}
　　//uses
　　{$R *.dfm}
　　procedure TForm1.FormCreate(Sender: TObject);
var
　MyButton : TButton;
begin
　　MyButton := TButton.Create(self);
　MyButton.Parent := self;
//告诉创建方法在Form1中显示MyButton
　MyButton.Caption := '测试一';
　MyButton.OnClick := MyButtonClick;
　MyButton.Show;
end;
　　procedure TForm1.MyButtonClick(sender:TObject);
begin
　Application.MessageBox(PAnsiChar(TButton(sender).Caption)
　　　　　　　　　　　　,'Test Component');
　TButton(sender).Caption := '测试二';
end;
　　initialization　{可选的初始化部分}
　//
finalization　　{结束部分}
　//
　　end.　　　　　　{End结束符}

转载于:https://www.cnblogs.com/vov5601/p/4462033.html