第四章VCL的使用1

1、第四章 運用組件編程 4.1 可視化組件庫可視化組件庫VCL 4.2 窗體設(shè)計窗體設(shè)計 4.3 常用組件常用組件 4.4 其他組件其他組件4.5 輸入與輸出輸入與輸出 4.1 VCL基礎(chǔ) DelphiDelphi提供了豐富的組件（提供了豐富的組件（componentcomponent，也，也稱為構(gòu)件）。這些組件都是由稱為構(gòu)件）。這些組件都是由TComponentTComponent類派生而來，封裝在可視化組件庫（類派生而來，封裝在可視化組件庫（VCLVCL）中。這里所說的可視化是指在窗體設(shè)計時中。這里所說的可視化是指在窗體設(shè)計時所有組件的可視性。組件依據(jù)程序運行時所有組件的可視性。組件依據(jù)程序

2、運行時是否可見而分為是否可見而分為可視組件可視組件和和非可視組件非可視組件，可視組件如標(biāo)簽（可視組件如標(biāo)簽（LabelLabel）、編輯框）、編輯框（EditEdit）、按鈕（）、按鈕（ButtonButton）等；非可視組）等；非可視組件，如計時器（件，如計時器（TimerTimer）、圖像列表）、圖像列表（ImageListImageList）等。通常，使用可視組件來）等。通常，使用可視組件來設(shè)計用戶界面，用非可視組件來實現(xiàn)特殊設(shè)計用戶界面，用非可視組件來實現(xiàn)特殊的功能。的功能。 一、一、VCL的層次結(jié)構(gòu)的層次結(jié)構(gòu)TObject（所有Delphi類的祖先）TPersistent（持久性對象

3、）TComponent（組件對象）非可視組件 TControl（所有可視組件的祖先） TGraphicControl（圖形類對象） TWinControl等 （窗口控件） 二、二、VCL組件的屬性、方法和事件組件的屬性、方法和事件 VCL組件的屬性組件的屬性 VCL組件的方法組件的方法 VCL組件的事件組件的事件 4.2 窗體設(shè)計窗體設(shè)計 窗體是程序界面的窗體是程序界面的框架框架，菜單和組件置于，菜單和組件置于其上。窗體是一種對象，類名是其上。窗體是一種對象，類名是TFormTForm。窗。窗體對象有體對象有屬性屬性、方法方法和和事件事件?？梢灾辉O(shè)計?？梢灾辉O(shè)計一個窗體的界面，也可以設(shè)計多個窗

4、體的一個窗體的界面，也可以設(shè)計多個窗體的界面，甚至可以是多文檔窗體。界面，甚至可以是多文檔窗體。 一、窗體常見的屬性、方法及事件一、窗體常見的屬性、方法及事件 1. 1. 窗體的屬性窗體的屬性 DelphiDelphi中通常用兩種方法設(shè)置對象（窗體）中通常用兩種方法設(shè)置對象（窗體）的屬性：的屬性：（1 1）界面設(shè)計階段通過）界面設(shè)計階段通過Object InspectorObject Inspector對對象監(jiān)視器窗口設(shè)置屬性。先在對象框中選象監(jiān)視器窗口設(shè)置屬性。先在對象框中選取對象，然后在取對象，然后在PropertiesProperties選項頁上修改選項頁上修改屬性。屬性。（2 2）在程

5、序代碼中用賦值語句設(shè)置屬性，語）在程序代碼中用賦值語句設(shè)置屬性，語法為：法為： 對象名對象名. .屬性名屬性名:=:=屬性值屬性值 窗體常見屬性窗體常見屬性NameName：默認值為：默認值為Form1Form1、Form2Form2、.大小及位置大小及位置：Top Top 和和 LeftLeft：窗體左上角相對于屏幕的垂：窗體左上角相對于屏幕的垂直和水平坐標(biāo)值直和水平坐標(biāo)值Width Width 和和 HeightHeight：窗體的總寬度和總高度：窗體的總寬度和總高度AlignAlign：窗體相對于屏幕的對齊方式：窗體相對于屏幕的對齊方式外觀外觀：BorderIconBorderIcon：

6、窗體標(biāo)題欄中系統(tǒng)菜單和窗：窗體標(biāo)題欄中系統(tǒng)菜單和窗口控制按鈕口控制按鈕BorderStyleBorderStyle：窗體邊框的類型：窗體邊框的類型CaptionCaption：窗體標(biāo)題欄中顯示的標(biāo)題：窗體標(biāo)題欄中顯示的標(biāo)題ColorColor：窗體工作區(qū)的顏色：窗體工作區(qū)的顏色FontFont：窗體中顯示文字的字體：窗體中顯示文字的字體VisibleVisible：窗體是否可見：窗體是否可見WindowStyleWindowStyle：窗體的顯示狀態(tài)：窗體的顯示狀態(tài)狀態(tài)控制狀態(tài)控制：EnableEnable：窗體的使用狀態(tài)：窗體的使用狀態(tài)FormStyleFormStyle：窗體的類型：窗體的

7、類型2. 窗體常用方法窗體常用方法（1 1）CreateCreate：動態(tài)地創(chuàng)建一個窗體。：動態(tài)地創(chuàng)建一個窗體。（2 2）ShowShow：顯示一個窗體。：顯示一個窗體。（3 3）CloseClose：關(guān)閉一個顯示中的窗體。：關(guān)閉一個顯示中的窗體。（4 4）CloseQueryCloseQuery：判斷窗體是否可以關(guān)閉，返回：判斷窗體是否可以關(guān)閉，返回一個邏輯值。一個邏輯值。（5 5）ReleaseRelease：將窗體對象從內(nèi)存中徹底刪除。：將窗體對象從內(nèi)存中徹底刪除。（6 6）ShowModalShowModal：顯示一個模式窗體。：顯示一個模式窗體。（7 7）PrintPrint：打印窗

8、體。：打印窗體。（8 8）CanvasCanvas：繪制圖形、輸出文本。：繪制圖形、輸出文本。 程序中需要窗體完成某種行為動作時，要程序中需要窗體完成某種行為動作時，要在程序代碼中調(diào)用窗體的方法，語法為：在程序代碼中調(diào)用窗體的方法，語法為： 窗體名窗體名. .方法名方法名(參數(shù)列表參數(shù)列表)；3. 窗體常見事件窗體常見事件 窗體事件是窗體可以識別的外部動作，事窗體事件是窗體可以識別的外部動作，事件可以由用戶操作觸發(fā)，也可以由操作系件可以由用戶操作觸發(fā)，也可以由操作系統(tǒng)、其他應(yīng)用程序、應(yīng)用程序本身觸發(fā)，統(tǒng)、其他應(yīng)用程序、應(yīng)用程序本身觸發(fā)，例如程序運行時用戶單擊一下窗體將觸發(fā)例如程序運行時用戶單擊

9、一下窗體將觸發(fā)窗體的窗體的OnClickOnClick事件。事件。 在程序源代碼中添加窗體的事件，可以打在程序源代碼中添加窗體的事件，可以打開對象監(jiān)視器窗口的開對象監(jiān)視器窗口的EventsEvents選項頁。從對選項頁。從對象列表中選擇窗體對象，然后雙擊事件名象列表中選擇窗體對象，然后雙擊事件名右邊的空白區(qū)域，添加窗口事件程序代碼。右邊的空白區(qū)域，添加窗口事件程序代碼。 窗體常見事件窗體常見事件（1 1）OnCreateOnCreate：窗體創(chuàng)建時觸發(fā)。該事件中通：窗體創(chuàng)建時觸發(fā)。該事件中通?？蓪崿F(xiàn)程序的初始化工作。?？蓪崿F(xiàn)程序的初始化工作。（2 2）OnDestroyOnDestroy：窗體

10、從內(nèi)存中刪除時觸發(fā)。：窗體從內(nèi)存中刪除時觸發(fā)。該事件通?？梢约尤胭Y源釋放的程序代碼。該事件通?？梢约尤胭Y源釋放的程序代碼。（3 3）OnShowOnShow：窗體顯示時觸發(fā)。當(dāng)窗體的：窗體顯示時觸發(fā)。當(dāng)窗體的VisibleVisible屬性為屬性為TrueTrue時窗體被顯示。時窗體被顯示。（4 4）OnHideOnHide：窗體隱藏時觸發(fā)。當(dāng)窗體的：窗體隱藏時觸發(fā)。當(dāng)窗體的VisibleVisible屬性為屬性為FalseFalse時，窗體被隱藏。時，窗體被隱藏。（5 5）OnCloseOnClose和和OnCloseQueryOnCloseQuery：當(dāng)關(guān)閉窗體時，：當(dāng)關(guān)閉窗體時，先觸發(fā)先

11、觸發(fā)OnCloseQueryOnCloseQuery事件，處理程序當(dāng)前的事件，處理程序當(dāng)前的狀態(tài)，然后觸發(fā)狀態(tài)，然后觸發(fā)OnCloseOnClose事件，關(guān)閉窗口。事件，關(guān)閉窗口。（6 6）OnClickOnClick：單擊一下窗體將觸發(fā)該事件。：單擊一下窗體將觸發(fā)該事件。（7 7）OnDblClickOnDblClick：單擊窗體將觸發(fā)該事件。：單擊窗體將觸發(fā)該事件。（8 8）OnPanitOnPanit：窗體重畫時將觸發(fā)該事件。：窗體重畫時將觸發(fā)該事件。二、簡單窗體設(shè)計二、簡單窗體設(shè)計 例例4-14-1：窗體左上角位于屏幕的坐標(biāo)是：窗體左上角位于屏幕的坐標(biāo)是120120，8080；大小是；

12、大小是360280360280；窗體的標(biāo)題是；窗體的標(biāo)題是“簡簡單窗體單窗體”，背景顏色是藍色。程序運行時，背景顏色是藍色。程序運行時在窗體的在窗體的5050，3030位置輸出文本位置輸出文本“您好！您好！”，文本的顏色是黃色，字體是楷體文本的顏色是黃色，字體是楷體_GB2312_GB2312，一號。單擊窗體后，窗體的顏色變成白色，一號。單擊窗體后，窗體的顏色變成白色，字的顏色是黑色，字體為宋體，大小為字的顏色是黑色，字體為宋體，大小為5050，并在窗體的并在窗體的100100，100100位置輸出文本位置輸出文本“再再見！見！”。 三、多窗體設(shè)計三、多窗體設(shè)計1. 1. 靜態(tài)創(chuàng)建靜態(tài)創(chuàng)建 靜

13、態(tài)創(chuàng)建窗體是在界面設(shè)計階段完成的。靜態(tài)創(chuàng)建窗體是在界面設(shè)計階段完成的。具體方法如下：具體方法如下： 執(zhí)行執(zhí)行【FileFile】【NewNew】【FormForm】菜單菜單項，添加一個新的窗體，默認名稱是項，添加一個新的窗體，默認名稱是Form2Form2。然后在主窗體。然后在主窗體Form1Form1的的UsesUses單元中單元中加入新窗體的單元名，這樣在主窗體的事加入新窗體的單元名，這樣在主窗體的事件中可以調(diào)用件中可以調(diào)用Form2Form2。 2. 2. 動態(tài)創(chuàng)建動態(tài)創(chuàng)建 動態(tài)創(chuàng)建窗體是在程序運行階段完成的。動態(tài)創(chuàng)建窗體是在程序運行階段完成的。在程序代碼中調(diào)用窗體的在程序代碼中調(diào)用窗體

14、的CreateCreate方法。靜方法。靜態(tài)創(chuàng)建的子窗體在程序剛運行時就全部裝態(tài)創(chuàng)建的子窗體在程序剛運行時就全部裝人內(nèi)存當(dāng)中，如果一個應(yīng)用程序的子窗體人內(nèi)存當(dāng)中，如果一個應(yīng)用程序的子窗體數(shù)目很多，將占用過多的內(nèi)存資源。動態(tài)數(shù)目很多，將占用過多的內(nèi)存資源。動態(tài)創(chuàng)建的子窗體，在程序剛運行時并沒有裝創(chuàng)建的子窗體，在程序剛運行時并沒有裝入內(nèi)存中，當(dāng)使用到該子窗體時才裝入內(nèi)入內(nèi)存中，當(dāng)使用到該子窗體時才裝入內(nèi)存，使用完后立即將其從內(nèi)存中釋放，以存，使用完后立即將其從內(nèi)存中釋放，以節(jié)省內(nèi)存資源。節(jié)省內(nèi)存資源。 （1 1）執(zhí)行【）執(zhí)行【FileFile】【NewNew】【FormForm】菜單】菜單項命令一

15、次，添加一個新的窗體，默認名稱項命令一次，添加一個新的窗體，默認名稱是是Form3Form3在已有的窗體對象名在已有的窗體對象名FormNFormN（N=1N=1，2 2，.）中把）中把N N值加值加11。然后在主窗體。然后在主窗體Form1Form1的的usesuses單元中加入新窗體的單元名，這樣在單元中加入新窗體的單元名，這樣在主窗體的事件中可以調(diào)用主窗體的事件中可以調(diào)用Form3Form3。（2 2）執(zhí)行【）執(zhí)行【ProjectProject】【OptionsOptions】菜單項，】菜單項，打開打開“Project Options”Project Options”（工程選項）對話（工

16、程選項）對話框。對話框的框。對話框的“Auto-create formsAuto-create forms（自動創(chuàng)（自動創(chuàng)建窗體）建窗體）”框中列出了在程序運行時加載到框中列出了在程序運行時加載到內(nèi)存中的窗體。選擇內(nèi)存中的窗體。選擇Form3Form3，單擊中間向右的，單擊中間向右的箭頭按鈕，將其移動到箭頭按鈕，將其移動到“Available formsAvailable forms（可用（可用窗體）窗體）”框中。這樣程序運行時，框中。這樣程序運行時，F(xiàn)orm3Form3窗窗體不會自動加載到內(nèi)存。體不會自動加載到內(nèi)存。 （3 3）程序代碼中，要）程序代碼中，要使用使用Form3Form3窗體時

17、，添窗體時，添加如下代碼：加如下代碼：Form3:=Tform3.Create(self); Form3:=Tform3.Create(self); / / 創(chuàng)建子窗體創(chuàng)建子窗體Form3Form3，將，將Form3Form3加載入內(nèi)存加載入內(nèi)存Form3.Show; / Form3.Show; / 顯示窗體顯示窗體Form3Form3（4 4）要從內(nèi)存中）要從內(nèi)存中釋放釋放Form3Form3窗體時，添加如窗體時，添加如下代碼：下代碼：Form3.Free; / Form3.Free; / 將將Form3Form3從內(nèi)存中釋放掉從內(nèi)存中釋放掉 例例4-24-2： 創(chuàng)建多窗體應(yīng)用程序。創(chuàng)建多窗

18、體應(yīng)用程序。Form1Form1為主窗體，為主窗體，F(xiàn)orm2Form2為靜態(tài)創(chuàng)建的窗體，為靜態(tài)創(chuàng)建的窗體，F(xiàn)orm3Form3為動態(tài)創(chuàng)建的窗體。單擊為動態(tài)創(chuàng)建的窗體。單擊Form1Form1窗體窗體顯示顯示Form2Form2窗體，雙擊窗體，雙擊Form1Form1窗體關(guān)閉窗體關(guān)閉Form2Form2窗體。單擊窗體。單擊Form2Form2窗體創(chuàng)建并顯示窗體創(chuàng)建并顯示Form3Form3窗體，雙擊窗體，雙擊Form2Form2窗體關(guān)閉并釋放窗體關(guān)閉并釋放Form3Form3窗體。窗體。 四、四、MDI多文檔窗體多文檔窗體 一個一個單文檔單文檔應(yīng)用程序只能打開一個文檔，而一應(yīng)用程序只能打開一個

19、文檔，而一個個多文檔（多文檔（MDIMDI）應(yīng)用程序可以同時打開不同類型應(yīng)用程序可以同時打開不同類型的多個文檔。的多個文檔。MDIMDI應(yīng)用程序提供了一種方便的方式，應(yīng)用程序提供了一種方便的方式，使得用戶使得用戶在同一工作區(qū)域內(nèi)可以對多個文檔進行在同一工作區(qū)域內(nèi)可以對多個文檔進行觀察和交換數(shù)據(jù)觀察和交換數(shù)據(jù)。MDIMDI窗口部分由一個窗口部分由一個主窗口主窗口（也（也稱為父窗口）和多稱為父窗口）和多個個子窗口子窗口組成，每個文檔對應(yīng)組成，每個文檔對應(yīng)一個子窗口。子窗口位于主窗口的工作區(qū)內(nèi)，激一個子窗口。子窗口位于主窗口的工作區(qū)內(nèi)，激活子窗口后主窗口的菜單自動被當(dāng)前子窗口的菜活子窗口后主窗口的菜

20、單自動被當(dāng)前子窗口的菜單所代替。在主窗口的工作區(qū)內(nèi)可以對子窗口進單所代替。在主窗口的工作區(qū)內(nèi)可以對子窗口進行層疊、平鋪、定位、最大化和最小化、改變大行層疊、平鋪、定位、最大化和最小化、改變大小等各種操作，若最大化子窗口，將占滿小等各種操作，若最大化子窗口，將占滿MDIMDI主窗主窗口的全部工作區(qū)?？诘娜抗ぷ鲄^(qū)。 執(zhí)行【執(zhí)行【FileFile】【NewNew】【OtherOther】菜單】菜單項，打開項，打開New ItemsNew Items（新建項目）對話框。（新建項目）對話框。這個對話框提供了多個向?qū)Ш湍０?，可以這個對話框提供了多個向?qū)Ш湍０?，可以生成多種不同用途的應(yīng)用程序。生成多種不同

21、用途的應(yīng)用程序。選擇選擇“Projects”Projects”選項頁，單擊選項頁，單擊“MDI MDI Application”Application”，然后單擊，然后單擊“OK”O(jiān)K”按鈕，生按鈕，生成一個多文檔應(yīng)用程序。成一個多文檔應(yīng)用程序。 系統(tǒng)自動為應(yīng)用程序生成了三個窗體：系統(tǒng)自動為應(yīng)用程序生成了三個窗體：主主窗體窗體（MainFormMainForm）、）、子窗體子窗體（MDIChildMDIChild）、）、對話框?qū)υ捒颍ˋboutBoxAboutBox）。）。 五、五、窗體中組件的操作窗體中組件的操作 1.組件的添加組件的添加 2.選定組件選定組件 3.改變組件的大小改變組件的大

22、小 4.對齊組件對齊組件 5.移動和刪除組件移動和刪除組件 6.組件的復(fù)制與粘貼組件的復(fù)制與粘貼 7.組件的組件的Tab鍵次序設(shè)定鍵次序設(shè)定 4.3 常用組件常用組件一、一、Standard頁上的常用組件頁上的常用組件 1. 1. LabelLabel標(biāo)簽組件標(biāo)簽組件 標(biāo)簽組件用于在窗體上顯示文字，通常用它為其標(biāo)簽組件用于在窗體上顯示文字，通常用它為其他組件加上一些標(biāo)注和說明文字，以便讓使用者他組件加上一些標(biāo)注和說明文字，以便讓使用者了解那些組件的用途。特別是有些組件本身沒有了解那些組件的用途。特別是有些組件本身沒有CaptionCaption屬性，添加一個標(biāo)簽組件作為提示文字就屬性，添加一個

23、標(biāo)簽組件作為提示文字就很有必要。很有必要。 可將標(biāo)簽組件的焦點轉(zhuǎn)移給可將標(biāo)簽組件的焦點轉(zhuǎn)移給FormForm上的另一個對象，上的另一個對象，方法是設(shè)置標(biāo)簽組件的方法是設(shè)置標(biāo)簽組件的FocusControlFocusControl屬性。在值屬性。在值段中，選用與它關(guān)聯(lián)對象的對象名。然后在標(biāo)簽段中，選用與它關(guān)聯(lián)對象的對象名。然后在標(biāo)簽中設(shè)置熱鍵，即在中設(shè)置熱鍵，即在CaptionCaption屬性值段中輸入含有屬性值段中輸入含有“& &”的字串，緊接的字串，緊接“&”&”之后的字母稱為之后的字母稱為熱鍵字熱鍵字母母，當(dāng)用戶使用，當(dāng)用戶使用“Alt+Alt+熱鍵字母熱

24、鍵字母”時，將焦點選時，將焦點選中它所指向的對象。中它所指向的對象。 標(biāo)簽組件常用屬性標(biāo)簽組件常用屬性CaptionCaption：設(shè)定標(biāo)簽中顯示的文字：設(shè)定標(biāo)簽中顯示的文字AutoSizeAutoSize：為：為TrueTrue，標(biāo)簽的長度隨文字的長，標(biāo)簽的長度隨文字的長度而改變度而改變TransparentTransparent：為：為TrueTrue，是透明標(biāo)簽，會顯，是透明標(biāo)簽，會顯示背景顏色示背景顏色AlignmentAlignment：指定文本在標(biāo)簽矩形框內(nèi)的水：指定文本在標(biāo)簽矩形框內(nèi)的水平對齊方式，平對齊方式，taLeftJustifytaLeftJustify（左對齊），（左對

25、齊），taCentertaCenter（居中），（居中）， taRightJustifytaRightJustify（右（右對齊）對齊）LayoutLayout：指定文本在標(biāo)簽矩形框內(nèi)的垂直：指定文本在標(biāo)簽矩形框內(nèi)的垂直對齊方式，對齊方式，tlToptlTop（向左對齊），（向左對齊），tlCentertlCenter（居中），（居中）， tlButtontlButton（向下對齊）（向下對齊）WordWrapWordWrap：為：為TrueTrue，文本到達矩形框右邊，文本到達矩形框右邊界時自動折返；為界時自動折返；為FalseFalse，文本太長時會截，文本太長時會截斷斷ShowAccel

26、CharShowAccelChar：為：為TrueTrue，則會在，則會在& &字符右字符右邊的字符加上底線邊的字符加上底線“ ”，表示此字符為，表示此字符為LabelLabel組件的熱鍵字母組件的熱鍵字母2. Edit編輯框組件編輯框組件 編輯框組件編輯框組件常用于文本輸入輸出常用于文本輸入輸出，不僅可，不僅可以顯示用戶的字符串文本，還允許用戶輸以顯示用戶的字符串文本，還允許用戶輸入和編輯文本。在人機交互界面中，使用入和編輯文本。在人機交互界面中，使用EditEdit對象最主要的目的就是接收用戶信息，對象最主要的目的就是接收用戶信息，通常用通常用EditEdit對象輸入數(shù)據(jù)，

27、如輸入用戶姓對象輸入數(shù)據(jù)，如輸入用戶姓名、通信地址等。名、通信地址等。編輯框組件的編輯框組件的常用事件常用事件 : :OnChangeOnChange：當(dāng)編輯框組件中的文本發(fā)生改：當(dāng)編輯框組件中的文本發(fā)生改變時觸發(fā)此事件。變時觸發(fā)此事件。OnKeyPressOnKeyPress：當(dāng)編輯框接收到鍵盤字符時：當(dāng)編輯框接收到鍵盤字符時觸發(fā)。觸發(fā)。 編輯框組件編輯框組件常用屬性常用屬性Readonly：決定編輯框內(nèi)的文本是否可以：決定編輯框內(nèi)的文本是否可以被編輯。為被編輯。為True時，只能顯示文本，不能時，只能顯示文本，不能輸入和更改文本輸入和更改文本BorderStyle：設(shè)置編輯框的邊框類型：設(shè)

28、置編輯框的邊框類型：bsSingle，單線邊框；，單線邊框；bsNone，無邊框，無邊框AutoSelect：當(dāng)組件獲得焦點時，是否自：當(dāng)組件獲得焦點時，是否自動選中所有的文本動選中所有的文本AutoSize：指定編輯框的高度是否隨文本：指定編輯框的高度是否隨文本的高度而改變的高度而改變Enable：為：為False，編輯框不響應(yīng)任何事件，編輯框不響應(yīng)任何事件PasswordChar：指定一個字符來代替顯：指定一個字符來代替顯示用戶輸入的字符，在用戶輸入密碼時常示用戶輸入的字符，在用戶輸入密碼時常用用MaxLength：編輯框內(nèi)可輸入文字的最大：編輯框內(nèi)可輸入文字的最大長度。長度。-1表示沒有

29、長度限制，默認值為表示沒有長度限制，默認值為-1SelText：被選中的文本：被選中的文本CharCase：設(shè)置編輯框文字的大小寫狀態(tài)：設(shè)置編輯框文字的大小寫狀態(tài)：ecLowerCase，轉(zhuǎn)為小寫；，轉(zhuǎn)為小寫；ecNormal，不改變；不改變；ecUpperCase，轉(zhuǎn)為大寫，轉(zhuǎn)為大寫編輯框組件的常用方法編輯框組件的常用方法 方法方法說明說明Clear清除編輯框內(nèi)的所有內(nèi)容清除編輯框內(nèi)的所有內(nèi)容ClearSelection清除編輯框內(nèi)被選中的內(nèi)容清除編輯框內(nèi)被選中的內(nèi)容CopyToClipboard將編輯框內(nèi)選中的文本復(fù)制到剪貼板中將編輯框內(nèi)選中的文本復(fù)制到剪貼板中CutClipboard將編

30、輯框內(nèi)選中的文本剪切到剪貼板中將編輯框內(nèi)選中的文本剪切到剪貼板中PasteFromClipboard將剪貼板中的內(nèi)容粘貼到編輯框中將剪貼板中的內(nèi)容粘貼到編輯框中SelectAll選中編輯框內(nèi)的所有內(nèi)容選中編輯框內(nèi)的所有內(nèi)容3. Memo多行編輯框組件多行編輯框組件 多行編輯框組件多行編輯框組件MemoMemo與與EditEdit組件很相像，組件很相像，都是提供給用戶在程序中輸入數(shù)據(jù)或顯示都是提供給用戶在程序中輸入數(shù)據(jù)或顯示文字用的對象。與編輯框組件不同的是，文字用的對象。與編輯框組件不同的是，多行編輯框組件可以顯示和編輯多行文本多行編輯框組件可以顯示和編輯多行文本，而編輯框組件只能顯示和編輯一

31、行文本。而編輯框組件只能顯示和編輯一行文本。多行編輯框組件的屬性和方法與編輯框組多行編輯框組件的屬性和方法與編輯框組件有很多相同之處，如件有很多相同之處，如TextText、MaxLengthMaxLength、ReadOnlyReadOnly等屬性。等屬性。 （1）Memo組件的組件的Lines屬性屬性 Lines Lines屬性設(shè)置和顯示在多行編輯框組件內(nèi)屬性設(shè)置和顯示在多行編輯框組件內(nèi)的文本。在對象監(jiān)視器窗口單擊的文本。在對象監(jiān)視器窗口單擊LineLine屬性屬性旁邊的旁邊的“.”.”按鈕，打開編輯器窗口，在按鈕，打開編輯器窗口，在空白區(qū)域可以輸入多行文本。區(qū)域的上方空白區(qū)域可以輸入多行

32、文本。區(qū)域的上方顯示輸入文本的行數(shù)。顯示輸入文本的行數(shù)。 TextText與與LinesLines都用來存取數(shù)據(jù)，都用來存取數(shù)據(jù)，TextText存放存放MemoMemo對象中全部的輸入數(shù)據(jù)，而對象中全部的輸入數(shù)據(jù)，而LinesiLinesi存放第存放第i+1i+1行的字符串。例如：設(shè)置第行的字符串。例如：設(shè)置第5 5行行文本值為文本值為“DelphiDelphi程序設(shè)計程序設(shè)計”程序代碼可以寫成：程序代碼可以寫成： Memo1.Lines4Memo1.Lines4 := Delphi := Delphi程序設(shè)計程序設(shè)計;。 Lines常用的屬性和方法常用的屬性和方法 StringsStrin

33、gs屬性：指定組件每一行文本的內(nèi)容屬性：指定組件每一行文本的內(nèi)容Memo1.Lines.Strings0Memo1.Lines.Strings0 := :=第一行第一行;等效于等效于Memo1.Lines0 Memo1.Lines0 :=:=第一行第一行; ;AddAdd方法方法：在組件的最后添加一行文本：在組件的最后添加一行文本Memo1.Lines.AddMemo1.Lines.Add(最后一行下面加一行文字最后一行下面加一行文字););InsertInsert方法方法：在指定行下方插入一行文本：在指定行下方插入一行文本Memo1.Lines.InsertMemo1.Lines.Inser

34、t(2,(2,第三行處插入一行第三行處插入一行););DeleteDelete方法方法：刪除組件內(nèi)指定行的文本：刪除組件內(nèi)指定行的文本Memol.Lines.Delete(2)Memol.Lines.Delete(2); / ; / 刪除第三行刪除第三行SaveToFileSaveToFile：將文本保存到文件：將文本保存到文件Memo1.Lines.SaveToFileMemo1.Lines.SaveToFile(C:tempa.txt);(C:tempa.txt);LoadFromFileLoadFromFile：讀取文件內(nèi)容到：讀取文件內(nèi)容到MemoMemo組件組件中中Memo1.Lin

35、es.LoadFromFileMemo1.Lines.LoadFromFile(C:tempa.txt);(C:tempa.txt);ClearClear：清除組件內(nèi)的所有文本：清除組件內(nèi)的所有文本Memo1.Lines.clear;Memo1.Lines.clear;（2）Memo組件的其他常用屬性 ScrollBarScrollBar：設(shè)置是否顯示滾動條。有四個：設(shè)置是否顯示滾動條。有四個值：值：ssBothssBoth，顯示水平和垂直滾動條；，顯示水平和垂直滾動條；ssHorizontalssHorizontal，顯示水平滾動條；，顯示水平滾動條；ssVerticalssVertical

36、，顯示垂直滾動條；，顯示垂直滾動條；ssNonessNone，不加滾動條。不加滾動條。WantReturnWantReturn：設(shè)置在組件內(nèi)部能否使用回：設(shè)置在組件內(nèi)部能否使用回車鍵，為車鍵，為TrueTrue表示可以使用回車鍵。表示可以使用回車鍵。WantTabWantTab：設(shè)置在組件內(nèi)按：設(shè)置在組件內(nèi)按TabTab鍵是否起到鍵是否起到移位作用，可取移位作用，可取TrueTrue和和FalseFalse兩個值兩個值4. Button基本按鈕組件 按鈕是人機交互界面最常見的一個組件，按鈕是人機交互界面最常見的一個組件，通常用于用戶選取執(zhí)行某項命令。通常用于用戶選取執(zhí)行某項命令。DelphiD

37、elphi提供的按鈕有基本按鈕、位圖按鈕、復(fù)選提供的按鈕有基本按鈕、位圖按鈕、復(fù)選框、單選按鈕、加速按鈕等?？?、單選按鈕、加速按鈕等?；景粹o基本按鈕ButtonButton是最簡單的一種按鈕。是最簡單的一種按鈕。（1 1）ButtonButton按鈕的常用屬性按鈕的常用屬性 CaptionCaption：按鈕上顯示的文本：按鈕上顯示的文本DefaultDefault：設(shè)定按鈕是否為默認按鈕。默認：設(shè)定按鈕是否為默認按鈕。默認按鈕在打開窗體或?qū)υ捒驎r首先取得焦點，按鈕在打開窗體或?qū)υ捒驎r首先取得焦點，此時按下此時按下EnterEnter鍵，將執(zhí)行默認按鈕的鍵，將執(zhí)行默認按鈕的OnClickOn

38、Click事件處理代碼。雖然可將多個事件處理代碼。雖然可將多個ButtonButton對象指定為默認按鈕，但只有對象指定為默認按鈕，但只有TabTab次次序最前的序最前的ButtonButton對象才是真正的默認按鈕對象才是真正的默認按鈕CancelCancel：設(shè)定按鈕是否為取消按鈕，取消：設(shè)定按鈕是否為取消按鈕，取消按鈕的功能與默認按鈕相同，但它是針對按鈕的功能與默認按鈕相同，但它是針對EscEsc鍵設(shè)計的。當(dāng)用戶按下鍵設(shè)計的。當(dāng)用戶按下EscEsc鍵，被設(shè)為鍵，被設(shè)為取消按鈕的取消按鈕的OnClickOnClick事件處理就會被執(zhí)行事件處理就會被執(zhí)行（2）Button按鈕的常用事件 Bu

39、ttonButton按鈕常用的響應(yīng)事件有：按鈕常用的響應(yīng)事件有：OnClickOnClick、OnDblClickOnDblClick、OnMouseMoveOnMouseMove、OnMouseUpOnMouseUp、OnMouseDownOnMouseDown等。等。OnClickOnClick及及OnDblClickOnDblClick處處理事件是最常用的。理事件是最常用的。 當(dāng)用戶用鼠標(biāo)在當(dāng)用戶用鼠標(biāo)在ButtonButton對象上對象上單擊單擊一下，一下，或是當(dāng)焦點在或是當(dāng)焦點在ButtonButton對象上時對象上時按下按下EnterEnter鍵鍵，觸發(fā)觸發(fā)OnClickOnCli

40、ck事件處理。因此，可以把單擊事件處理。因此，可以把單擊ButtonButton對象后要執(zhí)行的程序放在這個事件對象后要執(zhí)行的程序放在這個事件處理中。處理中。 例例4-34-3：創(chuàng)建一個應(yīng)用程序，在窗體上加一個：創(chuàng)建一個應(yīng)用程序，在窗體上加一個Edit1Edit1編輯框組件，在編輯框組件，在Edit1Edit1左邊加一個左邊加一個Label1Label1標(biāo)標(biāo)簽組件，在簽組件，在Edit1Edit1下方加一下方加一Button1Button1基本按鈕組件；基本按鈕組件；窗體上再加一個窗體上再加一個Memo1Memo1多行編輯框組件，在多行編輯框組件，在Memo1Memo1上方加一個上方加一個Lab

41、el2Label2標(biāo)簽組件，在標(biāo)簽組件，在Memo1Memo1下方加下方加Button2Button2、Button3Button3、Button4Button4、Button5Button5四個基本四個基本按鈕組件。按下按鈕組件。按下Button1Button1則將則將Edit1Edit1中的文本加入中的文本加入到到Memo1Memo1的最后一行，按下的最后一行，按下Button2Button2則刪除則刪除Memo1Memo1的的最后一行文本，按下最后一行文本，按下Button3Button3則清除則清除Memo1Memo1的所有的所有文本，按下文本，按下Button4Button4則將則將

42、Memo1Memo1的所有文本存入的所有文本存入C:a.txtC:a.txt文件中，按下文件中，按下Button5Button5則將則將C:a.txtC:a.txt文文件中的內(nèi)容讀入件中的內(nèi)容讀入Memo1Memo1中。應(yīng)注意將中。應(yīng)注意將Button1Button1設(shè)置設(shè)置成默認按鈕，而將成默認按鈕，而將Button2Button2設(shè)置成取消按鈕。設(shè)置成取消按鈕。 5. Panel5. Panel面板組件面板組件 Panel Panel組件內(nèi)，起分組作用組件內(nèi)，起分組作用 。另外，另外，PanelPanel組件提供了優(yōu)化視覺效果的屬性，因此組件提供了優(yōu)化視覺效果的屬性，因此PanelPane

43、l組件也常作為某些組件的背景，使程組件也常作為某些組件的背景，使程序界面更協(xié)調(diào)、優(yōu)美。面板組件序界面更協(xié)調(diào)、優(yōu)美。面板組件PanelPanel還常還常用于制作信息欄或狀態(tài)欄。用于制作信息欄或狀態(tài)欄。 面板組件面板組件PanelPanel的常用屬性的常用屬性 AlignAlign: :固定固定PanelPanel的位置：的位置：alBottonalBotton，固定，固定在父組件下方；在父組件下方；alCientalCient，覆蓋父組件的全，覆蓋父組件的全部；部；alLeftalLeft，固定在父組件左方；，固定在父組件左方；alNonealNone，位置沒有限制；位置沒有限制；alRight

44、alRight，固定在父組件右，固定在父組件右方；方；altopaltop，固定在父組件上方，固定在父組件上方BevelInnerBevelInner: :確定確定PanelPanel內(nèi)層是凸出還是凹內(nèi)層是凸出還是凹下：下：bvLoweredbvLowered，內(nèi)層凹下；，內(nèi)層凹下；bvNonebvNone，內(nèi)層，內(nèi)層無凹凸；無凹凸；bvRaisedbvRaised，內(nèi)層凸出，內(nèi)層凸出BevelOuterBevelOuter: :確定確定PanelPanel外層是凸出還是凹外層是凸出還是凹下：下：bvLoweredbvLowered，外層凹下；，外層凹下；bvNonebvNone，外層，外層無

45、凹凸；無凹凸；bvRaisedbvRaised，外層凸出，外層凸出BevelWidthBevelWidth: :確定確定PanelPanel內(nèi)層或外層邊界線內(nèi)層或外層邊界線的粗細，數(shù)值越大界線越粗的粗細，數(shù)值越大界線越粗BorderStyleBorderStyle: :確定確定PanelPanel是否有外框。是否有外框。BorderWidthBorderWidth: :確定確定PanelPanel外層部分的寬度，外層部分的寬度，數(shù)值越大外層越寬數(shù)值越大外層越寬例例4-44-4：利用：利用PanelPanel的屬性變化，使的屬性變化，使PanelPanel產(chǎn)生產(chǎn)生不同的效果。不同的效果。 6.

46、CheckBox復(fù)選框組件復(fù)選框組件 復(fù)選框有一小方框，旁邊帶有文本說明，一復(fù)選框有一小方框，旁邊帶有文本說明，一般具有選中和未選中兩種狀態(tài)，鼠標(biāo)單擊般具有選中和未選中兩種狀態(tài)，鼠標(biāo)單擊復(fù)選框可以在這兩種狀態(tài)之間切換。選中復(fù)選框可以在這兩種狀態(tài)之間切換。選中復(fù)選框時，小方框內(nèi)有復(fù)選框時，小方框內(nèi)有標(biāo)記。標(biāo)記。 復(fù)選框組件通常由多個復(fù)選框組件形成一復(fù)選框組件通常由多個復(fù)選框組件形成一組，在這一組中用戶可同時選中多個組件，組，在這一組中用戶可同時選中多個組件，選項彼此之間是不具有選項彼此之間是不具有“互斥性互斥性”的，不的，不會影響其他選項的行為，適用于要進行多會影響其他選項的行為，適用于要進行多

47、項選擇的情況。組件可以識別項選擇的情況。組件可以識別OnClickOnClick事件。事件。 復(fù)選框組件的常用屬性復(fù)選框組件的常用屬性 StateState: :指定三種狀態(tài)：指定三種狀態(tài)：cbCheckedcbChecked，選中；，選中；cbUnCheckedcbUnChecked，未選中；，未選中；cbGrayedcbGrayed，不確定，不確定CheckedChecked: :為為TrueTrue，則選中，小方框內(nèi)有，則選中，小方框內(nèi)有標(biāo)記；為標(biāo)記；為FalseFalse則未選中則未選中CaptionCaption: :設(shè)置復(fù)選框旁邊的說明文字設(shè)置復(fù)選框旁邊的說明文字7. 單選按鈕組件

48、單選按鈕組件 單選按鈕是旁邊帶有文本說明的小圓圈，具單選按鈕是旁邊帶有文本說明的小圓圈，具有選中和未選中兩種狀態(tài)。組件的有選中和未選中兩種狀態(tài)。組件的CheckedChecked屬性值為屬性值為TrueTrue時，組件處于選中狀態(tài)，小時，組件處于選中狀態(tài)，小圓圈的內(nèi)部有黑色的小點；為圓圈的內(nèi)部有黑色的小點；為FalseFalse時，組時，組件處于未選中狀態(tài)，小圓圈是空心的。件處于未選中狀態(tài)，小圓圈是空心的。 在一組單選按鈕中，只允許一個單選按鈕在一組單選按鈕中，只允許一個單選按鈕處于選中狀態(tài)，也就是說，在同一群組中處于選中狀態(tài)，也就是說，在同一群組中的選項彼此之間是具有的選項彼此之間是具有“互

49、斥性互斥性”。單選。單選按鈕適用于在多個選項中選擇一項的情況。按鈕適用于在多個選項中選擇一項的情況。單選按鈕組的實現(xiàn)通常用三種方法：單選按鈕組的實現(xiàn)通常用三種方法： 利用利用GroupBoxGroupBox分組組件分組組件+ RadioButton+ RadioButton單選按鈕組件單選按鈕組件利用利用PanelPanel面板組件面板組件+ RadioButton+ RadioButton單選按鈕組件單選按鈕組件 利用利用RadioGroupRadioGroup單選分組框組件，單選分組框組件， 其常用屬性有：其常用屬性有： CaptionCaption：設(shè)置顯示在組件上方的文字：設(shè)置顯示在組

50、件上方的文字ColumnsColumns：設(shè)置組件的列數(shù)，最多可有：設(shè)置組件的列數(shù)，最多可有1616個個ItemIndexItemIndex：設(shè)置單選分組框中被選中的單選按鈕的索：設(shè)置單選分組框中被選中的單選按鈕的索引值，從引值，從0 0開始開始ItemItem：設(shè)置單選分組框中單選按鈕的標(biāo)題文字，每行：設(shè)置單選分組框中單選按鈕的標(biāo)題文字，每行文本代表一個選項。利用提供的方法可以添加文本代表一個選項。利用提供的方法可以添加（AddAdd）、刪除（）、刪除（DeleteDelete）、插入（）、插入（InsertInsert）、交換）、交換（ExchangeExchange）選項按鈕。）選項按鈕

51、。例例4-5：8. ListBox列表框組件列表框組件 列表框中可以顯示出所有可能的數(shù)據(jù)供用列表框中可以顯示出所有可能的數(shù)據(jù)供用戶選擇，用戶可以選擇其中的一項或多項，戶選擇，用戶可以選擇其中的一項或多項，因此用戶輸入數(shù)據(jù)可以不必使用鍵盤。列因此用戶輸入數(shù)據(jù)可以不必使用鍵盤。列表框組件常用于選項較多的情況。表框組件常用于選項較多的情況。 列表框組件的常用屬性列表框組件的常用屬性 ItemsItems：列表框內(nèi)的選項數(shù)據(jù)?？梢栽谠O(shè)計：列表框內(nèi)的選項數(shù)據(jù)?？梢栽谠O(shè)計階段單擊屬性右邊的階段單擊屬性右邊的“.”.”按鈕，在編輯按鈕，在編輯窗口輸入選項，一行對應(yīng)一個選項。程序窗口輸入選項，一行對應(yīng)一個選項

52、。程序運行時，可以利用運行時，可以利用ItemsItems對象提供的方法：對象提供的方法：AddAdd添加一個選項，添加一個選項，DeleteDelete刪除一個選項，刪除一個選項，ClearClear刪除所有選項，刪除所有選項，InsertInsert插入一個選項，插入一個選項，MoveMove移動選項位置，移動選項位置，ExchangeExchange交換兩個選交換兩個選項的位置。項的位置。CountCount：列表框內(nèi)的選項數(shù)據(jù)的項數(shù)：列表框內(nèi)的選項數(shù)據(jù)的項數(shù)ItemsIndexItemsIndex：選項在：選項在ItemsItems數(shù)組中的編號，數(shù)組中的編號，從從0 0開始至開始至Co

53、unt-1Count-1ColumnsColumns：列表框的列數(shù)：列表框的列數(shù)MultiSelectMultiSelect：是否可以選擇多項：是否可以選擇多項SelCountSelCount：被選中項目的數(shù)量：被選中項目的數(shù)量SelectedSelected：設(shè)置或返回某選項是否被選中：設(shè)置或返回某選項是否被選中SortedSorted：決定列表框的選項是否排序：決定列表框的選項是否排序9. ComboBox組合框組件組合框組件 組合框組把組合框組把EditEdit編輯框和編輯框和ListBoxListBox列表框兩列表框兩者功能合二為一，用戶可以直接輸入內(nèi)容，者功能合二為一，用戶可以直接輸

54、入內(nèi)容，也可以單擊向下的箭頭后拉出一個列表框，也可以單擊向下的箭頭后拉出一個列表框，從中選擇某個列表項。從中選擇某個列表項。 在組合框中選項數(shù)據(jù)的新增、刪除、移動、在組合框中選項數(shù)據(jù)的新增、刪除、移動、選取等等，也是利用選取等等，也是利用ItemsItems對象的對象的AddAdd、DeleteDelete、ClearClear、InsertInsert、ExchangeExchange、MoveMove等方法完成。等方法完成。 組合框組件的常用屬性組合框組件的常用屬性 ItemsItems：組合框下拉列表的選項數(shù)據(jù)?？梢栽谠O(shè)計：組合框下拉列表的選項數(shù)據(jù)。可以在設(shè)計階段單擊屬性右邊的階段單擊屬

55、性右邊的“.”.”按鈕，在編輯窗口輸按鈕，在編輯窗口輸入選項，一行對應(yīng)一個選項。程序運行時，可以入選項，一行對應(yīng)一個選項。程序運行時，可以利用利用ItemsItems對象提供的方法：對象提供的方法：AddAdd添加一個選項，添加一個選項，DeleteDelete刪除一個選項，刪除一個選項，ClearClear刪除所有選項，刪除所有選項，InsertInsert插入一個選項，插入一個選項，MoveMove移動選項位置，移動選項位置，ExchangeExchange交換兩個選項的位置交換兩個選項的位置CountCount：下拉列表的選項數(shù)據(jù)的項數(shù)：下拉列表的選項數(shù)據(jù)的項數(shù)ItemsIndexIte

56、msIndex：選項在：選項在ItemsItems數(shù)組中的編號，從數(shù)組中的編號，從0 0開開始至始至Count-1Count-1TextText：確定在組合框中顯示的文本：確定在組合框中顯示的文本SortedSorted：決定組合框的列表選項是否排序：決定組合框的列表選項是否排序StyleStyle：組合框的風(fēng)格，有幾種可供選擇的風(fēng)格：組合框的風(fēng)格，有幾種可供選擇的風(fēng)格：csDropDowncsDropDown，標(biāo)準(zhǔn)風(fēng)格，用戶可以在組合框中輸，標(biāo)準(zhǔn)風(fēng)格，用戶可以在組合框中輸入；入；csDropDownListcsDropDownList，只有列表框，沒有編輯框；，只有列表框，沒有編輯框；csO

57、wnerDrawFixedcsOwnerDrawFixed，有編輯框，但只能顯示不能，有編輯框，但只能顯示不能輸 入 ， 也 有 列 表 框 ， 每 個 列 表 項 的 高 度 由輸 入 ， 也 有 列 表 框 ， 每 個 列 表 項 的 高 度 由I t e m H e i g h tI t e m H e i g h t 屬 性 統(tǒng) 一 指 定 ；屬 性 統(tǒng) 一 指 定 ；csOwnerDrawVariablecsOwnerDrawVariable，有編輯框，但只能顯示，有編輯框，但只能顯示不能輸入，也有列表框，每個列表項的高度可以不能輸入，也有列表框，每個列表項的高度可以不同，可顯示非字

58、符串的數(shù)據(jù)；不同，可顯示非字符串的數(shù)據(jù)；csSimplecsSimple，只有，只有編輯框，沒有列表框編輯框，沒有列表框DropDownCountDropDownCount：組合框下拉列表顯示選項的最大：組合框下拉列表顯示選項的最大行數(shù)行數(shù) 例例4-64-6：某單位開田徑運動會，該單位員：某單位開田徑運動會，該單位員工姓名可在工姓名可在ComboBox1ComboBox1的列表框中選取，也的列表框中選取，也可以從鍵盤輸入。所有參賽項目放在可以從鍵盤輸入。所有參賽項目放在ListBox1ListBox1中供選取，某員工將要參賽的項中供選取，某員工將要參賽的項目從目從ListBox1ListBox

59、1中選取至中選取至ListBox2ListBox2，最后將，最后將所有員工參賽的項目放在所有員工參賽的項目放在Memo1Memo1組件中。組件中。 10. ActionList行為列表組件行為列表組件應(yīng)用程序通常要完成多項指定的任務(wù)，應(yīng)用程序通常要完成多項指定的任務(wù)，DelphiDelphi中可以把某項任務(wù)指定為一個中可以把某項任務(wù)指定為一個“行行為為”。一個應(yīng)用程序的所有的。一個應(yīng)用程序的所有的“行為行為”常常常用常用ActionListActionList行為列表組件進行管理。行為列表組件進行管理。設(shè)置設(shè)置ActionListActionList的的ImagesImages屬性，就能為屬性

60、，就能為ActionListActionList指定一個圖像列表（指定一個圖像列表（ImageListImageList）對象。對象。 利用利用“行為行為”列表編輯器列表編輯器可以添加、刪除、可以添加、刪除、修改修改“行為行為”。每個。每個“行為行為”都是一個對都是一個對象，雙擊某個象，雙擊某個“行為行為”可在該可在該“行為行為”的的OnExecuteOnExecute事件中編寫相應(yīng)的執(zhí)行程序代碼。事件中編寫相應(yīng)的執(zhí)行程序代碼。11. MainMenu主菜單組件主菜單組件 菜單可分為兩類：菜單可分為兩類：主菜單主菜單和和彈出式菜單彈出式菜單。主菜單又稱下拉菜單，由主菜單又稱下拉菜單，由MainMenuMainMenu組件實組件實現(xiàn)；彈出式菜單由現(xiàn)；彈出式菜單由Po