《2022年Delphi单元文件详解Delphi教程.docx》由会员分享，可在线阅读，更多相关《2022年Delphi单元文件详解Delphi教程.docx（7页珍藏版）》请在taowenge.com淘文阁网|工程机械CAD图纸|机械工程制图|CAD装配图下载|SolidWorks_CaTia_CAD_UG_PROE_设计图分享下载上搜索。
1、2022年Delphi单元文件详解Delphi教程 昨天敲了半天才出来的，想组成一个系列.供新手学习一下!(虽说我也是新手_) Delphi单元文件1.库单元文件头:其中声明白库单元的名字.2.Interface部分: 由保留字interface起先,结束于保留字implementation,它用来声明引用的单元,常量,数据类型,变量,过程和函数.在Interface部分声明的变量,常量,数据类型,过程,函数都可以供外部引用,对整个程序而言是共有的.也就是说,对于全部引用该单元的单元来说,这些声明都是可见和可访问的. 在Interface部分,只需写出过程和函数的首部,详细的定义是在下面的im
2、plementation部分给出的. Interface部分又可分为多个可选部分,分别为单元引入部分(uses),常量说明部分,类型说明部分,变量说明部分,过程和函数声明部分. 3.Implementation部分: Implementation部分分为两部分.一部分是声明部分,包括单元引用,常量,类型,变量,过程和函数的声明,这一点和Interface部分相像. 区分有两点: (1):在Implementation部分声明的只对本单元是公共的,可见的,其他单元即使引用了该单元,也不能访问它们. (2):在Implementation部分声明的过程和函数,不须要遵循先声明后定义的规则,而可以干
3、脆写出过程和函数的定义.另一部分是在Interface部分声明的过程和函数的定义. 4.Initialization部分: 用于初始化该库单元,此处的代码最先执行.假如多个库单元中包含Initialization部分,那么它们的执行依次就和Program的uses部分引用单元的出现依次是一样的. 5.Finalization部分: 通常用于释放Initialization部分安排的资源.假如多个库单元中包含Finalization部分,其执行依次和Initialization部分正好相反. unit MainFrm; {库单元文件头}interface {接口部分
4、}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
5、 *.dfm}procedure TForm1.FormCreate(Sender: TObject);var MyButton : TButton; beginpage MyButton := TButton.Create(self); MyButton.Parent := self; /告知创建方法在Form1中显示MyButton MyButton.Caption := 测试一; MyButton.OnClick := MyButtonClick; MyButton.Show; end;procedure TForm1.MyButtonClick(sender:TObject)
6、;begin Application.MessageBox(PAnsiChar(TButton(sender).Caption) ,Test Component); TButton(sender).Caption := 测试二; end;initialization {可选的初始化部分} / finalization {结束部分} / end. {End结束符}6.Sender参数: 看上面程序代码发觉事务处理程序的参数中,至少含有一个参数Sender,它代表触发事务处理程序的组件,有了Sender参数,可以使多个组件共用相同的事务处
7、理程序. 7.Self参数: Self是指所编的程序范围是在哪一个类中,Delphi中大都在窗体范围内编程,因此,Self即指窗体,假如在编写一个类或是一个组件,则Self指该类或该组件.我们在过程和函数的声明中可以看出Self是代表哪个组件,即Self代表.号之前的组件.另外应留意,Self只能用在类方法中,而不能用在过程或函数中.如下列是错误的: Function a1(B:Integer):Integer;begin.Button := TButton.Create(self);.end;8.Parent和Owner的区分: (1):Parent属性是指组件的包涵器,组件只能在此范围内显示和移动. (2):Owner属性是指组件的全部者,它负责组件的创建和释放.Create方法应带有表示组件 全部者的参数. (3):它们都是运行阶段的属性,只能通过代码设置.