1.application 變量(標(biāo)準(zhǔn)應(yīng)用程序)
描繪應(yīng)用程序級(jí)的信息
單元
Forms
var 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)目的名稱:
PRocedure TForm1.Button1Click(Sender: TObject);
begin
Edit1.Text := Application.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è)試Delphi編譯器的統(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)。
單元
System
var ExitProcessProc: procedure;
描述
賦值給 ExitProcessProc 來(lái)指定你想在應(yīng)用程序關(guān)閉前執(zhí)行的過(guò)程。ExitProcessProc 的值是一個(gè)沒(méi)有參數(shù)的過(guò)程。
5.GetFileVersion 函數(shù)
返回文件版本
單元
SysUtils
function GetFileVersion(const AFileName: string): Cardinal;
描述
GetFileVersion返回一個(gè)文件二進(jìn)制版本號(hào)中最有意義的32位。AFileName指定文件名,可以使用和LoadLibrary函數(shù)相同的路徑搜索到。
6.GetModuleName 函數(shù)
返回給定句柄的模塊的完全限定名稱(fully qualified name)。
單元
SysUtils
function GetModuleName(Module: HMODULE): string;
描述
調(diào)用GetModuleFileName來(lái)獲得給定句柄的模塊的完全限定名稱。
Module是模塊的句柄。
7.HInstance 變量
句柄,由Windows提供給模塊(module)。
單元
SysInit
var HInstance: LongWord;
描述
HInstance 容納了由Windows提供的應(yīng)用程序或庫(kù)的實(shí)例句柄
8.HintWindowClass 變量
指定用于顯示幫助提示(help hint)的窗口的類。
單元
Forms
var 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的派生類,然后在應(yīng)用程序啟動(dòng)時(shí)將派生類賦予HintWindowClass變量,能夠定制這個(gè)窗口。
9.InitProc 變量
InitProc 是最后一個(gè)安裝的初始化過(guò)程。
單元
System
var InitProc: Pointer;
描述
賦值給InitProc來(lái)指定一個(gè)你想在應(yīng)用程序啟動(dòng)時(shí)執(zhí)行的過(guò)程。InitProc是一個(gè)無(wú)參數(shù)過(guò)程。例如:
procedure MyInitProcedure;
...
initialization
InitProc := @MyInitProcedure;
begin
end;
只有一個(gè)初始化過(guò)程能夠被賦予InitProc變量。如果你的應(yīng)用程序定義了多個(gè)初始化過(guò)程,僅最后一個(gè)賦予InitProc的會(huì)執(zhí)行。要允許其他初始化過(guò)程執(zhí)行,你必須將過(guò)程“鏈接”到一起,從InitProc的新值中調(diào)用原先的值。例如,下面來(lái)自ComObj單元的代碼在賦新值前保存了InitProc原先的值,然后在新賦予的初始化過(guò)程中調(diào)用保存在值:
SaveInitProc := InitProc;
InitProc := @InitComObj;
10.IsConsole 變量
指示模塊(module)是否作為控制臺(tái)應(yīng)用程序編譯。
單元
System
var 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。
單元
System
var IsLibrary: Boolean;
描述
如果模塊是一個(gè)DLL,那么IsLibrary變量為True。
12.JITEnable 變量
控制何時(shí)及時(shí)調(diào)度器會(huì)被調(diào)用(Controls when the just-in-time debugger is called)。
單元
System
var JITEnable: Byte = 0;
描述
使用JITEnable來(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ū),任何包含了Forms單元的應(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-in-time debugger)。
當(dāng)JITEnable為1時(shí),任何非原生(non-native)異常(使用其他產(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)。
單元
SysUtils
function Languages: TLanguages;
描述
使用由Languages返回的值可以獲得系統(tǒng)支持的關(guān)于區(qū)域的信息。這個(gè)函數(shù)僅可用在Windows平臺(tái)
14.MainInstance變量
指示主要的可執(zhí)行文件的實(shí)例句柄。
單元
System
var 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)前模塊中主執(zhí)行線程。
單元
System
var MainThreadID: LongWord;
描述
使用MainThreadID來(lái)獲得主執(zhí)行線程(模塊初始化時(shí)的當(dāng)前線程)的線程ID。
在調(diào)試時(shí),這個(gè)主線程ID顯示在線程狀態(tài)盒中。
在Windows上,MainThreadID的值和一些Win32API調(diào)用所需要的線程ID是兼容的。
16.NoErrMsg變量
控制當(dāng)運(yùn)行時(shí)錯(cuò)誤發(fā)生時(shí)應(yīng)用程序是否顯示一個(gè)錯(cuò)誤信息。
單元
System
var NoErrMsg: Boolean = False;
描述
在Windows上,設(shè)置NoErrMsg來(lái)控制是否有一個(gè)消息顯示來(lái)指出有一個(gè)運(yùn)行時(shí)錯(cuò)誤發(fā)生了。當(dāng)NoErrMsg為false(默認(rèn)值)時(shí),運(yùn)行時(shí)錯(cuò)誤會(huì)導(dǎo)致應(yīng)用程序顯示一個(gè)消息框來(lái)提出發(fā)生的錯(cuò)誤的類型。當(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消息的集中處理
單元
Menus
var PopupList: TPopupList;
描述
使用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)。
單元
System
const RTLVersion = 15.0;
描述
使用RTLVersion可以檢查不依賴于編譯器版本級(jí)別的Delphi運(yùn)行時(shí)庫(kù)的版本號(hào)。
19.Screen變量
表現(xiàn)一個(gè)屏幕設(shè)備
單元
Forms
var 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變量
指定Win32平臺(tái)的標(biāo)識(shí)符
單元
SysUtils
var Win32Platform: Integer = 0;
描述
Win32Platform用于標(biāo)識(shí)系統(tǒng)運(yùn)行的Win32平臺(tái)的類型。這將會(huì)是下列值之一:
值 含義
VER_PLATFORM_WIN32s 系統(tǒng)是Win32
VER_PLATFORM_WIN32_WINDOWS 系統(tǒng)是Windows 95
VER_PLATFORM_WN32_NT 系統(tǒng)是Windows NT
Win32Platform僅在Windows上可用。
新聞熱點(diǎn)
疑難解答
圖片精選
網(wǎng)友關(guān)注