深入Delphi (一)
工程文件
by machine
Delphi是我最喜欢使用的编程语言，功能强大，一般情况下均可代替C，并开放所有控件的源代码，很容易就可以编写自己的控件。而我最喜欢Delphi的地方就是编译速度非常快(Borland号称Delphi的编译器是世界上最快的)，能大大提高软件开发速度，所以我一般都使用Delphi，而不用Borland C++ Builder。
好了，废话说完了，为什么我要写这篇东西呢？市面上的Delphi教程已经够多的了，不过，有朋友抱怨说很多Delphi教程都是差不多，只是很表面的说说控件的使用，看完之后还想对Delphi有更深的了解，所以我就打算写一些一般书上没有提到的地方，就是这样，不过要有心理准备，我写东西真的很臭，又不懂如何顾及各种读者的要求，所以大家可能要反复看几次才能明白我到底想说什么呢。
首先要说说的是Delphi中一个project(工程)的结构。工程的主文件是必不可少的，扩展名为.dpr(Delphi PRoject)，格式跟一般的unit(单元)基本一样。然后在这个dpr中一般还要引用到其他的单元(在Delphi中使用“use”一词，类似C中的include)，这些单元文件一般以pas作为扩展名，格式当然就是从以前的Pascal扩展的。前面说到dpr的格式与单元文件的格式基本一样，而且dpr是整个工程程序的入口，与Pascal中是一模一样的！这在本章后面会详细说明。Delphi中使用菜单命令Project->View Source就可以查看到dpr中的内容。
另外如果工程中添加了form(窗体)，则还会有一些.dfm(Delphi ForM)文件，其实是包含窗体及其中控件属性的一个资源文件，也就是说可以像res文件一样打开。提到res文件，这种文件也是工程中常见的，里面包含程序图标、版本信息等资源，以后将会说明这种文件在不同场合的用途。
对应dpr文件一般还会有一个dof(Delphi OptionFile)和一个cfg文件。Dof文件中包含编译器、连接器的参数，以及其他在Delphi菜单命令Project->Options中可以设置的内容。Cfg文件是根据dof文件生成的编译器和连接器的命令行参数。
最后一种文件是dcu(Delphi Compiled Unit)文件，也就是已编译的单元文件，根据工程的编译器设置，里面一般还会包含调试信息等，默认设置是编译器生成调试信息到dcu中，但连接器不会把调试信息连接到exe里面。
以上的东西可能一时还不能理解，不过不要紧，我只是大概说一说。 上面说过，只有dpr文件是必不可少的，也就是说，一个工程可以只包含一个dpr文件，像“广外女生”和“广外幽灵”都是这样的。下面是一个非常简单的例子：
program Project1;
uses
Windows;
begin
MessageBox(0, '文件损坏！', nil, MB_OK or MB_ICONSTOP);
end.
编译运行这个工程，你会发现生成出来的文件非常小，不到20K！是不是很过瘾呢？哎呀，忘了说怎样建立一个这样的工程了。在Delphi中新建一个工程的时候，会自动添加一个窗体和单元，不过你可以把窗体和单元文件都关闭，并在Delphi问你是否保存的时候选择否，然后在菜单中选择Project->View Source打开工程文件，最后把里面的内容修改为上面例子中的那样就行了！
这个程序运行后会显示一个错误提示框，就像“女生”中的那样，按确定之后，程序就退出了。
源代码应该是够容易理解的了，很显然，程序从begin处开始执行，到end.处结束，中间只做了一件事情，就是调用MessageBox这个API函数显示一个消息框，由于MessageBox这个函数是在Windows这个单元中声明的，所以必须把单元名称Windows添加到uses语句中。
什么叫声明(declare)呢？声明就是向Delphi描述一样它不知道的东西。在Delphi中可以声明自定义的数据类型(data type)、函数(function)、过程(procedure，与函数类似，但没有返回值)及变量(variable)和常量(constant)。其中很多人搞不清数据类型与类(class)的区别，其实如果会C++的人都知道，class与structure一样，都是数据类型中的一种，但这种数据结构很特殊，是数据的集合，也就是说，类里面可以包含多个数据域(field)。Record(记录)也是一种集合数据类型，但类还有继承等特性(class一词本身就有分级的意思，但不知道是谁首先翻译成类的)。像下面这个声明：
type TColor24 = record
Red: Byte;
Green: Byte;
Blue: Byte;
end;
定义了一种新的数据类型，指明这种数据类型的名称为TColor32，属于记录(record)，并定义其成员内容Red、Green和Blue的名称和数据类型，总之，就是告诉Delphi这种数据类型的结构，以使Delphi知道如何储存这种数据类型的变量。有关数据类型以后将详细说明。
声明数据类型使用关键字type，声明变量则使用关键字var，比如：
var RGBColor: TColor24;
声明一个变量RGBColor，并指明该变量的数据类型为TColor24(前面声明的数据类型，自定义的数据类型可以像Delphi预定义的一样使用)。所谓声明变量，就是告诉Delphi要为该变量分配其数据类型所需的内存(这就是为什么一定要指明数据类型的原因)，并记录该内存的地址，以便存取该变量的时候，存取相应分配的内存。这种对应是由编译器完成的，学VB的朋友可能对数据类型和内存分配并不太关心，但我觉得知道这些还是很有好处的！数据类型有时候还会决定函数中的参数如何传递，这个以后再说。好了，最后再说一句，变量只是一个名称，决定这个变量特性的是它的数据类型。
声明常量的关键字是const。声明常量与声明变量十分相像，只是除了要指明常量的名称和数据类型之外，还要指明常量的值，因为常量的值是不能改变的，不能像变量那样在程序中赋值：
const RGBYellow: TColor24 = (Red: 255; Green: 255; Blue: 0);
我觉得Delphi中record常量的声明语法有些怪，不过先别管它。上面说了好多东西，包括uses、type、var、const、begin、end.这些关键字，还有例子工程中的以行里面的program，都是在老Pascal中就已经有的了，在一个工程中，这些关键字必须以一定的顺序出现，大概就是像这个样子：
program Sample1;
uses
Windows,
SysUtils;
var s: string;
type LONG = Integer;
const ErrCode: LONG = -2147483640;
begin
s := SysErrorMessage(ErrCode);
MessageBox(0, PChar(s), nil, MB_OK or MB_ICONSTOP);
end.
Program指定工程的名称，这一语句一定要出现，并且工程名称和工程文件名必须一致，否则编译时会出错。由于Delphi的编译顺序是和按照源代码的书面顺序进行的，所以编写源代码的时候必须注意，只能先声明，后调用，而不能先调用，后声明。比如，uses语句必须紧跟program语句，也就是在除program语句之外的所有语句之前出现，这和C中的include有点不同，以后在说unit的格式时就知道为什么了。然后是数据类型、变量、常量的声明，这三种声明顺序没有限制，而且可以多次出现，也就是说可以有多个type、var和const语句，但同样要遵循先声明、后调用的规则，比如上面常量ErrCode的声明使用了数据类型LONG，则LONG必须先于ErrCode声明，如此类推。工程的最后一部分是主程序段，以begin开头，end.结束。一般函数中结尾的end是接分号的，但主程序段的end接的是句号，以示整个程序的结束，这个规定也是从老Pascal中遗传下来的，好无聊吧。
下一章将会说明unit的格式，可以说是project格式的扩展，因此就请大家先弄明白本章的内容吧。
