Delphi项目构成之单元文件PAS

======================================================
注：本文源代码点此下载
======================================================

单元文件是pascal源文件,扩展名为.pas。

有三种类型的单元文件:

窗体/数据模块和框架的单元文件(form/data module and frame units),一般由delphi自动生成。

组件的单元文件(component units),由您或者delphi生成。

通用的单元文件(general-purpose units),有您创建。

下面让我们看看基本的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单元结束

用来执行启动和清理的代码,初始化中的任何代码在其单元载入内存时都要被执行,结束段中的任何代码在单元从内存中清理前都要被执行。

可以只有一个初始化段,但不能只有结束段,而没有初始化段。

======================================================
在最后，我邀请大家参加新浪APP，就是新浪免费送大家的一个空间，支持PHP+MySql，免费二级域名，免费域名绑定 这个是我邀请的地址，您通过这个链接注册即为我的好友，并获赠云豆500个，价值5元哦！短网址是http://t.cn/SXOiLh我创建的小站每天访客已经达到2000+了，每天挂广告赚50+元哦，呵呵，饭钱不愁了，\(^o^)/