好了，进入正题，首先说明initialization 和 finalization 在代码单元中的位置：

************************************************************

1

2

3

4

5

6

7

8

9

10

11

12

13

14

15

16

17

18

19

20

21

22

23

24

25

26

27

28

29

30

31

32

33

34

35

36

37

38

39

40

41

42

43

 

unit Unit1; 

interface

 

uses

Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,

Dialogs;

 

type

TForm1 = class(TForm)

    Button1: TButton;

    procedure FormCreate(Sender: TObject);

    procedure FormDestroy(Sender: TObject);

private

    { Private declarations }

public

    { Public declarations }

end;

 

var

Form1: TForm1;

 

implementation

 

uses Unit2;

 

{$R *.dfm}

 

procedure TForm1.FormCreate(Sender: TObject);

begin

ShowMessage(‘1 FormCreate‘);

end;

 

procedure TForm1.FormDestroy(Sender: TObject);

begin

ShowMessage(‘1 Destroy‘);

end;

 

initialization

ShowMessage(‘1 ini‘);{单元初始化代码}

finalization

ShowMessage(‘1 final‘);{单元退出时的代码}

 

end.

 

************************************************************

initialization —— 在单元中放在文件结尾前，包含用来初始化单元的代码，它在主程序运行前运行并且只运行一次。

finalization —— 在单元中放在 initialization 和 end. 之间，包含了单元退出时的代码。在程序退出时运行并且只运行一次。

OnClose —— 在点击关闭按钮或执行该事件时调用。

OnCreate —— 在窗体创建时调用。（我的感觉：该事件是在窗体创建之后，即执行构造函数后才执行的）

OnDestroy —— 在窗体销毁时调用，一般用来销毁程序员自己定义（自己定义、创建，而不是直接从控件板拖拉过来的控件）的对象、变量、指针等等。（与析构函数的关系我还没弄清）

下面是执行顺序（如果程序中没有 initialization、 OnCreate、 OnClose、 OnDestroy、 finalization 中的任何一项，则相应跳过即可）：

程序启动 --> 执行 initialization 处的代码 --> 执行窗体的构造函数并创建相应窗体和单元中的对象（如拖拉的控件对象，全局变量等） --> 执行 OnCreate 事件 --> 程序运行 --> 关闭主窗体（此处指调用主窗体的Close或点击主窗体的关闭按钮） --> 执行 OnClose 事件 --> 执行 OnDestroy 事件 --> 执行 finalization 处的代码

以上是对于单个窗体而言，下面是对于多个窗体：

新建一工程，创建3个Form，分别是form1、form2、form3,默认情况下form1为主窗体。

<1 begin>

程序启动 --> 执行 initialization 处的代码（先 form1 然后 form2 最后 form3 ） --> 执行窗体的构造函数并创建相应窗体和单元中的对象（如拖拉的控件对象，全局变量等） --> 执行 OnCreate 事件（先 form1 然后 form2 最后 form3 ） --> 程序运行 --> 关闭主窗体（此处指调用主窗体的Close或点击主窗体的关闭按钮） --> 执行主窗体的 OnClose 事件 --> 执行 OnDestroy 事件（先 form3 然后 form2 最后 form1 ，注意哟，顺序倒过来了。） --> 执行 finalization 处的代码（先 form3 然后 form2 最后 form1 ，注意哟，顺序倒过来了。）

<1 end>

为什么 OnDestroy 和 OnCreate 的顺序相反？为什么 finalization和 initialization 的顺序相反？大家好好想想吧！

另外：如果我在form1中uses 一下Unit2（form2的代码单元）执行顺序如下：

<2 begin>

程序启动 --> 执行 initialization 处的代码（先 form2 然后 form1 最后 form3 ） --> 执行窗体的构造函数并创建相应窗体和单元中的对象（如拖拉的控件对象，全局变量等） --> 执行 OnCreate 事件（先 form1 然后 form2 最后 form3 ） --> 程序运行 --> 关闭主窗体（此处指调用主窗体的Close或点击主窗体的关闭按钮） --> 执行主窗体的 OnClose 事件 --> 执行 OnDestroy 事件（先 form3 然后 form1 最后 form2 ，注意注意，不一样了。） --> 执行 finalization 处的代码（先 form3 然后 form1 最后 form2 ，注意注意，不一样了。）

<2 end>

多个窗体（单元）一些细节性的东西：

1）initialization