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