配套課件-Delphi-6程序設(shè)計(jì)及其應(yīng)用

第1章

Delphi6快速入門(mén)

1.1Delphi6概述1.2Delphi6的安裝1.3Delphi6的界面描述本章要點(diǎn)概括介紹Delphi6的特點(diǎn)、發(fā)展歷程和易學(xué)易用性。通過(guò)圖示詳細(xì)描述Delphi6安裝及卸載過(guò)程。具體介紹Delphi6的集成開(kāi)發(fā)環(huán)境，包括主窗體、菜單欄、工具欄、控件板、對(duì)象監(jiān)視器、代碼編輯器等。

返回本章首頁(yè)1.1Delphi6概述

Delphi6具有以下特性：基于控件設(shè)計(jì)和可視化的開(kāi)發(fā)環(huán)境以及面向?qū)ο蟮木幊谭椒ǎ沟贸绦蜷_(kāi)發(fā)者可以不用書(shū)寫(xiě)一行代碼就能設(shè)計(jì)出滿意的界面。高速的編譯器生成更為短小的二進(jìn)制代碼，因而提高了運(yùn)行效率、節(jié)約運(yùn)行時(shí)間。強(qiáng)大的數(shù)據(jù)庫(kù)支持，使程序開(kāi)發(fā)人員只需通過(guò)數(shù)據(jù)庫(kù)引擎工具而不用與數(shù)據(jù)庫(kù)文件直接打交道，就可以操作和處理數(shù)據(jù)庫(kù)文件。結(jié)構(gòu)嚴(yán)謹(jǐn)、數(shù)據(jù)類型豐富、運(yùn)行性能優(yōu)越的ObjectPascal語(yǔ)言，是一種面向?qū)ο蟮慕Y(jié)構(gòu)化程序設(shè)計(jì)語(yǔ)言，具有自動(dòng)的異常狀況處理能力以及類的封裝能力。這一切為Delphi6的易學(xué)易用性奠定了堅(jiān)實(shí)的基礎(chǔ)。返回本章首頁(yè)Delphi6針對(duì)不同用戶的需要，推出了三種版本，分別為：

標(biāo)準(zhǔn)版專業(yè)版企業(yè)版返回本節(jié)1.2Delphi6的安裝1.2.1Delphi6環(huán)境要求1.2.2Delphi6安裝1.2.3Delphi6卸載返回本章首頁(yè)1.2.1Delphi6環(huán)境要求在安裝Delphi6之前，請(qǐng)先檢查一下計(jì)算機(jī)的軟硬件配置是否符合如下的最低要求：MicrosoftWindows95/98/2000或者WindowsNT4.0操作系統(tǒng)。

Pentium90或者更高的處理器。32MB以上的內(nèi)存。CD-ROM驅(qū)動(dòng)器。VGA或更高分辨率的顯示器。

硬盤(pán)剩余容量的要求：安裝面向初學(xué)者的標(biāo)準(zhǔn)版需要120MB硬盤(pán)空間;安裝面向?qū)I(yè)用戶的專業(yè)版需要185MB硬盤(pán)空間；安裝面向開(kāi)發(fā)大型應(yīng)用程序的企業(yè)版需要230MB硬盤(pán)空間。但是，考慮到運(yùn)行效率，硬盤(pán)應(yīng)再留出70MB的剩余空間。返回本節(jié)1.2.2Delphi6安裝 Delphi6采用智能化安裝方式，具體步驟如下：（1）把Delphi6的安裝光盤(pán)放入光驅(qū)中，系統(tǒng)會(huì)自動(dòng)運(yùn)行安裝程序，顯示安裝畫(huà)面，如圖1-1所示。（2）用鼠標(biāo)單擊“Delphi”選項(xiàng)，出現(xiàn)安裝向?qū)нM(jìn)度條后，進(jìn)入歡迎窗口，如圖1-2所示。（3）單擊“Next”按鈕，隨后進(jìn)入PasswordDialog窗口，輸入系列碼、授權(quán)碼，然后單擊“Next”按鈕。圖1-1Delphi6安裝畫(huà)面圖1-2Welcome畫(huà)面（4）打開(kāi)安裝軟件認(rèn)證協(xié)議窗口，單擊“Yes”按鈕。

（5）進(jìn)入消息Information窗口，單擊“Next”按鈕。（6）指定Delphi6安裝方式，Delphi6提供了三種選擇：典型安裝、精簡(jiǎn)安裝、自定義安裝（如圖1-3所示）。（7）選擇完成后單擊“Next”按鈕，打開(kāi)外部安裝選擇窗口，選擇后單擊“Next”按鈕。（8）進(jìn)入設(shè)定程序安裝路徑窗口，如圖1-4所示。圖1-3安裝模式選擇畫(huà)面圖1-4選擇安裝路徑畫(huà)面（9）單擊“Next”按鈕，進(jìn)入安裝警告窗口，如圖1-5所示。（10）單擊“Install”按鈕，開(kāi)始向硬盤(pán)指定路徑拷貝相應(yīng)文件，屏幕出現(xiàn)進(jìn)度條，顯示安裝進(jìn)度窗口，如圖1-6所示。（11）完成后顯示安裝完成窗口，如圖1-7所示。（12）單擊“Finish”按鈕，至此安裝過(guò)程全部完成。圖1-5選擇程序組菜單畫(huà)面圖1-6開(kāi)始拷貝文件畫(huà)面圖1-7安裝完成畫(huà)面返回本節(jié)1.2.3Delphi6卸載（1）依次選擇的“開(kāi)始”→“設(shè)置”→“控制面板”→“添加/刪除”項(xiàng)，出現(xiàn)如圖1-8所示窗口。（2）在列表中選擇“BorlandDelphi6”選項(xiàng)，如圖1-9所示，單擊“Next”按鈕。（3）打開(kāi)卸載模式選擇窗口，如圖1-10所示。（4）單擊“Next”按鈕，隨后出現(xiàn)確認(rèn)窗口，單擊“Remove”按鈕，出現(xiàn)程序卸載進(jìn)度條。（5）完成后，出現(xiàn)完成畫(huà)面，如圖1-11所示。單擊“Finish”按鈕，程序卸載完成。圖1-8安裝/刪除畫(huà)面圖1-9卸載向?qū)М?huà)面圖1-10卸載選擇畫(huà)面圖1-11卸載完成畫(huà)面返回本節(jié)1.3Delphi6的界面描述1.3.1主窗體1.3.2菜單欄1.3.3工具欄1.3.4對(duì)象監(jiān)視器1.3.5窗體1.3.6代碼編輯器1.3.7代碼管理器1.3.8控件板1.3.9對(duì)象樹(shù)狀監(jiān)視器1.3.10幫助系統(tǒng)返回本章首頁(yè)圖1-12Delphi6界面1.3.1主窗體 1、標(biāo)題欄2、菜單欄3、工具欄4、控件板5、桌面管理器(如圖1-13所示)圖1-13主窗體返回本節(jié)1.3.2菜單欄 菜單欄包括以下內(nèi)容。“File”（文件菜單）如圖1-14所示“Edit”（編輯）如圖1-15所示“Search”（查找）如圖1-16所示“View”（查看）如圖1-17所示“Project”（項(xiàng)目）如圖1-18所示圖1-14文件菜單展開(kāi)圖1-15編輯菜單展開(kāi)圖1-16查找菜單展開(kāi)圖1-17查看菜單展開(kāi)圖1-18項(xiàng)目菜單展開(kāi)“Run”（運(yùn)行）如圖1-19所示“Component”（控件）如圖1-20所示“Database”（數(shù)據(jù)庫(kù)）如圖1-21所示“Tools”（工具）如圖1-22所示“Windows”（窗口）如圖1-23所示“Help”（幫助）如圖1-24所示圖1-19運(yùn)行菜單展開(kāi)圖1-20控件菜單展開(kāi)圖1-21數(shù)據(jù)庫(kù)菜單展開(kāi)圖1-22工具菜單展開(kāi)圖1-23窗口菜單展開(kāi)圖1-24幫助菜單展開(kāi)返回本節(jié)1.3.3工具欄 圖1-25工具欄返回本節(jié)1.3.4對(duì)象監(jiān)視器 對(duì)象監(jiān)視器由標(biāo)題欄、對(duì)象選擇下拉列表框以及屬性選項(xiàng)卡和事件選項(xiàng)卡組成，如圖1-26所示。對(duì)象監(jiān)視器的操作主要有如下幾方面：（1）選擇對(duì)象（2）設(shè)置屬性（3）添加事件圖1-26對(duì)象監(jiān)視器返回本節(jié)1.3.5窗體 窗體由標(biāo)題欄和下方空白設(shè)計(jì)區(qū)組成，如圖1-27所示。圖1-27空窗體返回本節(jié)1.3.6代碼編輯器圖1-28代碼編輯窗口返回本節(jié)1.3.7代碼管理器代碼管理器窗口以樹(shù)形分叉的形式列出了當(dāng)前單元的代碼構(gòu)成如下（如圖1-29所示）：?jiǎn)卧褂玫念悾ㄈ鏣form1），鼠標(biāo)單擊十字展開(kāi)樹(shù)形分叉顯示類的數(shù)據(jù)成員和過(guò)程成員。單元使用的變量和常量（Variables/Constants）,管理著單元中使用的變量和常量。引用單元，管理著單元鏈接的單元。圖1-29代碼管理器窗口（左側(cè)）返回本節(jié)1.3.8控件板 Delphi提供了16頁(yè)選項(xiàng)卡，如圖1-30所示。圖1-30控件板控件板常用控件如下：Standard頁(yè)Additional控件頁(yè)

Win32控件頁(yè)Systerm控件頁(yè)DataControls控件頁(yè)DecisionCube控件頁(yè)Qreport控件頁(yè)。返回本節(jié)1.3.9對(duì)象樹(shù)狀監(jiān)視器 圖1-31對(duì)象樹(shù)狀監(jiān)視器窗口返回本節(jié)1.3.10幫助系統(tǒng) （1）從“開(kāi)始”菜單中依次選擇“程序”→“BorlandDelphi6”→“Help”選項(xiàng)展開(kāi)如圖1-32所示。（2）在Delphi6主窗體中，用鼠標(biāo)單擊展開(kāi)“Help”幫助菜單，如圖1-24所示。（3）在編寫(xiě)代碼時(shí)，Delphi6提供了上下文敏感幫助。如圖1-35所示為將光標(biāo)移到“Class”字符處后，單擊F1鍵打開(kāi)的窗口。圖1-32幫助畫(huà)面圖1-33BDE管理器幫助窗口圖1-34Delphi幫助窗口圖1-35關(guān)于“Class”的相關(guān)幫助窗口返回本節(jié)THANKYOUVERYMUCH！本章到此結(jié)束，謝謝您的光臨！結(jié)束放映返回本章首頁(yè)第2章

ObjectPascal程序設(shè)計(jì)語(yǔ)言

本章要點(diǎn)2.1基本字符和符號(hào)2.2常量與變量2.3數(shù)據(jù)類型2.4運(yùn)算符2.5語(yǔ)句2.6過(guò)程與函數(shù)本章要點(diǎn)

常量與變量的定義和使用。

數(shù)據(jù)類型的概念與使用。

運(yùn)算符的概念與使用。

ObjectPascal語(yǔ)言的語(yǔ)句、過(guò)程和函數(shù)。返回本章首頁(yè)2.1基本字符和符號(hào)1．ObjectPascal的字符集2．特殊字符3．標(biāo)識(shí)符4．保留字5．指令字6．?dāng)?shù)字7．標(biāo)號(hào)8．字符串返回本章首頁(yè)2.2常量與變量2.2.1聲明變量2.2.2聲明常量返回本章首頁(yè)2.2.1聲明變量 變量是程序代碼中代表一個(gè)內(nèi)存地址的標(biāo)識(shí)符，而此地址的內(nèi)存內(nèi)容在程序代碼執(zhí)行時(shí)可以被改變。在所有變量說(shuō)明以前加上保留字Var。變量說(shuō)明左邊是變量的名稱，右邊則是該變量的類型，中間用冒號(hào)隔開(kāi)。另外，在聲明變量時(shí)注意：一是變量名要符合Pascal語(yǔ)言關(guān)于標(biāo)識(shí)符的規(guī)則；二是必須指定變量的類型，三是盡量使定義的變量或標(biāo)識(shí)符有意義，以便于記憶。返回本節(jié)2.2.2聲明常量 1．純常量：是一種預(yù)先定義的標(biāo)識(shí)符，其值在定義后永遠(yuǎn)不會(huì)改變。2．類型常量：用于保存數(shù)組、記錄、過(guò)程以及指針等類型的值。類型常量不能出現(xiàn)在常量表達(dá)式中。聲明類型常量的語(yǔ)法規(guī)則為：ConstIdentifer:Type=Value返回本節(jié)2.3數(shù)據(jù)類型2.3.1簡(jiǎn)單類型2.3.2字符串類型2.3.3結(jié)構(gòu)數(shù)據(jù)類型

2.3.4指針類型

返回本章首頁(yè)2.3.1簡(jiǎn)單類型 1．有序類型（1）整數(shù)類型（2）字符類型（3）布爾類型(如表2-1所示)（4）枚舉型（5）子界類型2．實(shí)數(shù)類型包括Real48、Single、Double、Extended、Comp和Currency。通常使用的Real和Double類型是等價(jià)的。返回本節(jié)2.3.2字符串類型Delphi主要支持兩種類型的字符串：ShortString和AnsiString。ShortString數(shù)據(jù)類型主要是為了能和Delphi1.0和BorlandPascal的早期版本兼容。String既可以是ShorString類型也可以是AnsiString類型，缺省是AnsiString類型。返回本節(jié)2.3.3結(jié)構(gòu)數(shù)據(jù)類型 1、集合類型2、數(shù)組類型3、記錄類型4、文件類型5、類類型6、類引用類型7、接口類型等返回本節(jié)2.3.4指針類型 在Delphi中創(chuàng)建一個(gè)數(shù)據(jù)結(jié)構(gòu)時(shí)，首先要分配內(nèi)存空間。分配的內(nèi)存空間用于存儲(chǔ)數(shù)據(jù)結(jié)構(gòu)中的數(shù)據(jù)。使用指針可以使程序不必每次需要時(shí)都去分配，只要申請(qǐng)一次，其他過(guò)程或函數(shù)使用同一塊內(nèi)存空間時(shí)，只需使用該內(nèi)存空間的地址即可。在運(yùn)算上，指針變量與一般變量無(wú)區(qū)別，如p:=q;。當(dāng)要引用指針?biāo)赶虻淖兞繒r(shí)，必須在指針后使用“^”。返回本節(jié)2.4運(yùn)算符 2.4.1算術(shù)運(yùn)算符2.4.2邏輯運(yùn)算符2.4.3關(guān)系運(yùn)算符

2.4.4運(yùn)算符的優(yōu)先級(jí)返回本章首頁(yè)2.4.1算術(shù)運(yùn)算符 算術(shù)運(yùn)算符用于完成二元或一元算術(shù)運(yùn)算。（見(jiàn)表2-2和表2-3）運(yùn)算符功能運(yùn)算數(shù)類型運(yùn)算結(jié)果類型+加法運(yùn)算IntegerRealIntegerReal-減法運(yùn)算IntegerRealIntegerReal*乘法運(yùn)算IntegerRealIntegerReal/除法運(yùn)算IntegerRealRealRealDiv整型除法IntegerIntegerMod計(jì)算余數(shù)（取模）IntegerInteger表2-2二元運(yùn)算符表2-3一元運(yùn)算符運(yùn)算符功能運(yùn)算數(shù)類型運(yùn)算結(jié)果類型+同號(hào)IntegerRealIntegerReal-取負(fù)值IntegerRealIntegerReal返回本節(jié)2.4.2邏輯運(yùn)算符 邏輯運(yùn)算符實(shí)際上可分為兩類：邏輯運(yùn)算符和布爾運(yùn)算符。（見(jiàn)表2-4和表2-5）運(yùn)算符功能運(yùn)算數(shù)類型運(yùn)算結(jié)果類型Not按位‘非’IntegerBooleanAnd按位‘與’IntegerBooleanOr按位‘或’IntegerBooleanXor按位‘異或’IntegerBooleanShl按位左移IntegerBooleanShr按位右移IntegerBoolean表2-4邏輯運(yùn)算符表2-5布爾運(yùn)算符

運(yùn)算符功能運(yùn)算數(shù)類型運(yùn)算結(jié)果類型Not真假值反向BooleanBooleanAnd邏輯and運(yùn)算BooleanBooleanOr邏輯or運(yùn)算BooleanBooleanXor邏輯xor運(yùn)算BooleanBoolean返回本節(jié)2.4.3關(guān)系運(yùn)算符 表2-6關(guān)系運(yùn)算符（1）運(yùn)算符功能運(yùn)算數(shù)類型運(yùn)算結(jié)果類型=等于兼容的簡(jiǎn)單類型、類類型、集合類型、字符串類型Boolean<>不等于兼容的簡(jiǎn)單類型、類類型、集合類型、字符串類型Boolean<小于兼容的簡(jiǎn)單類型、字符串類型Boolean>大于兼容的簡(jiǎn)單類型、字符串類型Boolean<=小于或等于兼容的簡(jiǎn)單類型、字符串類型Boolean>=大于或等于兼容的簡(jiǎn)單類型、字符串類型Boolean<=包含于兼容的集合類型Boolean>=包含兼容的集合類型BooleanIn屬于兼容的集合類型Boolean表2-6關(guān)系運(yùn)算符（2）返回本節(jié)2.4.4運(yùn)算符的優(yōu)先級(jí)表2-7運(yùn)算符的優(yōu)先級(jí)運(yùn)算符優(yōu)先級(jí)分類Not1（最高）一元運(yùn)算符*，／，Div，Mod，Shl，Shr，as2乘法運(yùn)算符＋，－，Or，Xor3加法運(yùn)算符=，<>，<，>，<=，>=，In4關(guān)系運(yùn)算符返回本節(jié)2.5語(yǔ)句 2.5.1賦值語(yǔ)句2.5.2塊語(yǔ)句2.5.3控制語(yǔ)句返回本章首頁(yè)2.5.1賦值語(yǔ)句 下面的例子就是一個(gè)最簡(jiǎn)單的賦值語(yǔ)句：X:=Y+Z;在賦值語(yǔ)句的左邊是此賦值的數(shù)據(jù)變量，右邊是一個(gè)數(shù)值或者表達(dá)式，中間用:=連接。返回本節(jié)2.5.2塊語(yǔ)句 塊語(yǔ)句是一種把若干簡(jiǎn)單語(yǔ)句組合成復(fù)雜語(yǔ)句的方式。經(jīng)常使用的塊語(yǔ)句是Begin／End語(yǔ)句，下面的例子就是一個(gè)簡(jiǎn)單的塊語(yǔ)句：BeginA:=5;C:=A*8/2;End;返回本節(jié)2.5.3控制語(yǔ)句 ObjectPascal使用控制語(yǔ)句來(lái)控制程序的執(zhí)行順序。7個(gè)是分支語(yǔ)句，3個(gè)是循環(huán)語(yǔ)句：（1）分支語(yǔ)句

If語(yǔ)句、Case語(yǔ)句、GOTO語(yǔ)句、

Break語(yǔ)句、

Continue語(yǔ)句、

Exit語(yǔ)句、

Halt語(yǔ)句。（2）循環(huán)語(yǔ)句

Repeat語(yǔ)句、While語(yǔ)句、For語(yǔ)句返回本節(jié)2.6過(guò)程與函數(shù) 2.6.1過(guò)程與函數(shù)的定義和調(diào)用2.6.2過(guò)程與函數(shù)的參數(shù)返回本章首頁(yè)2.6.1過(guò)程與函數(shù)的定義和調(diào)用1．過(guò)程與函數(shù)的定義每一個(gè)過(guò)程或函數(shù)都從表頭開(kāi)始，表頭包含其識(shí)別名稱及外部傳入的參數(shù)，過(guò)程開(kāi)始處為保留字Procedure，如：ProcedureName(ConstPeter：Integer);函數(shù)與過(guò)程不同的地方是，函數(shù)有返回值，這樣在函數(shù)的首部就多了一個(gè)返回結(jié)果類型。2．過(guò)程與函數(shù)的調(diào)用調(diào)用過(guò)程的語(yǔ)句只是一個(gè)獨(dú)立的語(yǔ)句，而調(diào)用函數(shù)的語(yǔ)句不是一個(gè)獨(dú)立的語(yǔ)句，它必須要返回一個(gè)值，且返回?cái)?shù)值數(shù)據(jù)類型必須與定義相同。例如：MinNumber:=Min(People);另外也可以將函數(shù)調(diào)用直接作為操作數(shù)。例如：X:=Min(People)+50;3．指示字（1）External：表示過(guò)程或函數(shù)是外部的，通常用于從動(dòng)態(tài)連接庫(kù)中引用過(guò)程或函數(shù)。（2）Assembler：表示過(guò)程或函數(shù)是使用嵌入式匯編語(yǔ)言編寫(xiě)的。（3）Forward：表示過(guò)程或函數(shù)是向前查找的。該過(guò)程或函數(shù)的定義必須在后面的某個(gè)地方定義。4．與調(diào)用約定在聲明函數(shù)或過(guò)程時(shí)，可以在附屬塊中指定函數(shù)過(guò)程或函數(shù)的參數(shù)傳遞方式。主要有Register，Pascal，Cdecl，Stdcall，Safecall等五種傳遞方式。缺省的調(diào)用方式是Register。返回本節(jié)2.6.2過(guò)程與函數(shù)的參數(shù)

經(jīng)常用到的參數(shù)主要有以下幾種:1．傳值參數(shù)傳值參數(shù)會(huì)把外部傳入的值作一份拷貝，保存在此參數(shù)內(nèi)，因此在過(guò)程內(nèi)對(duì)此參數(shù)所作的任何改變，都不會(huì)影響外部傳入的值。參數(shù)前不加任何的保留字，即為傳值參數(shù)。2．引用參數(shù)通過(guò)引用來(lái)傳遞參數(shù)時(shí)，允許過(guò)程或函數(shù)改變參數(shù)的值。通過(guò)引用傳遞的參數(shù)由關(guān)鍵字Var表示。

3．常量參數(shù)在過(guò)程或函數(shù)的運(yùn)行當(dāng)中，如果形參的值不變，就可以使用常量來(lái)傳遞參數(shù)。與引用傳遞的參數(shù)不同的是，將參數(shù)前加上的保留字Var改為Const。返回本節(jié)THANKYOUVERYMUCH！本章到此結(jié)束，謝謝您的光臨！結(jié)束放映返回本章首頁(yè)第3章

圖形界面設(shè)計(jì)與項(xiàng)目管理

本章要點(diǎn)3.1菜單的設(shè)計(jì)3.2工具欄的設(shè)計(jì)3.3狀態(tài)欄的設(shè)計(jì)3.4按鈕及面板的設(shè)計(jì)3.5文本對(duì)象的設(shè)計(jì)3.6有關(guān)窗體的操作3.7

有關(guān)代碼編輯器的使用3.8

項(xiàng)目管理本章要點(diǎn)

詳細(xì)介紹了菜單欄、工具欄和狀態(tài)欄的屬性及其設(shè)計(jì)方法。描述了按鈕、位圖按鈕控件的屬性以及如何激活動(dòng)作，發(fā)出命令。介紹了容器型控件如面板、框架、狀態(tài)面板、酷工具欄的使用方法。返回本章首頁(yè)通過(guò)大量實(shí)例闡明了文本對(duì)象常用控件的屬性、方法。并將常用的文本處理過(guò)程與函數(shù)集中講解。進(jìn)一步闡明了代碼編輯器的使用，包括代碼編輯器的一些重要功能。

解釋了項(xiàng)目的概念，以及如何使用項(xiàng)目管理器。返回本章首頁(yè)3.1菜單的設(shè)計(jì)

3.1.1菜單界面3.1.2主菜單設(shè)計(jì)3.1.3彈出型菜單設(shè)計(jì)返回本章首頁(yè)3.1.1菜單界面菜單命令被選中后，一般來(lái)說(shuō)有以下三種作用：用于執(zhí)行某種應(yīng)用程序的操作。用于設(shè)置某特殊選項(xiàng)的狀態(tài)，這些命令常用復(fù)選標(biāo)記“”或單選標(biāo)記“

”來(lái)表明該選項(xiàng)是否處于有效狀態(tài)。用于打開(kāi)對(duì)話框，具體操作在對(duì)話框中進(jìn)行。圖3-1WordXP中文版“插入”菜單返回本節(jié)3.1.2主菜單設(shè)計(jì)

1、MainMenu控件的設(shè)計(jì)用鼠標(biāo)右鍵單擊MainMenu控件圖標(biāo)，打開(kāi)一個(gè)彈出式菜單，從中選擇MenuDesigner命令。先在窗體中單擊MainMenu控件圖標(biāo)，然后在對(duì)象監(jiān)視器中單擊Items屬性編輯框右邊的省略號(hào)按鈕。打開(kāi)后的主菜單設(shè)計(jì)器窗口如圖3-2所示。鼠標(biāo)雙擊窗體中的MainMenu控件圖標(biāo)。圖3-2主菜單設(shè)計(jì)器窗口2．菜單設(shè)計(jì)方法（1）增加菜單項(xiàng)（如圖3-3所示）

（2）編輯菜單項(xiàng)（3）插入菜單項(xiàng)（如圖3-4所示）（4）刪除菜單項(xiàng)（5）增加分隔條（如圖3-5所示）（6）定義加速鍵和快捷鍵（如圖3-6、3-7所示）（7）調(diào)整菜單位置（見(jiàn)圖3-8）（8）創(chuàng)建子菜單（9）菜單模板（如圖3-9所示）圖3-3設(shè)置中的“文件”菜單圖3-4插入菜單項(xiàng)窗口圖3-5設(shè)計(jì)了分隔條的“文件”菜單圖3-6“文件”菜單示例圖3-7加速鍵設(shè)計(jì)圖圖3-8菜單設(shè)計(jì)器的彈出式菜單圖3-9菜單模板窗口圖3-10保存模板對(duì)話框返回本節(jié)3.1.3彈出型菜單設(shè)計(jì)

選中Form對(duì)象后轉(zhuǎn)換到屬性頁(yè)，并單擊“PopupMenu”右邊的空白框，選中設(shè)計(jì)完的彈出型菜單名稱，最后運(yùn)行程序即可如圖所示。圖3-11激活的彈出式菜單返回本節(jié)3.2工具欄的設(shè)計(jì)

（1）啟動(dòng)新窗口（2）添加按鈕（如圖3-12所示）（3）為按鈕提供位圖（如圖3-13~15所示）（4）為各個(gè)按鈕添加提示信息（5）分別為有關(guān)工具按鈕添加有關(guān)事件代碼。返回本章首頁(yè)圖3-12工具欄設(shè)計(jì)菜單圖3-13選擇圖像窗口圖3-14設(shè)置Images特性圖3-15添加完圖標(biāo)的工具欄返回本節(jié)3.3狀態(tài)欄的設(shè)計(jì)（1）單擊Win32頁(yè)中的StatusBar狀態(tài)欄控件見(jiàn)圖3-16（2）雙擊狀態(tài)欄的Panels屬性，并從中選擇“PanelsEditor”命令即可，如圖3-17所示。

（3）單擊窗口中的“New”按鈕，就會(huì)增加一個(gè)子面板。（4）在對(duì)象監(jiān)視器中設(shè)置子面板的屬性。（5）關(guān)閉EditingStatusBar1.Panels窗口。返回本章首頁(yè)圖3-16具有狀態(tài)欄的窗口圖3-17EditingStatusBar1.Panels窗口返回本節(jié)3.4按鈕及面板的設(shè)計(jì)

3.4.1基本命令按鈕3.4.2位圖命令按鈕3.4.3單選按鈕3.4.4分組框3.4.5單選按鈕組3.4.6面板3.4.7框架3.4.8狀態(tài)面板3.4.9酷工具欄控件返回本章首頁(yè)3.4.1基本命令按鈕

屬性數(shù)據(jù)類型說(shuō)明NameString按鈕的名稱，編寫(xiě)程序代碼時(shí)使用它CaptionString按鈕的標(biāo)題，就是按鈕上顯示的文字?？梢詾榘粹o指定快捷鍵Cancle

Boolean

缺省值為False，當(dāng)取值為T(mén)rue時(shí)，無(wú)論何時(shí)按下Esc鍵，按鈕中Taborder值最小的按鈕會(huì)產(chǎn)生Onclick事件Default

Boolean

當(dāng)屬性值為T(mén)rue時(shí)，按下Enter鍵，當(dāng)前按鈕產(chǎn)生Onclick事件，缺省值為T(mén)rueHintString按鈕的提示文本保存在這里，當(dāng)鼠標(biāo)光標(biāo)停留時(shí)，顯示提示文本ShowhintBoolean確定是否顯示提示文本，缺省值為False表3-1按鈕的主要屬性返回本節(jié)3.4.2位圖命令按鈕

屬性數(shù)據(jù)類型說(shuō)明KindGlyphLayout

Margin

NumGlyphsSpaceTBitBtnKindTBitmapTbuttonlayout

Integer

TNumGlyphsTbuttonstyle用于確定按鈕的類型，缺省值為自定義型bkcustom用于指定要顯示在位圖按鈕上的位圖決定位圖按鈕上圖像和文字的位置，有Left，Right，Top，Bottom四個(gè)值分別表示位圖位于位圖按鈕的左、右、上、下用于設(shè)定圖像與按鈕的邊界之間的距離（以像素為單位），默認(rèn)值為－1，表示圖像和文字總是居中，設(shè)為0表示緊挨著按鈕的邊界指定位圖按鈕使用的位圖的數(shù)目，只能為1，2，3，4確定位圖按鈕的外觀顯示方式，缺省為bsautodetect表3-2位圖按鈕的屬性表3-3各按鈕屬性屬性Button1Button2BitBtn1BitBtin2BitBtn1BitBtn2CaptionButton1Button2對(duì)話框&CloseOkCancelKind

bkCustombkClosebkOkbkCancelCancelFalseTrueFalseFalseFalseFalseDefaultTrueFalseFalseFalseFalseFalseModalResultmrNonemrNonemrNonemrNonemrOkmrCancel屬性說(shuō)明Cancel該屬性值為T(mén)rue時(shí),則無(wú)論用戶何時(shí)按Esc鍵,都會(huì)執(zhí)行該按鈕的OnClick事件。如果同一個(gè)窗體上具有多個(gè)這樣的按鈕,則會(huì)執(zhí)行TabOrder值最小的按鈕的OnClick事件Default這個(gè)屬性和Cancel屬性相似。當(dāng)用戶按下Enter鍵時(shí)，將執(zhí)行該按鈕的OnClick事件。但有一個(gè)例外，如果當(dāng)前擁有輸入焦點(diǎn)的控件為另一個(gè)按鈕時(shí)，按Enter鍵時(shí)則只執(zhí)行當(dāng)前按鈕的OnClick事件Kind這個(gè)屬性為位圖按鈕所特有，選擇Kind屬性的某個(gè)選項(xiàng)，用于決定該位圖按鈕的種類每一種位圖按鈕具有自己獨(dú)特的功能。位圖按鈕常用于各種對(duì)話框或模態(tài)窗口中，根據(jù)按鈕的ModalResult屬性值來(lái)決定對(duì)模態(tài)窗口的操作ModalResult模態(tài)值。當(dāng)單擊位圖按鈕時(shí)，將把對(duì)話框的模態(tài)值設(shè)為相同的值。它將決定位圖按鈕的父窗體的關(guān)閉方式。如單擊mbOk按鈕,將關(guān)閉對(duì)話框，返回mrOk值表3-4各按鈕屬性說(shuō)明返回本節(jié)3.4.3單選按鈕

圖3-22單選按鈕實(shí)例屬性數(shù)據(jù)類型說(shuō)明Alignment

TleftRight

用于設(shè)置單選框的文字與小圓圈的位置關(guān)系，taLeftJustify表示文字顯示在小圓圈的左邊；taRightJustify表示文字顯示在小圓圈的右邊CheckedBoolean這個(gè)屬性用于設(shè)置選項(xiàng)是否被選中，當(dāng)值為T(mén)rue時(shí)，表示選中；當(dāng)值為False時(shí)，表示未選中表3-5單選按鈕屬性返回本節(jié)3.4.4分組框

圖3-23分組框示例返回本節(jié)3.4.5單選按鈕組

圖3-24單選按鈕組示例表3-6單選按鈕組的常用屬性屬性數(shù)據(jù)類型說(shuō)明ColumnsLongint用于設(shè)置單選按鈕組中的欄數(shù)，默認(rèn)值為1，最大可設(shè)為16ItemIndexInteger用于返回單選按鈕組中被選擇的項(xiàng)的序號(hào)，第一項(xiàng)為0ItermsTstring在設(shè)計(jì)期，可以在編輯器中輸入每個(gè)單選框的標(biāo)題，在運(yùn)行期，可以通過(guò)Tstrings對(duì)象來(lái)操縱Iterms特性返回本節(jié)3.4.6面板表3-7面板控件的常用屬性(1)屬性數(shù)據(jù)類型說(shuō)明AlignTAlign用于設(shè)置面板控件在窗體中的放置位置BevelInner

TbevelCut

用于設(shè)置面板的內(nèi)部斜面樣式，可以設(shè)為以下值：bvNone（沒(méi)有斜面），bvLowered（沉降的斜面），bvRiased（升起的斜面）BevelOuterTBevelCut用于設(shè)置面板的外斜面形式BevelWidthInteger面板的斜面寬度BorderStyleTBorderStyle面板的邊框樣式BorderWidthInteger面板的邊框?qū)挾菴aptionstring用于設(shè)置面板控件使用的標(biāo)題ControlCountInteger用于設(shè)置面板中的子控件數(shù)目ControlsTControl用于設(shè)置面板中的控件數(shù)目EnabledBoolean用于設(shè)置面板中的所有子控件是允許還是被禁用HandleHWnd代表面板的窗口句柄表3-7面板控件的常用屬性(2)返回本節(jié)3.4.7框架1．創(chuàng)建框架（圖3-25表3-8）2．框架的共享（1）添加框架到控件板上（如圖3-27、3-28所示）（2）添加框架到對(duì)象庫(kù)中（如圖3-29、3-30所示）3．框架的使用（如圖3-31~33所示）圖3-25新建的框架表3-8框架的屬性屬性屬性值NameFontHeightWidthMFrane華彩、五號(hào)160190圖3-27“ComponentTemplateInformation”對(duì)話框圖3-28新添加的框架圖標(biāo)圖3-29“AddtoRepository”對(duì)話框圖3-30添加了框架的對(duì)象庫(kù)圖3-31確認(rèn)添加單元文件對(duì)話框圖3-32添加了框架的窗體圖3-33SelectFrametoInsert對(duì)話框返回本節(jié)3.4.8狀態(tài)面板

Bevel控件的常用屬性如下：Shape：數(shù)據(jù)類型為T(mén)BevelShape，用于定義形狀?？晒┻x擇的值如表3-10所示。Style：數(shù)據(jù)類型為T(mén)BevelStyle，用于確定斜面是否凹陷或凸起。當(dāng)選擇bsLowered值時(shí)，斜面凹陷；當(dāng)選擇bsRaised值時(shí)，斜面凸起。如圖3-34所示。值含義bsBox矩形框，根據(jù)Style屬性決定客戶區(qū)域的凹陷與凸起bsFrame矩形輪廓，客戶區(qū)域由凹陷與凸起的輪廓包圍bsTopLine在客戶區(qū)域的上邊顯示一條線bsBottomLine在客戶區(qū)域的下邊顯示一條線bsLeftLine在客戶區(qū)域的左邊顯示一條線bsRightLine在客戶區(qū)域的右邊顯示一條線bsSpacer客戶區(qū)域?yàn)榭毡?-10Shape取值圖3-34狀態(tài)面板中Style屬性的不同取值返回本節(jié)3.4.9酷工具欄控件

表3-11TCoolbar控件的屬性屬性數(shù)據(jù)類型說(shuō)明AlignTAlign用于設(shè)置TCoolBar控件建立的工具欄的位置AutoSizeBoolean用于對(duì)工具欄的尺寸的自動(dòng)調(diào)節(jié)BandBorderStyleTBorderStyle用于設(shè)置工具欄上波段的邊框風(fēng)格BandsTCoolBands用于編輯波段BitmapTBitmap用于指定一個(gè)位圖，作為背景顯示在工具欄上FixedOrderBoolean當(dāng)設(shè)為T(mén)rue，段可以進(jìn)行拖曳，但段的順序不變FixedSizeBoolean用于尺寸設(shè)置ImageTImageList用于指定一個(gè)圖像列表，顯示在每個(gè)段的左邊ShowText

Boolean

如果該特性設(shè)置為T(mén)rue，可以在運(yùn)行期間把一個(gè)字符顯示在段上，字符串由段的Text特性指定。如果該特性設(shè)置為False，段只能顯示窗口類控制VerticalBoolean如果該特性設(shè)置為T(mén)rue，工具欄的段本身是垂直的，多個(gè)段從左到右排列。如果Vertical為False，工具欄的本身是水平的，多個(gè)段從上到下排列返回本節(jié)3.5文本對(duì)象的設(shè)計(jì)

3.5.1標(biāo)簽3.5.2靜態(tài)文本3.5.3編輯框3.5.4掩碼編輯框3.5.5列表框3.5.6組合框3.5.7多行文本編輯器3.5.8復(fù)選框3.5.9常用文本處理過(guò)程和函數(shù)返回本章首頁(yè)3.5.1標(biāo)簽標(biāo)簽的常見(jiàn)屬性如下：Caption：用于設(shè)置標(biāo)簽的標(biāo)題，即標(biāo)簽的顯示內(nèi)容。FocusControl：該屬性為標(biāo)簽控件獨(dú)有，可以用來(lái)為一些無(wú)標(biāo)題的控件提供快捷鍵。Autosize：用于決定標(biāo)簽是否隨字體的變化而自動(dòng)變動(dòng)尺寸以配合這些變化。Font：用于設(shè)置標(biāo)簽文字的字體格式和大小。返回本節(jié)3.5.2靜態(tài)文本靜態(tài)文本控件（StaticText）與標(biāo)簽控件基本相同，唯一不同之處在于靜態(tài)文本控件是窗口型控件，具有窗口句柄。因此，當(dāng)控件的快捷鍵必須屬于窗口型控件的時(shí)候，應(yīng)該使用靜態(tài)文本控件，而不能使用標(biāo)簽控件。靜態(tài)文本控件位于控件板的Additional選項(xiàng)頁(yè)上，操作方法與標(biāo)簽相同。返回本節(jié)3.5.3編輯框編輯框的常用屬性有：AutoSelect、AutoSize、BorderStyle、TextMaxLength、

PasswordChar、

ReadOnlyIMEMode、IMEName。編輯框控件的常用事件如下：OnKeyPress事件的功能：在編輯框輸入完文本后，按一下Enter鍵，程序就開(kāi)始執(zhí)行。編輯框的文本發(fā)生改變時(shí)觸發(fā)OnChange事件。編輯框獲得輸入焦點(diǎn)時(shí)觸發(fā)OnEnter事件。編輯框失去輸入焦點(diǎn)時(shí)觸發(fā)OnExit事件。返回本節(jié) 3.5.4掩碼編輯框在窗體上將MaskEdit選中，在對(duì)象監(jiān)視器中找到EditMask屬性，雙擊它，彈出一個(gè)如圖3-36所示的對(duì)話框。掩碼格式可以分為三部分：（1）輸入格式的第一部分是掩碼本身，也就是數(shù)據(jù)輸入格式(如表3-12所示)。（2）在輸入格式中的第二部分只有0和1兩種選擇（3）輸入格式的第三部分用于表示數(shù)據(jù)中的空位用那個(gè)字符代替顯示。圖3-36輸入掩碼編輯器表3-12輸入格式符(1)格式符意義l和Ll表示該位置只可能是一個(gè)字母，可以用光標(biāo)鍵跳過(guò)它，但是不能是其他類型的字符。L該位置必須是一個(gè)字符a和Aa表示該位置只可能是一個(gè)字母或數(shù)字字符。A表示該位置必須是一個(gè)字母或數(shù)字字符c和Cc表示該位置只可能是一個(gè)字母，C表示該位置必須有一個(gè)字母9和09表示該位置只可能是一個(gè)數(shù)字，0表示該位置必須有一個(gè)數(shù)字<和><格式符表示隨后的字母均以小寫(xiě)的形式顯示，直到遇到一個(gè)>格式字符或<>格式符。>格式符則和<正好相反\表示該格式符之后的那個(gè)掩碼格式符將作為數(shù)據(jù)中的普通字符對(duì)待。當(dāng)用戶想在數(shù)據(jù)中放進(jìn)一個(gè)掩碼格式符時(shí)，應(yīng)該在這個(gè)格式符前放一個(gè)\符號(hào)。如\A，\\等等#表示該位置可能是一個(gè)數(shù)字或正符號(hào)!如有!表示數(shù)據(jù)前的空格將不被保存在數(shù)據(jù)中，沒(méi)有!則數(shù)據(jù)后的空格不被保存。!格式符只能放在掩碼格式符的第一個(gè)字符處;和/標(biāo)準(zhǔn)的分隔符，可作為數(shù)據(jù)的一部分。其中/在顯示時(shí)為‘－’而非/表3-12輸入格式符(2)返回本節(jié)3.5.5列表框列表框控件的一些常用屬性有：

ExtendedSelect、Items、

ItemIndex、MultiSelected、

SelCount、

Selected、

Sorted。返回本節(jié)3.5.6組合框組合框的常用屬性有：Text、

SelText、

SelStart、

SelLength、Style設(shè)計(jì)后的效果如圖3-37所示。圖3-37列表框使用實(shí)例（1）單擊“File”菜單的“Application”命令，開(kāi)始一個(gè)新的應(yīng)用程序。（2）設(shè)置窗體屬性（如表3-13所示）。（3）設(shè)置完后往窗體中添加控件。（4）在對(duì)象編輯器中設(shè)置各個(gè)控件的屬性值（如表3-14所示）。（5）為各個(gè)控件添加事件（如表3-15）。（6）添加完事件后，為各個(gè)事件編寫(xiě)事件代碼（如圖3-35所示）。表3-13窗體屬性屬性屬性值Caption列表框的使用Font宋體、五號(hào)Height334Width350表3-14控件屬性設(shè)置表3-15各控件的事件控件事件響應(yīng)過(guò)程名ListBox1ComboBox1Button1Button2Button3Button4OnClickOnChangeOnClickOnClickOnClickOnClickChangeTextChangeTextButton1ClickButton2ClickButton3ClickButton4Click返回本節(jié)3.5.7多行文本編輯器Memo控件常用的方法：（1）使用剪貼板（2）文本的添加（3）文件的保存和裝載（程序的界面如圖3-38所示）。表3-16Memo控件常用屬性

屬性說(shuō)明Lines這是Memo控件最常用也是最有用的屬性，它用來(lái)顯示和保存Memo控件中的內(nèi)容Scrollbar很多控件都有這個(gè)屬性。用于設(shè)定控件有否滾動(dòng)條。它有四個(gè)值：SSNone表示既無(wú)水平滾動(dòng)條，也無(wú)垂直滾動(dòng)條；SSHorizontal表示只有水平滾動(dòng)條；SSVertal表示只有垂直滾動(dòng)條；SSBoth表示兩者都有。當(dāng)用戶要顯示的文本或其他的內(nèi)容較多時(shí)，建議選用SSBothWordWrap用于設(shè)定Momo控件是否具有自動(dòng)折行功能WantTabs這個(gè)屬性只在Memo、RichEdit和DBMemo控件中使用。通常在切換當(dāng)前焦點(diǎn)控件時(shí)，我們通常使用Tab鍵。但在上述三種控件中，編輯文本時(shí)常用Tab鍵來(lái)跳過(guò)若干個(gè)空格使文本對(duì)齊，這時(shí)就會(huì)有沖突。所以應(yīng)將WantTabs設(shè)置為T(mén)rue，這樣子在控件內(nèi)就可以使用Tab鍵來(lái)編輯文本圖3-38簡(jiǎn)單的文本編輯器返回本節(jié)3.5.8復(fù)選框圖3-39復(fù)選框示例復(fù)選框的幾個(gè)重要屬性：Alignment：數(shù)據(jù)類型為T(mén)LeftRight，用于控制復(fù)選框標(biāo)題的位置。Allowgrayed：數(shù)據(jù)類型為Boolean，用于確定復(fù)選框是否可以處于灰色顯示狀態(tài)。Checked：數(shù)據(jù)類型為Boolean，用于確定復(fù)選框是否被選中，缺省為False。State：數(shù)據(jù)類型為T(mén)CheckBoxS返回本節(jié)3.5.9常用文本處理過(guò)程和函數(shù)（1）編輯框的常用處理過(guò)程與函數(shù)

（2）列表框的常用處理過(guò)程與函數(shù)（3）組合框的常用處理過(guò)程與函數(shù)返回本節(jié)3.6有關(guān)窗體的操作3.6.1向項(xiàng)目中加入新的Form3.6.2在多個(gè)Form或單元間切換3.6.3在一個(gè)Form中調(diào)用另一個(gè)Form3.6.4在不同項(xiàng)目間共享Form3.6.5把Form以ASCII格式儲(chǔ)存3.6.6使用Form模板和向?qū)?.6.7在窗體上對(duì)控件進(jìn)行編輯返回本章首頁(yè)3.6.1向項(xiàng)目中加入新的Form（1）依次單擊“Tools”→“Repository”命令打開(kāi)對(duì)話框如圖3-40所示。（2）在Pages欄內(nèi)選擇Forms，這時(shí)Object欄中將顯示所有的Forms模板，從中選擇一個(gè)，本例選擇Aboutbox型窗體。（3）確定該模板為新Form或主Form，通過(guò)單擊下面的復(fù)選按鈕來(lái)完成。本例全部選中，然后單擊”O(jiān)K”按鈕即可，如圖3-41所示。圖3-40“ObjectRepository”對(duì)話框圖3-41“Aboutbox”窗體返回本節(jié)3.6.2在多個(gè)Form或單元間切換

依次單擊菜單“View”→“Forms”命令，打開(kāi)ViewForm對(duì)話框，如圖3-42所示。從列表框中選擇一個(gè)窗體后，單擊”O(jiān)K”按鈕。在多個(gè)單元間切換同窗體一樣。通過(guò)依次單擊“View”→“Units”命令，打開(kāi)ViewUnit對(duì)話框，如圖3-43所示?；騿螕艄ぞ邫谏系摹癠nits”按鈕亦可。圖3-42ViewForm對(duì)話框圖3-43ViewUnit對(duì)話框返回本節(jié)3.6.3在一個(gè)Form中調(diào)用另一個(gè)Form當(dāng)項(xiàng)目中添加了一個(gè)新的窗體時(shí)，系統(tǒng)會(huì)自動(dòng)將窗體的單元名加入到項(xiàng)目文件的Uses子句中。通常是把Uses子句放到各自單元的Implementation部分或者把一個(gè)單元的Uses子句放到Interface部分，另一個(gè)單元的Uses子句放到Implementation部分。通常的Form類型如圖3-44所示。返回本節(jié)3.6.4在不同項(xiàng)目間共享For 要與其他項(xiàng)目共享一個(gè)Form，有兩種方法，其一為，把它加入到對(duì)象庫(kù)中；其二為，把Form編譯成動(dòng)態(tài)鏈接庫(kù)。如圖3-45、46所示。圖3-44Form類的定義圖3-45加入到對(duì)象庫(kù)對(duì)話框返回本節(jié)3.6.5把Form以ASCII格式儲(chǔ)存

用鼠標(biāo)右鍵在窗體上單擊，打開(kāi)彈出式菜單，并從中選擇“ViewAsText”命令，如圖3-46所示。若要保存，單擊“File”菜單的“SaveAs”命令即可。圖3-46窗體的.DFM文件返回本節(jié)3.6.6使用Form模板和向?qū)紫仁褂谩癋ile”菜單的“New”命令打開(kāi)“NewIterms”對(duì)話框，如圖3-47所示。然后從中指定一個(gè)Form模板，窗體中包含有對(duì)話框、數(shù)據(jù)列表框、主從式報(bào)表等。最后單擊”O(jiān)K”按鈕。圖3-47“NewIterms”對(duì)話框返回本節(jié)3.6.7在窗體上對(duì)控件進(jìn)行編輯

（1）添加控件到Form上（2）在Form上重復(fù)添加同一個(gè)控件（3）在Form上選擇控件的幾種方法

（4）移動(dòng)、刪除控件以及調(diào)整控件大小（5）排列控件（如圖3-48所示）圖3-48Alignment對(duì)話框返回本節(jié)3.7有關(guān)代碼編輯器的使用3.7.1代碼編輯器窗口的打開(kāi)和切換3.7.2代碼編輯器的功能返回本章首頁(yè)3.7.1代碼編輯器窗口的打開(kāi)和切換

代碼編輯器是一個(gè)典型的多頁(yè)窗口，可以通過(guò)用鼠標(biāo)單擊頁(yè)頭的方式，在各個(gè)頁(yè)間切換。每一頁(yè)顯示一個(gè)已打開(kāi)的單元。如圖3-49所示。但是若想要編輯一個(gè)還沒(méi)有打開(kāi)的單元，則要使用“View”菜單下的“Unit”命令或單擊工具欄上的按鈕打開(kāi)ViewUnit對(duì)話框，如圖3-50所示。圖3-49代碼編輯器窗口圖3-50ViewUnit對(duì)話框返回本節(jié)3.7.2代碼編輯器的功能

1．語(yǔ)句模板功能(如圖3-51、3-52所示)

2．代碼完成功能（如圖3-53所示）3．參數(shù)提示功能（如圖3-54所示）

圖3-51語(yǔ)句模板列表框圖3-52使用語(yǔ)句模板完成的If語(yǔ)句圖3-53代碼完成功能選單圖3-54參數(shù)提示實(shí)例窗口返回本節(jié)3.8項(xiàng)目管理

3.8.1項(xiàng)目的概念3.8.2項(xiàng)目文件的打開(kāi)和保存3.8.3項(xiàng)目文件的編譯和運(yùn)行3.8.4項(xiàng)目管理器返回本章首頁(yè)3.8.1項(xiàng)目的概念（1）項(xiàng)目文件：描述了整個(gè)應(yīng)用程序的結(jié)構(gòu)和啟動(dòng)代碼，包含本項(xiàng)目使用的所有窗體和單元的引用（如圖3-55所示）。（2）窗體文件：每一個(gè)窗體都有相應(yīng)的窗體文件（.DFM），它保存著窗體和窗體內(nèi)各個(gè)控件的屬性如圖3-56所示。（3）單元文件：用來(lái)保存窗體事件的處理過(guò)程或單獨(dú)的源代碼，是應(yīng)用源代碼的主要部分。分為兩種：有窗體的單元文件和無(wú)窗體的單元文件。圖3-55項(xiàng)目文件的內(nèi)容圖3-56窗體文件返回本節(jié)3.8.2項(xiàng)目文件的打開(kāi)和保存要打開(kāi)一個(gè)你以前曾用過(guò)的項(xiàng)目，選擇“File”菜單的“OpenProject”命令，出現(xiàn)標(biāo)準(zhǔn)的Windows打開(kāi)文件窗口，從中選擇一個(gè)項(xiàng)目即可。要保存當(dāng)前項(xiàng)目，選擇“File”菜單“Save”命令。

返回本節(jié)3.8.3項(xiàng)目文件的編譯和運(yùn)行（1）編譯鏈接（2）重建項(xiàng)目（3）只編譯文件返回本節(jié)3.8.4項(xiàng)目管理器圖3-57項(xiàng)目管理器返回本節(jié)THANKYOUVERYMUCH！本章到此結(jié)束，謝謝您的光臨！結(jié)束放映返回本章首頁(yè)第4章圖形與圖像操作 本章要點(diǎn)4.1基本概念4.2實(shí)例介紹本章要點(diǎn) 闡述圖形與圖像控件的基本概念，重點(diǎn)對(duì)畫(huà)布和Shape控件進(jìn)行詳細(xì)說(shuō)明。舉例說(shuō)明顏色與運(yùn)動(dòng)的控制。舉例說(shuō)明繪圖程序的設(shè)計(jì)。返回本章首頁(yè)4.1基本概念4.1.1畫(huà)布 4.1.2Shape控件 4.1.3PaintBox控件返回本章首頁(yè)4.1.1畫(huà)布 TCanvas提供了子屬性，用于配置圖形。屬性如下：（1）Brush屬性(如圖4-1所示)（2）ClipRect屬性（3）Font屬性（4）Pen屬性(它的部分取值和意義如表4-1所示、筆的Style屬性取值及其意義見(jiàn)表4-2所示）表4-1Tpen的取值和意義取值意義Pmblack黑色筆Mpwhite白色筆Pmnop筆的樣式不變Pmnot將筆的Color屬性進(jìn)行“反”運(yùn)算得到筆的新顏色Pmcopy筆的Color屬性為筆的新顏色表4-2Style的取值及意義取值意義Pssolid筆畫(huà)出的線為實(shí)心線Psdash線條為虛線Psdot線條為點(diǎn)線Psdashdot線條為點(diǎn)劃線Psdashdotdot線條為雙點(diǎn)劃線Psclear線條為透明的返回本節(jié)4.1.2Shape控件 TShape控件的一些屬性：（1）Brush屬性：用于設(shè)置幾何圖形內(nèi)部的填充特性，包括填充的顏色和圖案。（2）Pen屬性：用于設(shè)置畫(huà)筆的屬性包括畫(huà)筆的顏色、線型和寬度等。（3）Shape屬性：用于指定要顯示的幾何圖形的種類，Shape屬性的取值和意義如表4-3所示。表4-3Shape屬性的取值和意義取值意義StCircle畫(huà)一個(gè)圓StEllipse畫(huà)一個(gè)橢圓StRectangle畫(huà)一個(gè)矩形StRoundRect畫(huà)一個(gè)帶圓角的矩形StRoundSquare畫(huà)一個(gè)帶圓角的正方形StSquare畫(huà)一個(gè)正方形返回本節(jié)4.1.3PaintBox控件 TPaintBox的屬性有很多，但我們經(jīng)常用到的只有Canvas。在TPaintBox的方法中，只有Paint比較重要。此方法使TPaintBox對(duì)自己上面的圖像進(jìn)行強(qiáng)制更新。TPaintBox的事件響應(yīng)函數(shù)有OnPaint，在每次WM-PAINT消息發(fā)來(lái)時(shí)這個(gè)函數(shù)被調(diào)用，從而使其上面的圖像被更新。返回本節(jié)4.2實(shí)例介紹 4.2.1例1：顏色與運(yùn)動(dòng)控制4.2.2例2：繪圖程序的設(shè)計(jì) 返回本章首頁(yè)4.2.1例1：顏色與運(yùn)動(dòng)控制程序要實(shí)現(xiàn)的功能是通過(guò)TListbox和TComBoBox控制TShape控件的形狀和顏色，通過(guò)TCheckBox控制Tshape控件是否移動(dòng)。設(shè)計(jì)步驟（如下圖）：1．窗體中控件的加入2．保存項(xiàng)目里的所有文件3．設(shè)定項(xiàng)目里控件的屬性圖4-2實(shí)例1的設(shè)計(jì)界面圖4-3StringListEditor對(duì)話框圖4-5實(shí)例1的運(yùn)行結(jié)果表4-4控件TListBox的屬性屬性屬性值NameColorListBoxMultiSelectFalse返回本節(jié)4.2.2例2：繪圖程序的設(shè)計(jì) 程序設(shè)計(jì)步驟：1．向窗體中加入控件并設(shè)置其屬性（如下圖）（1）確定窗體的總布局（2）向窗體中加入新的控件（3）添加控件美化窗口（4）添加新控件并設(shè)置其屬性2．保存項(xiàng)目里的所有文件3．為各控件添加響應(yīng)事件圖4-6實(shí)例2的設(shè)計(jì)界面圖4-7CoolBand對(duì)話框圖4-8快捷菜單圖4-9例2窗體構(gòu)架表4-10控件TToolBar的屬性屬性屬性值FlatTrueEdgeInneresNoneEdgeOuteresNone表4-9窗體控件屬性設(shè)置控件Align屬性Statusbar1AlBottompanel1AlLeftpanel2AlClient圖4-10“ImageList”圖像編輯器圖4-11TMenuItem屬性設(shè)置框圖4-12TMenuItem編輯窗口圖4-13對(duì)話框Filter編輯器圖4-14實(shí)例2的運(yùn)行結(jié)果返回本節(jié)THANKYOUVERYMUCH！本章到此結(jié)束，謝謝您的光臨！結(jié)束放映返回本章首頁(yè)第5章

多媒體與動(dòng)畫(huà)操作

本章要點(diǎn)?

5.1動(dòng)畫(huà)控件Animate的使用?

5.2多媒體控件MediaPlayer的使?

5.3制作圖片瀏覽器實(shí)例本章要點(diǎn) ?

動(dòng)畫(huà)控件Animate的功能說(shuō)明及其使用。?

多媒體控件MediaPlayer的功能說(shuō)明及其使用。?

使用Image控件制作圖片瀏覽器。返回本章首頁(yè)5.1動(dòng)畫(huà)控件Animate的使用 5.1.1動(dòng)畫(huà)控件Animate功能簡(jiǎn)介 5.1.2使用Animate控件實(shí)現(xiàn)動(dòng)畫(huà)播放的實(shí)例程序返回本章首頁(yè)5.1.1動(dòng)畫(huà)控件Animate功能簡(jiǎn)介Animate控件使用兩種不同的資源：?

它可以基于上面所描述的AVI文件，通過(guò)為FileName屬性設(shè)置相應(yīng)的值就能實(shí)現(xiàn)。?

它可以使用一種特殊的Windows95內(nèi)部動(dòng)畫(huà)，這是通用控件的一部分。通過(guò)選擇CommandAVI屬性的一個(gè)可能值就能實(shí)現(xiàn)。Animate控件位于控件板的Win32頁(yè)中，如圖5-1所示。圖5-1Animate控件的位置返回本節(jié)5.1.2使用Animate控件實(shí)現(xiàn)動(dòng)畫(huà)播放的實(shí)例程序1．向設(shè)計(jì)窗體中添加控件如圖5-2所示，在窗體的上半部分添加三個(gè)TGroupBox控件、一個(gè)TOpenDialog控件、七個(gè)TButton控件、三個(gè)TLabel控件、三個(gè)TSpinEdit控件，在窗體下半部分添加一個(gè)TListBox控件和一個(gè)Animate控件。其中，Animate控件的位置應(yīng)根據(jù)運(yùn)行程序時(shí)，需要出現(xiàn)的位置來(lái)放置。圖5-2例5-1程序的設(shè)計(jì)界面2．設(shè)定項(xiàng)目中控件的屬性（見(jiàn)表5-1）（1）設(shè)置分組框GroupBox控件的屬性（2）設(shè)置Button控件的屬性（3）設(shè)置Label控件的屬性（4）設(shè)置SpinEdit控件的屬性(見(jiàn)表5-2)（5）設(shè)置ListBox控件的屬性(見(jiàn)表5-3)（6）設(shè)置OpenDialog控件的屬性（見(jiàn)表5-4）（7）Animate控件的常用屬性和方法表5-1控件GroupBox的屬性控件屬性屬性值GroupBox1CaptionHeightWidth

120240GroupBox2CaptionHeightWidth

120240GroupBox3AlignCaptionHeightWidthalTop

145800表5-2SpinEdit控件的屬性屬性屬性值Icrement1Minvalue0表5-3ListBox控件的屬性屬性屬性值Items.Strings‘[UseanAVIFile]’‘FindFolder’‘FindFile’‘FindComputer’‘CopyFiles’‘CopyFile’‘RecycleFile’‘EmptyRecycle’‘DeleteFile’表5-4

OpenDialog控件的屬性屬性屬性值DefaultExt‘a(chǎn)vi’Options[ofPathMustExist,ofFileMustExist]Filter‘AVIfile(*.avi)|*.avi‘3．各個(gè)方法的實(shí)現(xiàn)代碼當(dāng)用戶第一次運(yùn)行這個(gè)程序時(shí)，希望列表框中的有一個(gè)默認(rèn)選項(xiàng)被選中。一般不希望是[UseanAVIFile]選項(xiàng)，所以將第二項(xiàng)作為缺省選項(xiàng)。這一要求可以通過(guò)窗體的OnCreate事件來(lái)實(shí)現(xiàn)，為了告訴用戶這個(gè)動(dòng)畫(huà)所擁有的動(dòng)畫(huà)幀數(shù)，可以調(diào)用Animate的FrameCount屬性來(lái)設(shè)置“幀數(shù)”標(biāo)簽的值。因?yàn)锳nimate控件沒(méi)有提供現(xiàn)成的方法。我們可以使用Seek方法，用一個(gè)Downto型的循環(huán)語(yǔ)句來(lái)實(shí)現(xiàn)。返回本節(jié)5.2多媒體控件MediaPlayer的使用5.2.1多媒體控件MediaPlayer功能簡(jiǎn)介5.2.2使用MediaPlayer控件制作一個(gè)VCD播放程序 返回本章首頁(yè)5.2.1多媒體控件MediaPlayer功能簡(jiǎn)介 MediaPlayer控件不僅可以播放AVI文件，還可以通過(guò)MCI播放很多媒體文件，比如WAV，MIDI，CD音樂(lè)文件和DAT文件。它位于控件板的System頁(yè)中，如圖5-3所示。圖5-3MediaPlayer控件的位置返回本節(jié)5.2.2使用MediaPlayer控件制作一個(gè)VCD播放程序1．向窗體中添加控件（其窗體及控件布局如圖5-4所示）。2．主要控件分析3．為控件添加代碼圖5-4窗體與控件的布局圖5-5MediaPlayer控件名

稱按鈕代號(hào)作

用PlaybtPlay開(kāi)始播放多媒體文件PausebtPause如果正在播放或錄音，則暫停播放或錄音，如果已經(jīng)停止了，則重新開(kāi)始播放或錄音StopbtStop停止播放與錄音PrevbtPrev跳到上一個(gè)音軌，如果此多媒體不支持音軌，則跳到文件的開(kāi)始處StepbtStep向前跳過(guò)一幀BackbtBack向后跳過(guò)一幀RecordbtRecord開(kāi)始錄音EjectbtEject彈出媒體文件（比如說(shuō)彈出光盤(pán)）表5-5

MediaPlayer控件的按鈕功能屬性屬性值A(chǔ)utoEnableTrueAutoOpenFalseAutoRewindTrueEnableButtons.btRecordEnableButtons.btEjectFalse

FalseDeviceTypedtAutoSelectDisplayOleContainer1TimeFormatTfMilliSecondsVisibleFalse表5-6

MediaPlayer１的屬性設(shè)置圖5-6Mediaplayer1控件布爾值設(shè)置圖5-7Mediaplayer1可播放的設(shè)備類型取值意義TfMilliSeconds以毫秒來(lái)計(jì)算長(zhǎng)度TfHMS以小時(shí)分鐘秒的方式計(jì)算長(zhǎng)度TfMSE以分鐘秒幀計(jì)算長(zhǎng)度TfFrames以幀數(shù)計(jì)算長(zhǎng)度表5-7TimeFormat部分取值及意義圖5-8Mediaplayer1可選擇的映像控件圖5-9Panels編輯框返回本節(jié)5.3制作圖片瀏覽器實(shí)例 5.3.1窗體及其控件的布局5.3.2控件的屬性設(shè)置5.3.3為控件添加事件驅(qū)動(dòng)程序5.3.4圖片瀏覽及其保存返回本章首頁(yè)5.3.1窗體及其控件的布局 創(chuàng)建一個(gè)新的項(xiàng)目。在主窗體中放置一個(gè)映像控件Image1。放置一個(gè)打開(kāi)文件對(duì)話框Opendialog1，用于打開(kāi)圖片文件的路徑搜索。放置一個(gè)保存文件對(duì)話框Savedialog1，用于對(duì)圖片進(jìn)行保存。

放置一個(gè)容器控件Bevel1，用于襯托兩個(gè)按鈕。

放置一個(gè)面板控件Panel1，用于說(shuō)明圖片瀏覽器。放置兩個(gè)按鈕控件，一個(gè)用于打開(kāi)圖片，另一個(gè)用于保存圖片。其窗體及其控件布局如圖5-10所示。圖5-10圖片瀏覽器的窗體及控件布局返回本節(jié)5.3.2控件的屬性設(shè)置 本范例所使用的控件屬性設(shè)置如表5-10所示。（1）Image1（2）Opendialog1和Savedialog1表5-10控件屬性設(shè)置表屬性屬性值Image1.CenterImage1.StrechTrueTrueOpendialog1.FilterBitmaps(*.bmp)|*.bmpSavedialog1FilterBitmaps(*.bmp)|*.bmpPanel1.Caption‘歡迎使用圖片瀏覽器’Button1.CaptionButton21.Caption打開(kāi)文件保存文件返回本節(jié)5.3.3為控件添加事件驅(qū)動(dòng)程序（1）“打開(kāi)文件”按鈕的事件驅(qū)動(dòng)程序。（2）“保存文件”按鈕的事件驅(qū)動(dòng)程序。返回本節(jié)5.3.4圖片瀏覽及其保存 對(duì)于已經(jīng)制作的簡(jiǎn)易圖片瀏覽器，可以進(jìn)行試運(yùn)行：（1）按“F9”鍵運(yùn)行。（2）單擊“打開(kāi)文件”按鈕，出現(xiàn)一個(gè)文件路徑搜索框如圖5-11所示。（3）找到瀏覽的圖片文件，其顯示效果如圖5-12所示。圖5-11圖片文件搜索 圖5-12程序運(yùn)行效果 返回本節(jié)THANKYOUVERYMUCH！本章到此結(jié)束，謝謝您的光臨！結(jié)束放映返回本章首頁(yè)第6章數(shù)據(jù)庫(kù)編程6.1Delphi數(shù)據(jù)庫(kù)系統(tǒng)概述6.2數(shù)據(jù)庫(kù)引擎管理器6.3連接ODBC數(shù)據(jù)庫(kù)6.4數(shù)據(jù)庫(kù)桌面系統(tǒng)6.5數(shù)據(jù)集控件6.6數(shù)據(jù)控制控件6.7DecisionCube控件6.8報(bào)表控件本章要點(diǎn)本章要點(diǎn)

Delphi應(yīng)用程序如何通過(guò)BDE和數(shù)據(jù)庫(kù)相連，BDE如何通過(guò)ODBC設(shè)置。

數(shù)據(jù)庫(kù)桌面系統(tǒng)DatabaseDesktop。

數(shù)據(jù)集控件的使用。

數(shù)據(jù)控制控件的使用。

Delphi的圖表顯示及報(bào)表打印。返回本章首頁(yè)6.1Delphi數(shù)據(jù)庫(kù)系統(tǒng)概述

圖6-1數(shù)據(jù)集控件的繼承關(guān)系TDataSetTClientDataSetTBDEDataSetTDBDataSetTQueryTStoredProcTTable返回本章首頁(yè)6.2數(shù)據(jù)庫(kù)引擎管理器6.2.1BDE簡(jiǎn)介

6.2.2數(shù)據(jù)庫(kù)引擎管理器的功能返回本章首頁(yè)6.2.1BDE簡(jiǎn)介

BDE為Delphi數(shù)據(jù)庫(kù)應(yīng)用程序訪問(wèn)各種數(shù)據(jù)庫(kù)提供了一致的接口。它具有以下一些特點(diǎn)：?

通過(guò)BDE訪問(wèn)任何一種格式的數(shù)據(jù)庫(kù)，用戶不必修改程序代碼，只需在BDE中設(shè)置新的數(shù)據(jù)庫(kù)的服務(wù)器名或者路徑即可。?

BDE非常適合開(kāi)發(fā)大型的客戶機(jī)/服務(wù)器應(yīng)用程序.?

如果要讓BDE能訪問(wèn)一個(gè)新的數(shù)據(jù)庫(kù)，只要在系統(tǒng)中安裝新數(shù)據(jù)庫(kù)的BDE驅(qū)動(dòng)程序或者ODBC驅(qū)動(dòng)程序就可以了。?

BDE是32位的數(shù)據(jù)庫(kù)引擎，支持多線程和有優(yōu)先級(jí)的多任務(wù)處理，多個(gè)應(yīng)用程序可以同時(shí)運(yùn)行并訪問(wèn)同一個(gè)數(shù)據(jù)庫(kù)。返回本節(jié)6.2.2數(shù)據(jù)庫(kù)引擎管理器的功能

1．?dāng)?shù)據(jù)庫(kù)別名的管理2．驅(qū)動(dòng)程序的管理3．系統(tǒng)配置圖6-2BDEAdministrator運(yùn)行界面圖6-3設(shè)置數(shù)據(jù)庫(kù)驅(qū)動(dòng)程序名圖6-4Paradox數(shù)據(jù)庫(kù)的BDE別名圖6-5BDEAdministrator管理驅(qū)動(dòng)程序的界面圖6-6BDEAdministrator的系統(tǒng)配置返回本節(jié)6.3連接ODBC數(shù)據(jù)庫(kù)配置ODBC驅(qū)動(dòng)程序:安裝ODBC驅(qū)動(dòng)程序，打開(kāi)Windows的控制面板，雙擊“ODBCDataSource（32bit）”，打開(kāi)ODBCDataSourceAdministrator對(duì)話框，如圖6-7所示。單擊“Add”按鈕，就會(huì)打開(kāi)創(chuàng)建新數(shù)據(jù)源對(duì)話框，如圖6-8所示。返回本章首頁(yè)這里從驅(qū)動(dòng)程序列表中選擇“MicrosoftAccessDriver（*.mdb）”，并單擊“完成”按鈕，則會(huì)打開(kāi)ODBCMicrosoftAccessSetup對(duì)話框，如圖6-9所示。選擇Configuration頁(yè)框，展開(kāi)Drivers節(jié)點(diǎn)，然后用鼠標(biāo)右鍵單擊ODBC，從彈出的菜單中選擇“New”選項(xiàng)，這時(shí)將打開(kāi)NewODBCDriver對(duì)話框，如圖6-10所示。接著，展開(kāi)Database頁(yè)框，選擇“Object”菜單上的“New”命令，打開(kāi)NewDatabaseAlias對(duì)話框，如圖6-11所示。其中，選擇ODBC-access作為數(shù)據(jù)庫(kù)驅(qū)動(dòng)程序，單擊“OK”。輸入完整的別名accesstry如圖6-12所示。最后，選擇Object菜單上的Apply命令，將新建的別名保存到BDE配置文件中。

圖6-7ODBCDataSourceAdministrator對(duì)話框圖6-8創(chuàng)建新數(shù)據(jù)源對(duì)話框圖6-9ODBCMicrosoftAccessSetup對(duì)話框圖6-10NewODBCDriver對(duì)話框圖6-11NewDatabaseAlias對(duì)話框圖6-12新的別名返回本節(jié)6.4數(shù)據(jù)庫(kù)桌面系統(tǒng)

6.4.1DatabaseDesktop概述6.4.2設(shè)定工作目錄和私有目錄6.4.3創(chuàng)建數(shù)據(jù)庫(kù)表

6.4.4數(shù)據(jù)庫(kù)表的屬性

6.4.5創(chuàng)建SQL類型數(shù)據(jù)表

6.4.6在DatabaseDesktop中使用查詢返回本章首頁(yè)6.4.1DatabaseDesktop概述DatabaseDesktop中主要有三種類型的窗口：表窗口查詢窗口SQL編輯器（如圖6-13所示）圖6-13DatabaseDesktop界面返回本節(jié)6.4.2設(shè)定工作目錄和私有目錄

1．設(shè)置工作目錄指在打開(kāi)或者保存文件時(shí)，DatabaseDesktop首先用來(lái)尋找文件的地方。例如，我們將工作目錄設(shè)置為d:\db，如圖6-14（a）所示。

2．設(shè)置私有目錄是用戶自己使用的目錄，在網(wǎng)絡(luò)上的其他用戶看不到這個(gè)目錄。例如，我們將私有目錄設(shè)置為d:\priv_db，如圖6-14（b）所示。（a）設(shè)置工作目錄（b）設(shè)置私有目錄圖6-14設(shè)置目錄返回本節(jié)6.4.3創(chuàng)建數(shù)據(jù)庫(kù)表

（1）依次單擊“File”→“New”→“Table”選項(xiàng)，則會(huì)出現(xiàn)選擇數(shù)據(jù)庫(kù)表類型對(duì)話框，如圖6-15所示。（2）單擊“OK”，則會(huì)出