2.1.10.1 Object Pascal程序庫(kù)單元的結(jié)構(gòu)

　　不管一個(gè)庫(kù)單元是否和一個(gè)窗體有關(guān)，庫(kù)單元的結(jié)構(gòu)都是相同的。其結(jié)構(gòu)如下：

　　unit <庫(kù)單元名稱>

　　interface

　　uses <選擇性的庫(kù)單元列表>

　　{公有說(shuō)明}

　　implementation

　　uses <選擇性的庫(kù)單元列表>

　　{私有說(shuō)明}

　　{過(guò)程和函數(shù)的執(zhí)行部分}

　　initialization {選擇性的}

　　{選擇性的初始化程序}

　　end.

　　2.1.10.2 程序庫(kù)單元的接口部分

　　interface是庫(kù)單元的接口部分，它決定了本庫(kù)單元對(duì)其他任何庫(kù)單元或程序的可見(可訪問(wèn))部分。您可以在接口部分說(shuō)明變量、常量、數(shù)據(jù)類型、過(guò)程和函數(shù)等等。Delphi在您設(shè)計(jì)窗體的庫(kù)單元中，將窗體數(shù)據(jù)類型、窗體變量和事件處理過(guò)程都說(shuō)明在這一部分。

　　interface標(biāo)志庫(kù)單元接口部分的開始。在interface中的說(shuō)明對(duì)要使用這些說(shuō)明的其他庫(kù)單元或應(yīng)用程序是可見的。一個(gè)庫(kù)單元可以使用其他Unit的說(shuō)明，只需要在uses子句中指明那些庫(kù)單元即可。例如，您在庫(kù)單元A中編寫程序代碼，且您想調(diào)用UnitB于interface部分說(shuō)明的程序。您可以把庫(kù)單元B的名稱加入到A的interface部分的uses子句中，則任何A中的程序都可以調(diào)用B中說(shuō)明的程序。而且，如果B中interface部分的uses子句中出現(xiàn)C庫(kù)單元，盡管A中未曾出現(xiàn)C，A同樣可以調(diào)用B、C庫(kù)單元在interface中說(shuō)明的程序。但如果B出現(xiàn)在A的interface部分的uses子句中，那么庫(kù)單元A便不能出現(xiàn)在B的interface的uses子句中。因?yàn)檫@樣會(huì)產(chǎn)生對(duì)庫(kù)單元的循環(huán)訪問(wèn)。當(dāng)試圖編譯時(shí)，會(huì)產(chǎn)生出現(xiàn)錯(cuò)誤信息。

　　2.1.10.3 程序庫(kù)單元的實(shí)現(xiàn)部分

　　實(shí)現(xiàn)部分implementation中包含interface中說(shuō)明的過(guò)程、函數(shù)、事件處理過(guò)程的具體實(shí)現(xiàn)程序代碼。這一部分可以有自己的額外說(shuō)明，但這些說(shuō)明是私有的，外部程序不能調(diào)用這些說(shuō)明。在interface中說(shuō)明的函數(shù)實(shí)體必須在implementation部分出現(xiàn)，可以使用標(biāo)題簡(jiǎn)寫：只輸入procedure或function保留字，后面跟過(guò)程或函數(shù)的名稱即可，其后則是程序的實(shí)現(xiàn)部分了。如果您在implementation部分說(shuō)明任何常式，其標(biāo)題并未出現(xiàn)在interface部分，則必須寫全其標(biāo)題部分。

　　在implementation部分的uses子句中指定的庫(kù)單元，只供給本庫(kù)單元的程序使用其interface中說(shuō)明的程序。其他使用本庫(kù)單元的庫(kù)單元，不能訪問(wèn)這些在implementation的udes子句中庫(kù)單元的說(shuō)明，因?yàn)樵趇mplementation后進(jìn)行的庫(kù)單元包含是私有的。所以上例中，如果C出現(xiàn)在B的implementation部分，則A不能使用C的公有部分，除非C出現(xiàn)在A的uses子句中。在implementation中出現(xiàn)的循環(huán)訪問(wèn)是Delphi所允許的，如果A的implemetation的uses子句中出現(xiàn)B，則B的implementation部分也可以出現(xiàn)A。

　　2.1.10.4 程序庫(kù)單元的初始化部分

　　初始化當(dāng)前庫(kù)單元所使用的數(shù)據(jù)，或是通過(guò)interface部分將數(shù)據(jù)提供給其他應(yīng)用程序、庫(kù)單元使用時(shí)，您可以在庫(kù)單元中加入一個(gè)initialization部分，在庫(kù)單元的end前加上您的初始化語(yǔ)句。當(dāng)一個(gè)應(yīng)用程序使用一個(gè)庫(kù)單元時(shí)，在庫(kù)單元中的initialization部分會(huì)先于其他的代碼執(zhí)行。如果一個(gè)應(yīng)用程序使用了多個(gè)庫(kù)單元，則每一個(gè)庫(kù)單元的初始化部分都會(huì)在所有的程序代碼前執(zhí)行。

　　2.1.10.5 使用Delphi的可視化部件及其庫(kù)單元

　　當(dāng)您在窗體中加入可視化部件時(shí)，如果該部件在可視化部件庫(kù)中，Delphi會(huì)在您的庫(kù)單元的interface部分的uses子句中自動(dòng)加上需要使用的庫(kù)單元名稱。但有些對(duì)象在Delphi的環(huán)境中并沒有可視化部件存在，例如，您想在庫(kù)單元中加入一個(gè)預(yù)定義的信息框，則您必須把MsgDlg庫(kù)單元加入您的uses子句中。如果您要使用TPrinter對(duì)象的話，必須將Printer庫(kù)單元加入uses子句中。在在線幫助中可以查到對(duì)象所屬的預(yù)定義庫(kù)單元。

　　要使用在其他庫(kù)單元中說(shuō)明的函數(shù)，應(yīng)在函數(shù)的前面加上這一庫(kù)單元的名稱，并用‘.’號(hào)隔開。例如，要在Unit2中使用Unit1中說(shuō)明的Calculate函數(shù)，應(yīng)使用下面的方法：

　　Number := Unit1.Calculate(10);

　　您可以在任何標(biāo)識(shí)符如屬性、常量、變量、數(shù)據(jù)類型、函數(shù)等之前加上庫(kù)單元的名稱。您可以在自由地在任何Delphi庫(kù)單元中加入程序代碼，但不要改變由Delphi生成的程序。

　　2.1.10.6 建立與窗體無(wú)關(guān)的新庫(kù)單元

　　如果您想在工程中建立一個(gè)和任何窗體無(wú)關(guān)的新庫(kù)單元，可以現(xiàn)選用File|New Unit。這時(shí)一個(gè)新的庫(kù)單元加入了工程，新庫(kù)單元的代碼如下：

　　unit Unit2;

　　interface

　　implementation

　　end.

　　Delphi將根據(jù)您的工程中的文件數(shù)目為您的庫(kù)單元選擇名稱，您可以在程序骨架間加入您的程序代碼。

　　當(dāng)編譯您的工程時(shí)，這個(gè)新加入的庫(kù)單元會(huì)被編譯為一個(gè)具有.DCU后綴的文件。這個(gè)新生成的文件是鏈接到工程的可執(zhí)行文件上的機(jī)器代碼。

　　2.1.10.7 將庫(kù)單元加入工程

　　將庫(kù)單元加入工程是比較簡(jiǎn)單的。無(wú)論是您自己建立的庫(kù)單元還是Delphi建立的與窗體有關(guān)的庫(kù)單元，如果已經(jīng)完成，則先打開您想加入庫(kù)單元的工程(可以用Open Project打開工程);再選用File|Open File，然后選擇您想加入的源程序(.PAS文件)，并選擇OK即可。則庫(kù)單元被加入到應(yīng)用程序中。