【正文】 安裝包的操作步驟是： （ 1）選擇主菜單的 Component?Install Component菜單項(xiàng)， 將彈出 Install Component 對話框。 在 Component name后的文本框中輸入模板組件名字，在 Palette page的組合列表中選擇將其放置在何屬性頁上，也可以輸入屬性頁名，如果輸入的屬性頁名字不存在， Delphi將創(chuàng)建新的屬性頁。 FirstLine: string。 由文件創(chuàng)建 OLE對象 第 3章 窗體和常用組件 對話框類組件 對話框類組件位于組件面板的 Dialogs選項(xiàng)卡中 ， 對話框是 Windows應(yīng)用程序常用的一種交互形式 ， Delphi 7的對話框類組件為應(yīng)用程序的設(shè)計(jì)帶來極大的方便 。 end。 birth:=datetostr()。有關(guān) Win32組件應(yīng)用 TreeView Items Editor對話框 “教師信息”頁面上的組件的主要屬性 第 3章 窗體和常用組件 有關(guān) Win32組件應(yīng)用 程序代碼如下： //： procedure (Sender: TObject)。 （ 4） Selected屬性 : 通過該屬性訪問選中的節(jié)點(diǎn) ， 如果沒有選中任 何節(jié)點(diǎn) ， 則該屬性返回 nil值 。+chr(13)+chr(10) +temp 。 // 按選擇的籍貫和所在系別 ， 顯示相應(yīng)的 SQL語句 var temp:string。 (5)用同樣的方法再為 PageControl組件增加一個(gè)頁面 ， 將該頁面的 Caption屬性設(shè)置為 “ 按籍貫和系別查詢 ” 。 頁的編號(hào)從 0開始 。 add(1200,39。 單擊 Picture1按鈕時(shí)， Image1組件顯示c:\images\， 單擊 Picture2組件時(shí)， Image1組件顯示c:\images\ 文件中的圖像。 (2) HorzScrollBar和 VerScroll屬性 ： 若 AutoScroll屬性值設(shè)置為 False， 則必須修改 HorzScrollBar或 VerScroll屬性才能獲得滾動(dòng)條，雙擊它 們前面的“ +”號(hào)，顯示其子屬性， 主要子屬性有： l Position： 該屬性用來設(shè)置滾動(dòng)條中小方塊的位置。 （ 2） Kind屬性： 設(shè)置按鈕上圖像的種類 。 第 3章 窗體和常用組件 Panel組件的例子 hxrlistChange過程中的代碼： procedure (Sender: TObject)。 end。 :=false。它集中響應(yīng)用戶的各種命令，雙擊該 ActionList組件，將打開動(dòng)作列表對話框，用戶可以對動(dòng)作列表進(jìn)行添加、刪除和修改等 操作。 (4)程序運(yùn)行 第 3章 窗體和常用組件 ScrollBar組件 滾動(dòng)條組件的主要屬性有： （ 1） Kind屬性： 該屬性可以設(shè)置滾動(dòng)條是水平的還是垂直的。 :=+ xh+39。) then // 判斷職工號(hào)和姓名是否為空 :=39。)。 // ComboBox1為組合框名 第 3章 窗體和常用組件 ComboBox組件 ComboBox組件的其他常用屬性 第 3章 窗體和常用組件 基本控件的綜合例題 【 例 】 本程序是一個(gè)教師管理系統(tǒng)的錄入新數(shù)據(jù)的界面 ， 完成的功 能是在指定組件中輸入或選擇數(shù)據(jù)后 ， 按 “ 確定 ” 按鈕 ， 顯示相應(yīng)的 SQL語句 。 如果復(fù)選框的 State屬性為 cbGrayed或 cbUnchecked， 則 Checked屬性為 False。 Memo組件的屬性、方 法和事件與 Edit組件類似， Memo組件的特殊屬性： (1) Lines： 該屬性返回 Memo組件中文本的行數(shù) 。 // 定義用戶名 password=?12345?。在 Alignment對話框中，可對選中的組件進(jìn)行水平和垂直兩個(gè)方向 的對齊操作。 松開鼠標(biāo)左鍵后 ， 該虛框 “ 觸及 ” 到的組件就被選中 方法 1： （ 1） 選擇一個(gè)或多個(gè)要復(fù)制的組件 。 窗體的常用事件及觸發(fā)條件 窗體的常用方法 窗體被創(chuàng)建時(shí) ， 將按下列順序觸發(fā)這四個(gè)事件：OnCreate?OnShow?OnActivate?OnPaint。 第 3章 窗體和常用組件 窗體的組件對象 向窗體中添加組件的三種方法 : 1. 在組件面板的組件欄中單擊需要添加的組件，然后在窗體中需要添加該組件處單擊鼠標(biāo)左鍵，即可將組件添加到窗體中。 （ 2）選擇主菜單中的 Edit?Cut命令。 （ 5） IME屬性： IME是輸入法編輯器 （ Input Method Editor） 的 英文縮寫 ， 通過設(shè)置該屬性可自動(dòng)實(shí)現(xiàn)輸入法的切換 。 :=39。 （ 5） Visible屬性： Visible屬性用來控制按鈕是否可見 。 也可在運(yùn)行期間通過代碼改變列表框的內(nèi)容 。數(shù)學(xué)系 39。 l “確定 ” 按鈕對應(yīng)代碼： // 根據(jù)輸入信息 ， 顯示對應(yīng)的 SQL語句 procedure (Sender: TObject)。 else xb:=39。,39。 GroupBox組件最常用的場合，就是將多個(gè)單選鈕或多個(gè)復(fù)選框組合在一起。 age:integer。 :=39。 for k:=1 to i do begin :=39。+inttostr (candidates[k].count)。 (4) AllowAllup屬性： 有些菜單同時(shí)有幾個(gè)快捷按鈕可供選擇，若將 AllowAllup屬性設(shè)置為 True，則表示所有按鈕都可以是彈起狀態(tài)，若設(shè)置為 False，則表示至 少有一個(gè)不能 彈起。 // 當(dāng)單擊 Picture2按鈕時(shí) ， 在圖像中裝入圖像 Coffee ： procedure TForm1. Picture1Click(Sender: TObject)。 （ 3） 鼠標(biāo)右擊 Chart組件 ， 在彈出的快捷菜單中選擇 Edit Chart命令 ， 打開 Editing Chart對話框 。 end。 （ 5） 在選中具體頁面的情況下 ， 可以改變 PageIndex屬性 ， 也就是標(biāo)簽排 列的順序會(huì)發(fā)生改變 。+chr(13)+chr(10)+39。+ 。 第 3章 窗體和常用組件 Win32類組件 4. DateTimePicker組件 DateTimePicker組件提供了一種選擇日期和時(shí)間的有效方法。 （ 4） 如果將 RightClick屬性設(shè)置為 True， 則在樹的某個(gè)條目上單擊鼠標(biāo) 右鍵 ， 也可以將該條目選中 。 第 3章 窗體和常用組件 有關(guān) Win32組件應(yīng)用 // 單擊 “ 信息顯示 ” 執(zhí)行的程序代碼： procedure (Sender: TObject)。 屬性值為 0時(shí) ， 計(jì)時(shí)器不響應(yīng) Timer事件 。 // 軌跡條上滑塊位置的變化改變定時(shí)器的時(shí)間間隔 ， 以改變動(dòng)畫速度 begin :=。 l OfCreatePrompt：若該屬性為 True， 則表示如果鍵入的文件 名是不存在的 ， 就要建立一個(gè)文件 ， 這時(shí)在單擊 OK按鈕 后 ， 將彈出一個(gè)對話框 ， 用以確認(rèn)是否要新建這個(gè)文件 。 {將 FirstLine添加 Memo1中 } CloseFile(F)。 Add To Repository對話框 第 3章 窗體和常用組件 窗體模板 （ 3） 填寫 Add To Repository對話框 ， 需要為模板窗體提供標(biāo)題和描述并選 擇要加入的屬性頁 ， 輸入作者信息和圖標(biāo) 。 。 將窗體存儲(chǔ)成模板的步驟為： （ 1） 在已設(shè)計(jì)好的窗體上單擊鼠標(biāo)又鍵 ， 打開窗體的快捷菜單 。 Readln(F, FirstLine)。 （ 6） InitialDir屬性 該屬性用來設(shè)置對話框打開時(shí)的默認(rèn)文件夾 。 end。 Timer組件的主要屬性有： l Enabled屬性： 該屬性用來控制計(jì)時(shí)器是否掛起。 begin := inttostr()。 （ 3） 通常在樹每個(gè)條目前有一個(gè)小圖標(biāo) ， 當(dāng)該條目被選中時(shí) ， 會(huì)顯 示另一個(gè)小圖標(biāo) 。 第 3章 窗體和常用組件 Win32類組件 3. ProgressBar組件 ProgressBar組件為進(jìn)度條組件，可以動(dòng)態(tài)地顯示 一個(gè)過程 的進(jìn)度。+ +39。必須輸入要查詢的姓名 39。 （ 3） 在 PageControl組件的不同頁面中 ， 可以加入不同的組件 。四季度 39。 （ 1） 選擇 File?New?Project命令 ， 新建一個(gè)項(xiàng)目 。 ) 。 (2) Flat屬性： 該屬性值設(shè)置為 True， 則按鈕在非選中狀態(tài)下沒有邊框 ， 只有在選中狀態(tài)下才有邊框 。++39。 :=39。 count:=0。 窗體設(shè)計(jì)： 第 3章 窗體和常用組件 Panel組件的例子 窗體各組件的屬性 第 3章 窗體和常用組件 Panel組件的例子 程序代碼： type member=Record name:string。 第 3章 窗體和常用組件 GroupBox組件 GroupBox組件為標(biāo)準(zhǔn)的分組框組件。,39。 if =true then xb:=39。 :=39。)。 （ 3） MultiSelect屬性： 該屬性表示是否可多選 ， 為 True， 就可以一次 選中多個(gè)條目 。 （ 4） Enabled屬性： 若將 Enabled屬性設(shè)置為 False， 則該命令按鈕以淺色 顯示 ， 當(dāng)前無效 。 end else // 用戶名和口令只要有一項(xiàng)不正確 ， 執(zhí)行 begin :=39。如使用密碼時(shí)用“ *”顯示。 （ 2） 單擊 Delete鍵 。每一類組件都有自己的方法，以實(shí)現(xiàn)各種功能 。從面向?qū)ο笥^點(diǎn)看， 屬性就是組件對象的數(shù)據(jù)成員。 （ 3） 然后通過菜單命令 Edit?Paste將剪貼板中的組件粘貼到窗體中 。 Edit Tab Order對話框 第 3章 窗體和常用組件 標(biāo)準(zhǔn)類組件 標(biāo)準(zhǔn)類各組件均用其 Name屬性來標(biāo)識(shí)和引用 。 // 判斷所輸入的用戶名和口令是否正確 ， 以決定 “ wele”窗體上內(nèi)容 。 第 3章 窗體和常用組件 Button組件 按鈕組件主要屬性有： （ 1） Caption屬性： 用來設(shè)置 Button組件上顯示的文字。選定某個(gè)選項(xiàng)按鈕，將釋 放先前的選擇，所以稱其為單選按鈕。 begin // 為系別組合框添加選項(xiàng) (39。 // 設(shè)置組合框的初始值 end。 第 3章 窗體和常用組件 基本控件的綜合例題 else begin xh:= 。+xm+39。 l sbVertical 滾動(dòng)條是垂直方向的。 程序功能是： （ 1） 輸入候選人的基本信息 。 第 3章 窗體和常用組件 Panel組件的例子 “輸入 ” 按鈕對應(yīng)代碼： procedure (Sender: TObject)。 var k:integer。 begin for k