Delphi中initialization和finalization

注:本文主要是討論delphi程序啓動時和退出時的執行順序,期間有些知識來源於Delphi幫助,有些來自《Delphi7程序設計教程》(這本書只告訴我有initialization 和 finalization 這兩個關鍵字,但是沒講明白)(唉,現在的書只討論框框架架,不討論細節,寫出來的東西讓你看能看懂,別人一問或者自己一想,就是什麼都不懂!講的不細緻呀!唉,自己琢磨吧!!)。代碼用兩排‘*’標明。

 

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
initialization 的執行順序取決於哪個窗體先被調用,對於<1>,由於3個窗體之間沒有 uses 和被 uses 的關係,所以按照工程單元uses 中的順序執行(在工程單元中,如下):
************************************************************
program Project1;

uses
  Forms,
  Unit1 in 'Unit1.pas' {Form1},
  Unit2 in 'Unit2.pas' {Form2},
  Unit3 in 'Unit3.pas' {Form3};

{$R *.res}

begin
  Application.Initialize;
  Application.CreateForm(TForm1, Form1);
  Application.CreateForm(TForm2, Form2);
  Application.CreateForm(TForm3, Form3);
  Application.Run;
end.
************************************************************
如果改變
uses
  Forms,
  Unit1 in 'Unit1.pas' {Form1},
  Unit2 in 'Unit2.pas' {Form2},
  Unit3 in 'Unit3.pas' {Form3};

成爲
uses
  Forms,
  Unit2 in 'Unit2.pas' {Form2},
  Unit3 in 'Unit3.pas' {Form3},
  Unit1 in 'Unit1.pas' {Form1};
那麼就是(先form2後form3最後form1)
對於<2>,由於form1中uses了Unit2,那麼在編譯Unit1之前必須先編譯Unit2。順序自然是(先 form2 然後 form1 最後 form3)
所以 initialization 的執行順序首先看彼此單元之間是否有uses和被uses關係(簡單的說就是:調用關係), 然後再看工程文件的uses的順序。(呵呵,不要被uses弄混了!)

2)OnCreate
OnCreate 的執行順序由工程單元中的如下類似代碼決定
************************************************************
  Application.CreateForm(TForm1, Form1);
  Application.CreateForm(TForm2, Form2);
  Application.CreateForm(TForm3, Form3);
************************************************************
改變之後則相應發生改變。

3)OnDestroy
與OnCreate的順序相反。(相反時一種對應,創建的順序與銷燬的順序是相反的,這樣是爲了避免發生錯誤,這樣也體現了編程要求思維嚴謹。)

4)finalization
與 initialization 的順序相反。

再說說OnClose,
當調用窗體的Close或點擊關閉按鈕時調用該事件。
主窗體Close後,程序就退出。
非主窗體Close,僅僅是Close本窗體。
(別說你在OnClose中調用其他窗體的關閉,那些不再討論範圍)

直接用Application.Terminate強制退出程序時,不調用OnClose事件。但 OnDestroy 和 finalization  要執行。 

發表評論
所有評論
還沒有人評論,想成為第一個評論的人麼? 請在上方評論欄輸入並且點擊發布.
相關文章