在线时间:8:00-16:00
迪恩网络APP
随时随地掌握行业动态
扫描二维码
关注迪恩网络微信公众号
单元文件是Pascal源文件,扩展名为.pas。 有三种类型的单元文件:
下面让我们看看基本的Pascal单元文件结构是如何的? Step1、在主菜单上选择【File | New | Unit】,Delphi将创建一个新的单元,并在Code Editor中显示出。 Step2、让我们来看看一个最简单的pascal单元,包括了四个关键字unit、interface、implementation和end; 比较全的单元如下,请看注释: unit Unit1; interface uses { List of units goes here } Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs; { Interface section goes here } type { type关键字用来声明一个新的类型} TMyArray = array[0..19] of Byte; { 声明TMyArray用来代替array[0..19] of Byte} const { const关键字用来声明常量} AppCation = 'Hello World'; { AppCation由于在interface段声明,它在单元的任何地方都可以用} var { var关键字用来声明变量,也分interface段和implementation段} X: Integer; MyArry: TMyArray; { MyArray为刚才定义的TMyArray新类型} procedure DoSomething; { 声明一个DoSomething过程} implementation uses { List of units goes here } SysUtils, Variants; var ObjList: TObjectList; const { BaseX,BaseY由于在implementation段声明,只能在单元内使用} BaseX = 20; BaseY = 200; { 实现interface段声明的DoSomething过程} procedure DoSomething; begin { Code for DoSomething goes here.} end; //C++风格的注释,只能用于单行注释 (* 相同类型注释不能嵌套 *) { 推荐使用的注释符号 } { Implementation section goes here } initialization { Initialization section goes here } ObjList := TObjectList.Create; finalization { Finalization section goes here } FreeAndNil(ObjList); end. uses单元引用 一个单元引用的外部单元清单,其中每个单元必须用逗号分开,最后一个单元必须加分号,分号表示该uses清单的结束。 interface接口段 用来生命这个单元的输出标识符,即能被其他单元访问的项。接口段以interface开始,以implementation结束。 implementation执行段 执行段以implementation开始,以下一个关键字结束,下一个关键字通常就是单元的最后关键字end。但在有初始化的单元中,下一个关键就是initialization关键字。 以上三个部分是unit单元必须要的。接下来两个关键字部分是可选的。 initialization单元初始化和finalizaiton单元结束 用来执行启动和清理的代码,初始化中的任何代码在其单元载入内存时都要被执行,结束段中的任何代码在单元从内存中清理前都要被执行。 可以只有一个初始化段,但不能只有结束段,而没有初始化段。 |
2023-10-27
2022-08-15
2022-08-17
2022-09-23
2022-08-13
请发表评论