【正文】 rue時(shí)，復(fù)選框有 3種選擇：為 False時(shí)，只有選中和未選中狀態(tài)。 RadioButton組件 位于 Delphi Standard選項(xiàng)卡中。 RadioButton的主要屬性有： Checked屬性：表明 CheckBox是否被選中。RadioButton有兩種狀態(tài)，如果當(dāng) Checked屬性為 True時(shí)，表示選中狀態(tài)，如果當(dāng)Checked屬性為 False時(shí)，表示未選中狀態(tài)。 RadioGroup 組件 位于 Delphi Standard選項(xiàng)卡中。 圖 323單選按鈕 RadioButton 1． RadioGroup的主要屬性 (1)Columns屬性 屬性 Columns用于設(shè)置單選按鈕組中按鈕的列數(shù)。范圍 1～ 16,默認(rèn)值為 1。 (2)Items屬性：用于設(shè)置各種單選按鈕標(biāo)題。 (3)ItemIndex屬性：單選按鈕組中被選中按鈕（從 0開始）的序號。默認(rèn)值為 1，表示組中按鈕均未被選中。 圖 325單選按鈕組 RadioGroup 、組合框 ListBox組件 當(dāng)列表框不能同時(shí)顯示所有選擇項(xiàng)時(shí)，將自動加上一個(gè)垂直滾動條，使用戶可以上下滾動列表框，以查閱所有的選項(xiàng)。列表框位于組件板 Standard選項(xiàng)卡中 。 ListBox的主要屬性： (1)Items屬性：列表框中選項(xiàng)的集合。 (2)ItemsIndex屬性：為選項(xiàng)的索引值。 圖 328 列表框 ListBox 運(yùn)行界面圖 (3)Stored屬性：決定選項(xiàng)是否排序。 (4)Columns屬性：決定列表框的列數(shù)。 (5)MultiSelect屬性：定是否可以選擇多項(xiàng)。 (6)SelCount屬性：被選中的項(xiàng)的數(shù)目，只讀。 (7)Selected屬性：設(shè)置或返回是否被選中。 (8)IntegralHelght屬性 ： ? True 自動調(diào)整框的高度使每行的高度（ IntemHeight）可以完整地被顯示。 ? False 不自動調(diào)整框的高度，非完整高度行被顯示在框的底部。 (9)ItemHeight屬性：控制列表框中行的高度。 (10)Style屬性 ? lbStandard 固定 ItemHeight屬性之比。 ? lbOwnerDrawFixed 可以調(diào)整 ItemHeight，并將自動調(diào)整框的高度以適應(yīng)行高。 ? LbOwnerDrawVariable 可以調(diào)整 ItemHeight屬性，需手動調(diào)整框的高度以適應(yīng)行高。 ComboBox組件 兼有 EditBox和 ListBox兩者功能，用戶可以通過鍵入文本或選擇列表中項(xiàng)目來進(jìn)行選擇。組合框位于組件板 Standard選項(xiàng)卡中。 1. 組合框的主要屬性 (1)Items屬性：列表框中選項(xiàng)的集合。 (2)ItemsIndex屬性：為選項(xiàng)的索引值。 (3)Stored屬性：決定選項(xiàng)是否排序。 (4)DorpDownCount屬性：控制組合框下拉列表所能顯示選項(xiàng)的最大個(gè)數(shù) 。 (5)SelText屬性：存儲顯示于編輯區(qū)中被選中項(xiàng)的內(nèi)容。 (6)Style屬性：決定組合框的風(fēng)格。 圖 329組合框 ComboBox 滾動條 要想自己操縱窗口的滾動，就要用到TScrollBar組件。當(dāng)在滾動條上操作時(shí)，將觸發(fā) OnScroll事件， TScrollBar組件直接繼承于TwinControl中，位于 Standard選項(xiàng)卡中 。 1． ScrollBar主要屬性、方法與事件 (1)LargeChange屬性：當(dāng)用戶單擊滾動條時(shí)，滾動距離由 LargeChange屬性設(shè)置，默認(rèn) 1。 (2)Max、 Min屬性：設(shè)置滾動條可滾動的范圍 圖 331 滾動條 Scrollbar (3)PageSize屬性：當(dāng)用戶按鍵盤上的 PageUp或 PageDown鍵時(shí)，滾動條滾動的距離是由PageSize屬性設(shè)置的，默認(rèn)是 1。 (4)Position屬性：設(shè)置或返回滾動條中小方塊的位置。 (5)SmallChange屬性：是用戶按滾動條兩端的箭頭時(shí)滾動條的距離，默認(rèn)值是 1。 (6)SetPaxams方法：該過程相當(dāng)于分別設(shè)置Position、 Max和 Min屬性。 (7)OnScroll事件：第三個(gè)參數(shù)返回滾動條小方塊的位置，第二個(gè)參數(shù)返回滾動條的狀態(tài)。 Timer組件位于 System組件板中，如圖所示，屬于非可視化組件，在設(shè)計(jì)時(shí)顯示為一個(gè)小時(shí)鐘圖標(biāo)，而在運(yùn)行時(shí)則不可見了，沖用來做一些后臺處理。 1． Timer組件的主要屬性與事件 (1)Enanled屬性：為 Ture時(shí)，定時(shí)器開始工作，為 False時(shí)定時(shí)器暫停工作。 (2)Interval屬性：用來設(shè)置定時(shí)器觸發(fā)周期 。 圖 332 Timer計(jì)時(shí)器 (3)OnTimer事件： Timer組件只提供一個(gè)事件，即 OnTimer。該事件以 Interval屬性設(shè)置的頻率被觸發(fā)。 Opendialog組件 用于打開一個(gè)已經(jīng)存在的文件，用戶選擇某一文件，其所在的驅(qū)動器、文件夾、文件名以及擴(kuò)展名將被賦予 Opendialog的filename屬性。 Opendialog組件位于 Dialogs組件板如圖 334的所示的第一個(gè)組件。 圖 334Dialogs組件板 Opendialog組件的主要屬性 (1)DefaultExt屬性：用于設(shè)置系統(tǒng)自動附加的擴(kuò)展文件名，既在用戶沒有設(shè)置文件類型時(shí)系統(tǒng)會自動附加該文件類型。 (2)Filter屬性：設(shè)置可打開的文件類型。 Filter屬性的設(shè)置可點(diǎn)擊右端 按鈕，打開如圖所示的對話框進(jìn)行設(shè)置。 圖 335Filter Editor對話框 (3)FilterIndex屬性：設(shè)置默認(rèn)的 Filter值，為 1時(shí)則默認(rèn)的文件類型為 Filter屬性中列舉的第一個(gè)文件類型。 (4)Initialdir屬性：對話框打開的初始化路徑。 (5)Options屬性：設(shè)置對話框的作用及表現(xiàn)形式。包括是否可選擇多個(gè)文件、是否允許長文件名、是否可以調(diào)節(jié)對話框的大小等。 Savedialog組件 用于提供一個(gè)另存為對話框，用戶輸入某一文件，其所在的驅(qū)動器、文件夾、文件名以及文件擴(kuò)展名將被賦予 SaveDialog的filename屬性。 Savedialog組件位于 Dialogs組件板如圖 334的所示的第二個(gè)組件。 Fontdialog組件 用于提供一個(gè)字體對話框，用戶可以選擇需要的字體名稱、樣式、大小、效果及字體顏色等，這些選擇將被賦予 Fontdialog的 Font屬性。 Fontdialog組件位于 Dialogs組件板如圖 334的所示的第五個(gè)組件。 Colordialog組件 用于提供一個(gè)顏色對話框，用戶可以選擇需要的顏色等屬性，這些選擇將被賦予Colordialog的 Color屬性。 Colordialog組件位于 Dialogs組件板如圖 334所示第六個(gè)組件。 FileListBox組件 用于顯示指定目錄文件名滾動列表，位于如圖 338所示 。 FileListBox組件的主要屬性： (1) Directory屬性：設(shè)置當(dāng)前文件目錄，顯示的文件列及表自動更新顯示文件目錄的文件。 (2) Drive屬性：用于設(shè)置當(dāng)前驅(qū)動器盤的號 ，當(dāng)前屬性值改變時(shí)， Directory屬性值自動改變?yōu)樾碌尿?qū)動器下的當(dāng)前目錄。 圖 338 (3)ExtenderdSelect屬性 ：若為 Ture則可按著ctrl鍵然后用鼠標(biāo)選擇多個(gè)文件。 (4) FileEdit屬性：用于將文件列表鏈接至一個(gè)編輯組件，顯示列表中當(dāng)前被選中的文件。 (5) FileName屬性：存放了列表中當(dāng)前被選中的文件的文件名及路徑名。 (6) FileType屬性：決定了文件列表中顯示的文件的屬性類型 。 (7) Mask屬性：用于設(shè)置文件列表中顯示的文件類型。 (8) ShowGlyphs屬性：用于設(shè)置文件是否在文件旁邊顯示文件圖標(biāo)。 (9) MultisSelect屬性：用于設(shè)置用戶是否可以一次選中多個(gè)文件。 DirectoryListBox組件 用于顯示指定驅(qū)動器下的目錄列表，該組件位于如圖 338所示中第九個(gè)組件。 DirectoryListBox組件的主要屬性： (1)Directory屬性：用于設(shè)置當(dāng)前的文件目錄。 (2) DirLabel屬性：用于將目錄列表鏈接至一個(gè)lable組件，顯示列表中當(dāng)前被選中目錄。 (3) Drive屬性：用于設(shè)置當(dāng)前的驅(qū)動器盤號，當(dāng)該屬性值改變時(shí)， Drive屬性值將自動改變?yōu)樾碌尿?qū)動器下的當(dāng)前目錄。 (4) FileList屬性：用于將目錄列表鏈接至文件列表，當(dāng)目錄列表中的目錄改變時(shí)，文件列表會自動進(jìn)行更新。 DriveComboBox組件 用于顯示一可選驅(qū)動器下拉列表，該組件位于如圖 338所示中第十個(gè)組件。 DriveComboBox組件主要的屬性： (1)Dirlist屬性：用于將本組件鏈接至目錄列表 ，如驅(qū)動器改變，目錄列表會自動更新。 (2) Drive屬性：用于存放當(dāng)前的驅(qū)動器盤號。 (3) TextCase屬性：用于決定驅(qū)動器盤號使用大寫字母還是小寫字母。 FilterComboBox組件 用于顯示一可選過濾器下拉列表，供用戶選擇，位于如圖 338所示中第十一個(gè)組件。 FilterComboBox組件的主要屬性如下： (1)FileList屬性：用于將本組件鏈接至文件列表，如當(dāng)前的文件類型改變，文件列表會自動進(jìn)行更新。 (2) Filer屬性：用于設(shè)置各種過濾文件的類型。 (3) Mask屬性：用于存放所選的過濾類型的對應(yīng)。 菜單 一個(gè) Windows引用程序，它往往需要制作標(biāo)準(zhǔn)的菜單界面，包括 主菜單 Mainmenu、 彈出式菜單 Popmenu兩種。 MainMenu組件 主菜單也稱為菜單欄，其中包括一個(gè)或多個(gè)選擇項(xiàng)稱為菜單項(xiàng)。當(dāng)單擊一個(gè)菜單項(xiàng)時(shí)，包含子菜單項(xiàng)的列表即被打開。主菜單位于組件板 Standard選項(xiàng)卡中。如圖所示： 圖 340主菜單 MainMenu 1．菜單編輯器 打開一個(gè)新的窗體，在其中添加一個(gè)MainMenu組件，即可產(chǎn)生主菜單項(xiàng)，菜單項(xiàng)的設(shè)置可以通過雙擊 MainMenu組件或右鍵單擊 MainMenu組件，在彈出的快捷菜單中選取Menudesigner項(xiàng)，或者選擇 MainMenu組件Items屬性，單擊右端 按鈕，可打開菜單項(xiàng)編輯器，并產(chǎn)生一個(gè)空菜單項(xiàng)，如圖所示。 圖 341菜單項(xiàng)編輯器 載對象編輯器中， Caption屬性輸入“ amp。S設(shè)置”，表示可按鈕 【 Ctrl】 +【 S】 或 【 Alt】 +【 S】 鍵來選擇此菜單項(xiàng)，其中“ amp?！狈柡蟮牡谝粋€(gè)字符為加速字符。若輸入“ ”則表示建立菜單分割線將菜單項(xiàng)分組 。 按 【 Insert】 鍵則插入一個(gè)新的空白菜單項(xiàng)，若按 【 Delete】 鍵則刪除一個(gè)菜單項(xiàng)。 在 Delphi中建立子菜單時(shí)，可選擇要產(chǎn)生子菜單的菜單項(xiàng)，然后按 【 Ctrl】 +【 → 】 鍵，便產(chǎn)生下一級子菜單項(xiàng) 。 2． MenuItem的主要屬性 (1)Name屬性：用于設(shè)置菜單組件的名稱。 (2)Caption屬性：顯示菜單組件的標(biāo)題。 (3)Checked屬性：設(shè)置為 True時(shí)，相應(yīng)的在菜單項(xiàng)邊上加上選擇標(biāo)志“ √”。屬性設(shè)置為False時(shí)，則無顯示，默認(rèn)值為 False。 (4)Enabled屬性：默認(rèn)值為 True，表示可以響應(yīng)用戶事件，若設(shè)置為 False，則無法相應(yīng)用戶事件，并且相應(yīng)的菜單項(xiàng)會變灰。 (5)Vsible屬性：確定菜單項(xiàng)是否顯示， True則顯示， False則隱藏。 (6)ShortCut屬性：設(shè)置該菜單項(xiàng)的熱鍵。 PopupMenu組件 應(yīng)用系統(tǒng)中，對彈出式菜單的支持是一種流行的方式，就是我們通常使用的右鍵菜單，當(dāng)用戶在不同的地方點(diǎn)擊鼠標(biāo)右鍵，就彈出不同的菜單項(xiàng)。主菜單位于組件板 Standard選項(xiàng)卡中，如圖 343所示。 彈出式菜單的設(shè)計(jì)方法基本和主菜單設(shè)計(jì)方法相同，如果需要在某個(gè)組件上鼠標(biāo)右鍵點(diǎn)擊打開一個(gè)彈出式菜單，那么只需要將此組件的 PopupMenu屬性設(shè)置成需要打開的彈出式菜單的名字即可。 圖 343 彈出式菜單 PopupMenu 第 4章 過程與函數(shù) 一個(gè)比較大的程序可以被劃分成若干個(gè)模塊，每個(gè)模塊完成一個(gè)或幾個(gè)功能，每個(gè)功能可以用一個(gè)程序段來實(shí)現(xiàn)，這個(gè)程序段被稱為“ 子程