delphi例程-應(yīng)用程序級(jí)信息

1、delphi 例程應(yīng)用程序級(jí)信息1. Application 變量 ( 標(biāo)準(zhǔn)應(yīng)用程序 ) 描繪應(yīng)用程序級(jí)的信息單元Formsvar Application: TApplication;描述默認(rèn)地，當(dāng)創(chuàng)建一個(gè)新的項(xiàng)目， Delphi 會(huì)構(gòu)造一個(gè)應(yīng) 用程序?qū)ο蟛⑵滟x給位于 Forms 單元中的 Application 變量。 Application 擁有數(shù)個(gè)屬性，在應(yīng)用程序運(yùn)行時(shí)可心 用于得到關(guān)于應(yīng)用程序的信息。示例 這段代碼將在編輯框中顯示你的項(xiàng)目的名稱(chēng)： procedure TForm1.Button1Click(Sender: TObject); beginEdit1.Text := Ap

2、plication.Title;end;2. CmdShow 變量CmdShow 被傳遞給 Windows API 函數(shù)ShowWindow 。 單元System var CmdShow: Integer;描述 在程序中，當(dāng)應(yīng)用程序創(chuàng)建主窗口時(shí)， CmdShow 變 量包含了 Windows 希望傳遞給 ShowWindow 的參數(shù) 值。在庫(kù)(DLL)中,CmdShow 總是為0。3. CompilerVersion 常量 指明了 Delphi 編譯器的版本編號(hào) 單元System const CompilerVersion = 15.0;描述使用 CompilerVersion 可以測(cè)試 De

3、lphi 編譯器的統(tǒng) 配級(jí)別。如果你想條件化利用了 Delphi 語(yǔ)言更新特色的代 碼，這會(huì)很有用 (This is useful if you want to conditionalize code that takes advantage of newer features in the Delphi language) 。4. ExitProcessProc 變量ExitProcessProc 指定在應(yīng)用程序關(guān)閉 (shut down) 前 最后執(zhí)行的過(guò)程 (procedure) 。 單元Systemvar ExitProcessProc: procedure; 描述賦值給 ExitPr

4、ocessProc 來(lái)指定你想在應(yīng)用程序關(guān)閉 前執(zhí)行的過(guò)程。 ExitProcessProc 的值是一個(gè)沒(méi)有參數(shù)的過(guò) 程。5. GetFileVersion 函數(shù)返回文件版本 單元SysUtilsfunction GetFileVersion(const AFileName: string):Cardinal; 描述GetFileVersion 返回一個(gè)文件二進(jìn)制版本號(hào)中最有意 義的 32 位。 AFileName 指定文件名，可以使用和 LoadLibrary 函數(shù)相同的路徑搜索到。6. GetModuleName 函數(shù) 返回給定句柄的模塊的完全限定名稱(chēng) (fully qualified n

5、ame) 。單元SysUtilsfunction GetModuleName(Module: HMODULE): string;描述調(diào)用 GetModuleFileName 來(lái)獲得給定句柄的模塊的 完全限定名稱(chēng)。Module 是模塊的句柄。7. HInstance 變量句柄，由 Windows 提供給模塊 (module) 。 單元SysInitvar HInstance: LongWord;描述HInstance 容納了由 Windows 提供的應(yīng)用程序或庫(kù) 的實(shí)例句柄8. HintWindowClass 變量指定用于顯示幫助提示 (help hint) 的窗口的類(lèi)。 單元Formsvar

6、HintWindowClass: THintWindowClass = THintWindow;描述當(dāng)應(yīng)用程序顯示幫助提示 (Help Hint) 時(shí)，它會(huì)創(chuàng)建一 個(gè) HintWindowClass 的實(shí)例來(lái)描繪用來(lái)顯示提示的窗口。 應(yīng)用程序通過(guò)創(chuàng)建 THintWindow 的派生類(lèi)，然后在應(yīng)用 程序啟動(dòng)時(shí)將派生類(lèi)賦予 HintWindowClass 變量，能夠定 制這個(gè)窗口。9.InitProc 變量InitProc 是最后一個(gè)安裝的初始化過(guò)程。單元Systemvar InitProc: Pointer;描述賦值給 InitProc 來(lái)指定一個(gè)你想在應(yīng)用程序啟動(dòng)時(shí)執(zhí) 行的過(guò)程。 InitPr

7、oc 是一個(gè)無(wú)參數(shù)過(guò)程。例如：procedure MyInitProcedure;initializationInitProc := MyInitProcedure;beginend;只有一個(gè)初始化過(guò)程能夠被賦予 InitProc 變量。如果 你的應(yīng)用程序定義了多個(gè)初始化過(guò)程，僅最后一個(gè)賦予 InitProc 的會(huì)執(zhí)行。要允許其他初始化過(guò)程執(zhí)行，你必須將過(guò)程 “ 鏈接 ” 到一起，從 InitProc 的新值中 調(diào)用原先的值。例如，下面來(lái)自 ComObj 單元的代碼在賦 新值前保存了 InitProc 原先的值，然后在新賦予的初始化 過(guò)程中調(diào)用保存在值：

8、SaveInitProc := InitProc;InitProc := InitComObj;10.IsConsole 變量 指示模塊 (module) 是否作為控制臺(tái)應(yīng)用程序編譯。單元Systemvar IsConsole: Boolean;描述如果模塊作為控制臺(tái)應(yīng)用程序編譯，那么 IsConsole 變量為 True 。同時(shí)在可執(zhí)行文件和 DLL 中將為 True(This will be True in both an executable and a DLL)。11.IsLibrary 變量指示模塊是否是一個(gè) DLL 。單元Systemvar IsLibrary: Boolean;

9、描述如果模塊是一個(gè) DLL ，那么 IsLibrary 變量為 True12. JITEnable 變量控制何時(shí)及時(shí)調(diào)度器會(huì)被調(diào)用 (Controls when the just-in-time debugger is called) 。單元Systemvar JITEnable: Byte = 0;描述使用 JITEnable 來(lái)指示什么類(lèi)型的異常會(huì)觸發(fā)及時(shí)調(diào)試 器。當(dāng) JITEnable 為 0( 默認(rèn)值 ) 時(shí)，所有的異常將使用應(yīng)用 程序的異常處理機(jī)制處理。及時(shí)調(diào)試器僅當(dāng)應(yīng)用程序沒(méi)有 提供任何捕獲異常的機(jī)制時(shí)被調(diào)用。注意，除了 Delphi 單 元中的初始化和結(jié)束化區(qū)，任何包含了 For

10、ms 單元的應(yīng)用 程序都提供了異常處理 (通過(guò) Application 對(duì)象 )，不會(huì)觸發(fā) 及時(shí)調(diào)試器 (Note that any application that includes the Forms unit provides exception handling (via the Application object) for all but the initialization and finalization sections and does not trigger the just-intime debugger) 。當(dāng) JITEnable 為 1 時(shí)，任何非原生 (non-n

11、ative) 異常 (使用其他產(chǎn)品編譯的代碼引發(fā)的異常 )。都會(huì)觸發(fā)及時(shí)調(diào)試 器。原生異常由應(yīng)用程序的異常處理機(jī)制處理。當(dāng) JITEnable 大于 1 時(shí)，所有的異常都會(huì)觸發(fā)及時(shí)調(diào) 試器。注意：當(dāng)你安裝 IDE 時(shí)，它會(huì)被注冊(cè)為及時(shí)調(diào)試器。 如果你安裝了其他帶調(diào)試器的工具，他們可能注冊(cè)了自 己，而覆蓋了 IDE 的注冊(cè)。13. Languages 函數(shù)列出可用的支持區(qū)域 (List the locale for which support is available) 。單元SysUtilsfunction Languages: TLanguages;描述使用由 Languages 返回的值可

12、以獲得系統(tǒng)支持的關(guān)于 區(qū)域的信息。這個(gè)函數(shù)僅可用在 Windows 平臺(tái)14. MainInstance 變量指示主要的可執(zhí)行文件的實(shí)例句柄。單元Systemvar MainInstance: LongWord;描述使用 MainInstance 來(lái)獲得一個(gè)應(yīng)用程序中主要的可執(zhí) 行文件的實(shí)例句柄。在使用了運(yùn)行時(shí)庫(kù)或包的應(yīng)用程序 中，當(dāng)你需要可執(zhí)行文件而不是庫(kù)的句柄時(shí)，這很有用。注意：當(dāng)從一個(gè)使用其他工具編譯的可執(zhí)行文件中運(yùn) 行一個(gè) CLX 動(dòng)態(tài)鏈接庫(kù) (Windows) 或者共享對(duì)象 (Linux) 時(shí)，不要使用 MainInstance 。15. MainThreadID 變量指示當(dāng)前模塊中

13、主執(zhí)行線(xiàn)程。單元Systemvar MainThreadID: LongWord;描述使用 MainThreadID 來(lái)獲得主執(zhí)行線(xiàn)程 (模塊初始化時(shí) 的當(dāng)前線(xiàn)程 )的線(xiàn)程 ID 。在調(diào)試時(shí)，這個(gè)主線(xiàn)程 ID 顯示在線(xiàn)程狀態(tài)盒中。在 Windows 上， MainThreadID 的值和一些 Win32API 調(diào)用所需要的線(xiàn)程 ID 是兼容的。16. NoErrMsg 變量控制當(dāng)運(yùn)行時(shí)錯(cuò)誤發(fā)生時(shí)應(yīng)用程序是否顯示一個(gè)錯(cuò)誤 信息。單元Systemvar NoErrMsg: Boolean = False;描述在 Windows 上，設(shè)置 NoErrMsg 來(lái)控制是否有一個(gè) 消息顯示來(lái)指出有一個(gè)運(yùn)行

14、時(shí)錯(cuò)誤發(fā)生了。當(dāng) NoErrMsg 為 false( 默認(rèn)值 ) 時(shí)，運(yùn)行時(shí)錯(cuò)誤會(huì)導(dǎo)致應(yīng)用程序顯示一個(gè) 消息框來(lái)提出發(fā)生的錯(cuò)誤的類(lèi)型。當(dāng) NoErrMsg 為 true 時(shí)，這些消息將被禁止。在 Linux 上， NoErrMsg 沒(méi)有任何效果。注意： SysUtils 單元會(huì)將大部分的運(yùn)行時(shí)錯(cuò)誤轉(zhuǎn)變成異 常。如果你的應(yīng)用程序包含了 SysUtils ，那么即使 NoErrMsg 是 false ，運(yùn)行時(shí)錯(cuò)誤消息框也未必會(huì)顯示。17. PopupList 變量提供了對(duì)發(fā)向彈出菜單 (popup menu) 的 Windows 消 息的集中處理 單元Menusvar PopupList: TPo

15、pupList;描述使用 PopupList 可以訪問(wèn)應(yīng)用程序中的全部彈出菜單 或者訪問(wèn)響應(yīng)彈出菜單消息的窗口的窗口句柄。 PopupList 維持了在應(yīng)用程序中創(chuàng)建的全部彈出菜單組件的列表。這 個(gè)列表保存一個(gè)集中處理發(fā)向這些彈出菜單的 Windows 消 息的隱藏窗口的句柄。18. RTLVersion 常量指出 Delphi 運(yùn)行時(shí)庫(kù)的版本號(hào)。單元Systemconst RTLVersion = 15.0;描述使用 RTLVersion 可以檢查不依賴(lài)于編譯器版本級(jí)別的 Delphi 運(yùn)行時(shí)庫(kù)的版本號(hào)。19.Screen 變量表現(xiàn)一個(gè)屏幕設(shè)備單元Formsvar Screen: TScreen;描述Screen 變量是一個(gè)表現(xiàn)應(yīng)用程序運(yùn)行時(shí)所在系統(tǒng)的屏 幕的 TScreen 組件。默認(rèn)地，應(yīng)用程序會(huì)創(chuàng)建一個(gè)基于當(dāng) 前屏幕設(shè)備有關(guān)信息的屏幕組件并將其賦給 Screen 變量 20.Win32Platform 變量