129447936899843750數(shù)據(jù)庫技術(shù)[二]6.ppt

1、數(shù)據(jù)庫技術(shù) 講課：34學(xué)時 總 學(xué) 時 ：64學(xué)時 實驗：30學(xué)時：（12次） 教 師 ： 薛昌春 信息管理系,第六章：Delphi常用控件程序設(shè)計,在使用Delphi開發(fā)應(yīng)用程序中，廣泛地使用到組件。可視組件庫（Visual Component Library，簡稱VCL）是Delphi中最重要的部分，通過VCL可以在窗體中方便地構(gòu)建與用戶交互的界面，其中大部分組件顯示在組件面板（Components Palette）上。除了少數(shù)例外，所有的組件都是TComponent類的子類。,一、Standard頁上的常用組件,1. Label標(biāo)簽組件 標(biāo)簽組件用于在窗體上顯示文字，通常用它為其他組件加

2、上一些標(biāo)注和說明文字，以便讓使用者了解那些組件的用途。特別是有些組件本身沒有Caption屬性，添加一個標(biāo)簽組件作為提示文字就很有必要。 可將標(biāo)簽組件的焦點轉(zhuǎn)移給Form上的另一個對象，方法是設(shè)置標(biāo)簽組件的FocusControl屬性。在值段中，選用與它關(guān)聯(lián)對象的對象名。然后在標(biāo)簽中設(shè)置熱鍵，即在Caption屬性值段中輸入含有“。,Lines常用的屬性和方法,Strings屬性：指定組件每一行文本的內(nèi)容 Memo1.Lines.Strings0 :=第一行; 等效于Memo1.Lines0 :=第一行; Add方法：在組件的最后添加一行文本 Memo1.Lines.Add(最后一行下面加一行

3、文字); Insert方法：在指定行下方插入一行文本 Memo1.Lines.Insert(2,第三行處插入一行); Delete方法：刪除組件內(nèi)指定行的文本 Memol.Lines.Delete(2); / 刪除第三行,SaveToFile：將文本保存到文件 Memo1.Lines.SaveToFile(C:tempa.txt); LoadFromFile：讀取文件內(nèi)容到Memo組件中 Memo1.Lines.LoadFromFile(C:tempa.txt); Clear：清除組件內(nèi)的所有文本 Memo1.Lines.clear;,（2）Memo組件的其他常用屬性,ScrollBar：設(shè)置

4、是否顯示滾動條。有四個值：ssBoth，顯示水平和垂直滾動條；ssHorizontal，顯示水平滾動條；ssVertical，顯示垂直滾動條；ssNone，不加滾動條。 WantReturn：設(shè)置在組件內(nèi)部能否使用回車鍵，為True表示可以使用回車鍵。 WantTab：設(shè)置在組件內(nèi)按Tab鍵是否起到移位作用，可取True和False兩個值,4. Button基本按鈕組件,按鈕是人機(jī)交互界面最常見的一個組件，通常用于用戶選取執(zhí)行某項命令。Delphi提供的按鈕有基本按鈕、位圖按鈕、復(fù)選框、單選按鈕、加速按鈕等?；景粹oButton是最簡單的一種按鈕。,（1）Button按鈕的常用屬性,Capti

5、on：按鈕上顯示的文本 Default：設(shè)定按鈕是否為默認(rèn)按鈕。默認(rèn)按鈕在打開窗體或?qū)υ捒驎r首先取得焦點，此時按下Enter鍵，將執(zhí)行默認(rèn)按鈕的OnClick事件處理代碼。雖然可將多個Button對象指定為默認(rèn)按鈕，但只有Tab次序最前的Button對象才是真正的默認(rèn)按鈕 Cancel：設(shè)定按鈕是否為取消按鈕，取消按鈕的功能與默認(rèn)按鈕相同，但它是針對Esc鍵設(shè)計的。當(dāng)用戶按下Esc鍵，被設(shè)為取消按鈕的OnClick事件處理就會被執(zhí)行,（2）Button按鈕的常用事件,Button按鈕常用的響應(yīng)事件有：OnClick、OnDblClick、OnMouseMove、OnMouseUp、OnMous

6、eDown等。OnClick及OnDblClick處理事件是最常用的。 當(dāng)用戶用鼠標(biāo)在Button對象上單擊一下，或是當(dāng)焦點在Button對象上時按下Enter鍵，觸發(fā)OnClick事件處理。,5. Panel面板組件,Panel組件內(nèi)，起分組作用 。另外，Panel組件提供了優(yōu)化視覺效果的屬性，因此Panel組件也常作為某些組件的背景，使程序界面更協(xié)調(diào)、優(yōu)美。面板組件Panel還常用于制作信息欄或狀態(tài)欄。,面板組件Panel的常用屬性,Align:固定Panel的位置：alBottom，固定在父組件下方；alCient，覆蓋父組件的全部；alLeft，固定在父組件左方；alNone，位置沒有

7、限制；alRight，固定在父組件右方；altop，固定在父組件上方 BevelInner:確定Panel內(nèi)層是凸出還是凹下：bvLowered，內(nèi)層凹下；bvNone，內(nèi)層無凹凸；bvRaised，內(nèi)層凸出 BevelOuter:確定Panel外層是凸出還是凹下：bvLowered，外層凹下；bvNone，外層無凹凸；bvRaised，外層凸出,BevelWidth:確定Panel內(nèi)層或外層邊界線的粗細(xì)，數(shù)值越大界線越粗 BorderStyle:確定Panel是否有外框。 BorderWidth:確定Panel外層部分的寬度，數(shù)值越大外層越寬,6. CheckBox復(fù)選框組件,復(fù)選框有一小方

8、框，旁邊帶有文本說明，一般具有選中和未選中兩種狀態(tài)，鼠標(biāo)單擊復(fù)選框可以在這兩種狀態(tài)之間切換。選中復(fù)選框時，小方框內(nèi)有標(biāo)記。 通常由多個復(fù)選框組件形成一組，在這一組中用戶可同時選中多個組件，選項彼此之間是不具有“互斥性”，不會影響其他選項的行為，適用于要進(jìn)行多項選擇的情況。組件可以識別OnClick事件。,復(fù)選框組件的常用屬性,State:指定三種狀態(tài)：cbChecked，選中；cbUnChecked，未選中；cbGrayed，不確定 Checked:為True，則選中，小方框內(nèi)有標(biāo)記；為False則未選中 Caption:設(shè)置復(fù)選框旁邊的說明文字,例：設(shè)置字體風(fēng)格,粗體、斜體、下劃線 Labe

9、l1.Font.Style := ; fsBold fsItalic fsUnderline fsStrikeOut 集合：并運(yùn)算+ 差運(yùn)算-,7. 單選按鈕組件,單選按鈕是旁邊帶有文本說明的小圓圈，具有選中和未選中兩種狀態(tài)。組件的Checked屬性值為True時，組件處于選中狀態(tài)，小圓圈的內(nèi)部有黑色的小點；為False時，組件處于未選中狀態(tài)，小圓圈是空心的。 在一組單選按鈕中，只允許一個單選按鈕處于選中狀態(tài)，也就是說，在同一群組中的選項彼此之間是具有“互斥性”。單選按鈕適用于在多個選項中選擇一項的情況。,單選按鈕組的實現(xiàn)通常用三種方法：,利用GroupBox分組組件+ RadioButton

10、單選按鈕組件 利用Panel面板組件+ RadioButton單選按鈕組件 利用RadioGroup單選分組框組件， 其常用屬性有： Caption：設(shè)置顯示在組件上方的文字 Columns：設(shè)置組件的列數(shù)，最多可有16個 ItemIndex：設(shè)置單選分組框中被選中的單選按鈕的索引值，從0開始 Item：設(shè)置單選分組框中單選按鈕的標(biāo)題文字，每行文本代表一個選項。利用提供的方法可以添加（Add）、刪除（Delete）、插入（Insert）、交換（Exchange）選項按鈕。,例：設(shè)置字體名稱,case RadioGroup1.ItemIndex of 0: label1.Font.Name:=宋

11、體; 1: label1.Font.Name:=黑體; 2: label1.Font.Name:=楷體_GB2312; end;,8. ListBox列表框組件,列表框中可以顯示出所有可能的數(shù)據(jù)供用戶選擇，用戶可以選擇其中的一項或多項。列表框組件常用于選項較多的情況。,列表框組件的常用屬性,Items：列表框內(nèi)的選項數(shù)據(jù)。 程序運(yùn)行時，可以利用Items對象提供的方法：Add添加一個選項，Delete刪除一個選項，Clear刪除所有選項，Insert插入一個選項，Move移動選項位置，Exchange交換兩個選項的位置。 Count：列表框內(nèi)的選項數(shù)據(jù)的項數(shù) ItemsIndex：選項在Ite

12、ms數(shù)組中的編號，從0開始至Count-1,Columns：列表框的列數(shù) MultiSelect：是否可以選擇多項 SelCount：被選中項目的數(shù)量 Selected：設(shè)置或返回某選項是否被選中 Sorted：決定列表框的選項是否排序,9. ComboBox組合框組件,組合框組把Edit編輯框和ListBox列表框兩者功能合二為一，用戶可以直接輸入內(nèi)容，也可以單擊向下的箭頭后拉出一個列表框，從中選擇某個列表項。 在組合框中選項數(shù)據(jù)的新增、刪除、移動、選取等等，也是利用Items對象的Add、Delete、Clear、Insert、Exchange、Move等方法完成。,組合框組件的常用屬性,

13、Items：組合框下拉列表的選項數(shù)據(jù)。 程序運(yùn)行時，可以利用Items對象提供的方法：Add添加一個選項，Delete刪除一個選項，Clear刪除所有選項，Insert插入一個選項，Move移動選項位置，Exchange交換兩個選項的位置 Count：下拉列表的選項數(shù)據(jù)的項數(shù) ItemsIndex：選項在Items數(shù)組中的編號，從0開始至Count-1 Text：確定在組合框中顯示的文本,Sorted：決定組合框的列表選項是否排序 Style：組合框的風(fēng)格，有幾種可供選擇的風(fēng)格：csDropDown，標(biāo)準(zhǔn)風(fēng)格，用戶可以在組合框中輸入；csDropDownList，只有列表框，沒有編輯框；csO

14、wnerDrawFixed，有編輯框，但只能顯示不能輸入，也有列表框，每個列表項的高度由ItemHeight屬性統(tǒng)一指定；csOwnerDrawVariable，有編輯框，但只能顯示不能輸入，也有列表框，每個列表項的高度可以不同，可顯示非字符串的數(shù)據(jù)；csSimple，只有編輯框，沒有列表框 DropDownCount：組合框下拉列表顯示選項的最大行數(shù),例：某單位開運(yùn)動會，該單位員工姓名可在ComboBox1的列表框中選取，也可以從鍵盤輸入。所有參賽項目放在ListBox1中供選取，將某員工將要參賽的項目從選取至Memo1組件中。,procedure TForm1.Button3Click(S

15、ender: TObject); VAR I:INTEGER; begin FOR I:=0 TO LISTBOX1.Count-1 do if LISTBOX1.SelectedI THEN MEMO1.Lines.Add(COMBOBOX1.Text+-+LISTBOX1.Items.StringsI); end;,二. Additional頁上的常用組件,1. BitBtn位圖按鈕組件 位圖按鈕與基本按鈕的作用相同?；景粹o上只能顯示文字，而位圖按鈕上不僅可以顯示文字，還可以顯示位圖，使界面更加美觀。,BitBtn組件的常用屬性,Caption:位圖按鈕上顯示的文字 Kind:確定位圖圖

16、形的種類，可取11個值。當(dāng)為bkCustoms時, 位圖圖形由Glyph屬性確定。取另外10個值，由系統(tǒng)規(guī)定按鈕的圖形文字 Glyph:確定位圖圖形文件（*.bmp） Spacing:確定按鈕上位圖與文字的像素個數(shù)。為-1時，文字、位圖、按鈕成等距離 Margin:確定位圖與按鈕邊界之間的像素個數(shù),Layout:位圖按鈕上文字和圖形的布局。 為blGlyphLeft，圖像在文字的左邊； 為blGlyphRight，圖像在文字的右邊； 為blGlyphTop，圖像在文字的上面； 為blGlyphBottom，圖像在文字的下面,2. SpeedButton加速按鈕組件,加速按鈕上也可以顯示圖形和文

17、字，用法與位圖按鈕非常相似。其他的按鈕如普通按鈕、位圖按鈕在按下后立即彈起，而加速按鈕可以在按下后仍保持按下的狀態(tài)。通常多個加速按鈕形成一組，在這一組中只能有一個按鈕處于按下狀態(tài)。因此，加速按鈕多用于生成工具欄按鈕。,SpeedButton的常用屬性,Caption:按鈕上顯示的文字 AllowAllUp:為True，允許一組中的所有按鈕都可以彈起；為False，一組按鈕中有一個是按下狀態(tài) Down:確定按鈕是彈起（False）還是按下（True）狀態(tài)，同一組只能有一個為True GroupIndex:確定加速按鈕的組號，為0表示此按鈕不屬于任何一組。此值相同的按鈕將組成同一組 Glyph:確

18、定顯示在按鈕上的位圖圖形文件（*.bmp） Layout:確定按鈕上文字和圖形的布局,三、Win32頁上的常用組件,1. ImageList圖形列表組件 ImageLlist組件用于管理一組（icons）圖標(biāo)或（bitmaps）位圖。同一個ImageList組件中的圖形大小相同，默認(rèn)大小為1616像素，因此這些圖形適合于作圖標(biāo)。如果ImageList組件中有n個圖形，則每個圖形都編一個號，編號從0到n-1，通過編號可以訪問對應(yīng)的圖形。,ImageList組件的常用屬性,Height：確定圖形的高度，默認(rèn)值為16像素 Width：確定圖形的寬度，默認(rèn)值為16像素 BkColor：確定背景顏色 B

19、lendColor：確定前景顏色 ImageType：默認(rèn)值為itImage，表示顯示原圖形；若值為itMask則顯示原圖形的掩碼 Masked：值為True表示含有透明圖形，值為False則含有不透明圖形,利用圖形列表編輯器可以向ImageList組件內(nèi)加載圖形。雙擊ImageList組件可以打開圖形列表編輯器。,2. ToolBar工具欄組件,工具欄把常用的菜單項對應(yīng)成按鈕，并把多個按鈕以列表的形式排列成行，用戶單擊工具欄某個按鈕就執(zhí)行該菜單項的功能，不需要到菜單中去找相應(yīng)的菜單項。 工具欄中可以添加按鈕（Button）、圖形按鈕（BitBtn）、加速按鈕（SpeedButton）、組合框

20、（ComboBox）、編輯框（Edit）等。工具欄可以放在標(biāo)題欄或菜單的下面，也可以放在窗口工作區(qū)的下面或左邊。,使用ToolBar組件建立工具欄的步驟,（1）將ToolBar添加到窗體上，生成空白的工具欄。默認(rèn)位于窗口的頂部，寬度與窗體相同。設(shè)置Alignment屬性可以改變工具欄的位置。 （2）右擊ToolBar組件，從彈出式菜單中執(zhí)行“New Button”，則在工具欄中添加一個按鈕。,工具欄組件常用屬性,Alignment：確定工具欄相對窗體的位置。默認(rèn)值為alTop，位于頂部；alLeft，位于左邊；alRight，位于右邊；alBottom，位于底部；alClient，占滿整個窗體

21、；alCustom，用戶自定義； alNone，位置沒有限制 Caption：按鈕上顯示的文字 Flat：默認(rèn)值為False，表示工具欄上的按鈕有邊框；值為True表示按鈕無邊框，程序運(yùn)行時鼠標(biāo)移到按鈕上面，按鈕自動凸出顯示,工具欄組件常用屬性,Images：指定工具欄的圖形組件（通常是ImageList組件） List：默認(rèn)值為False，表示圖標(biāo)在按鈕的中間，文字在圖標(biāo)的下方；值為True表示圖標(biāo)在按鈕的左邊，文字在圖標(biāo)的右邊 ShowCaption：默認(rèn)值為False，表示按鈕上不顯示文字；值為True表示按鈕上顯示Caption屬性的文字,工具欄按鈕常用屬性,Down：默認(rèn)值為Fals

22、e，表示按鈕處于彈起狀態(tài)；值為True表示按鈕處于按下狀態(tài) Grouped：默認(rèn)值為False，表示按鈕不成組；值為True表示按鈕成組（一個組中只能有一個按鈕處于按下狀態(tài)） ImageIndex：設(shè)定ImageList組件的圖標(biāo)索引號 MenuItem：指定本按鈕與哪個菜單項相對應(yīng) Style：確定按鈕的風(fēng)格：TbsButton，按鈕任何時候都處于按下狀態(tài)；TbsCheck，單擊按鈕變?yōu)榘聪聽顟B(tài)，再單擊按鈕變?yōu)閺椘馉顟B(tài)；Tbsdivider，顯示分隔符；TbsDropDown，顯示向下的箭頭；TbsSeparator，顯示為空的分隔符,3. ProgressBar進(jìn)度條組件,進(jìn)度條組件用來指

23、示一項任務(wù)的執(zhí)行進(jìn)度，隨著任務(wù)的進(jìn)行，在進(jìn)度條的矩形區(qū)域內(nèi)從左向右填充上小方塊，當(dāng)方塊充滿整個矩形區(qū)域時，表示任務(wù)的完成。,進(jìn)度條組件常見的屬性,Max：確定進(jìn)度條的最大數(shù)值 Min：確定進(jìn)度條的最小數(shù)值 Orientation：確定進(jìn)度條方向。pbHorizontal表示水平方向，pbVertical表示垂直方向 Position：取值在min與max之間，表示進(jìn)度進(jìn)展情況 Smooth：確定方塊填充方式是平滑的（True）還是分段的（False） Step：確定進(jìn)度條的步長，即Position的遞增值,進(jìn)度條組件常見的方法,StepBy(Data:Integer)：增加Position的值

24、，增加的大小由Data確定 StepIt：也能增加Position的值，增加的大小要由Step確定,4. StatusBar狀態(tài)欄組件,狀態(tài)欄一般位于窗體的底部，用于顯示當(dāng)前狀態(tài)信息。 狀態(tài)欄組件初始是個空白的狀態(tài)欄，常常要在狀態(tài)欄上添加多個狀態(tài)面板，并在每個狀態(tài)面板上添加文字作為提示信息。雙擊狀態(tài)欄組件，打開面板編輯器，添加狀態(tài)面板。單擊面板編輯器中的“新增”按鈕，為狀態(tài)欄添加狀態(tài)面板。在對象監(jiān)視器中，在狀態(tài)面板的Text屬性中輸入文字，狀態(tài)欄中對應(yīng)的面板上將顯示這些文字。,狀態(tài)欄組件常用屬性,Alignment：確定狀態(tài)欄在對窗體的位置。默認(rèn)值為alBottom，位于底部；alLeft，位

25、于左邊；alRight，位于右邊；alTop，位于頂部；alClient，占滿整個窗體；alCustom，用戶自定義； alNone，位置沒有限制 BorderWidth：狀態(tài)欄邊框的寬度 Panels：狀態(tài)欄中的面板集合,狀態(tài)欄面板常見的屬性,Alignment：確定文字在狀態(tài)欄面板中對齊方式 Text：確定顯示狀態(tài)欄面板上的文字 Width：確定狀態(tài)欄面板的寬度 狀態(tài)欄的Panels屬性也是一個對象，Panels.Itemsi.text(i=0, 1, 2, .)可以用來設(shè)置第i個狀態(tài)欄面板上顯示的文字。,其他組件,Timer組件: （1）Enabled屬性：該屬性值決定Timer是否有效。如果Enabled值為True，則OnTimer事件將發(fā)生；如果是False，則OnTimer事件不發(fā)生。Enabled缺省值是True。 （2）Interval屬性：該屬性值以毫秒為單位，決定了觸發(fā)OnTimer事件的時間間隔。缺省值是1000（即1秒），取值范圍是065535之間的整數(shù)。如果將Interval設(shè)為0，則沒有OnTimer事件發(fā)生。 （3）OnTimer事件：每經(jīng)過由Interval屬性確定的時間間隔，為該事件編寫的處理程序?qū)⒆詣訄?zhí)行一次。,Application組件,當(dāng)一個應(yīng)用程序運(yùn)行時，Delphi會自動產(chǎn)生一個A