unit Unit1; interface {接口部分开始} uses {引用单元列表,这是可选的,如果包含必须紧跟interface关键字} {接口部分声明常量/类型/变量/过程和函数,这些声明对引用单元就像自己的声明一样} {在接口部分声明的过程和函数,就像使用了forward关键字} var Form1 :TForm1; Function Ex():Interger; //外部调用,叫什么不知道 //如果函数在此单元声明后,需要给其他单元调用,需要先在这里( interface )区声明 {接口部分结束} implementation {实现部分} uses {如果包含uses字句,必须紧跟关键字implementation} {在这里实现interface中定义的过程和函数,可以任意顺序的定义和调用.} {在这里可以省略过程和函数的列表,如果包括,必须一样.} {可以定义单元私有的常量/类型(包括类)/变量/过程和函数,但这些对引用单元的客户是不可见的} {$R *.dfm} {如果是对应窗体的单元文件,会有这句. $R 指令用于加载一个外部资源文件, 这里是指加载同名的窗体文件一起编译.} initialization {初始化部分} {程序启动时先执行,并顺序执行} {一个单元的初始化代码运行之前,就运行了它使用的每一个单元的初始化部分} finalization {结束化部分,程序结束时执行} end.
转载说明:
声明:未作说明,则本文为代码至上原创。转载务必注明出处。
注意:转载须保留全文,如需修改请 联系作者。
本文永久地址:http://codeup.org/archives/113