四年級上冊信息技術課件-設置組件屬性(6)｜北京版

1、設置組件屬性設置組件屬性根據(jù)組件在運行期間是否可見，可以把組件分為兩大類：可視組件和不可視組件。二、組件屬性事件和方法二、組件屬性事件和方法1. 組件屬性組件屬性 對組件屬性的設置有兩種方式：一是在Object Inspector的Properties選項卡中設置組件的屬性值，例可以通過雙擊Enabled后的True，將Enabled屬性設置為False；二是通過程序語句使組件的屬性值在程序運行時動態(tài)地被改變，如： edit1.enabled:=True; Label1.Caption:=“計算機系”； 還有一種比較特殊的屬性：嵌套屬性，即包含子屬性的屬性。一般嵌套屬性在Object Insp

2、ector窗口中顯示時前面有一個“+”號或“-”號。單擊帶有子屬性的屬性前面的“+”號時，展開子屬性，此時“+”號變成“-”號；單擊已展開其子屬性的屬性前的“-”號，則將子屬性隱藏起來。另外雙擊嵌套屬性，則將其子屬性在展開和隱藏兩種狀態(tài)之間切換。2. 組件事件組件事件 每個組件都有相應的一組事件，各組件有很多事件是相同的，包括與鼠標、鍵盤、拖曳和焦點相關的事件等，這些常用事件及其觸發(fā)條件列于下表中。 3. 組件方法組件方法 組件方法，實質(zhì)上就是函數(shù)或過程。組件的方法是該類或?qū)ο箢愋蛯嵗暮瘮?shù)或過程。每一類組件都有自己的方法，以實現(xiàn)各種功能。（見下表）組件常見的基本屬性組件常見的基本屬性 組件的

3、常用事件及觸發(fā)條件組件的常用事件及觸發(fā)條件一、向窗體中添加組件一、向窗體中添加組件 向窗體中添加組件的方法很多，主要有以下3種： (1) 在組件面板的組件欄中單擊需要添加的組件，然后在窗體中需要添加該組件處單擊鼠標左鍵，即可將組件添加到窗體中。此時添加的組件以缺省的大小出現(xiàn)在窗體中，可根據(jù)需要對組件的大小進行調(diào)整。 (2) 在組件欄中單擊需要添加的組件，然后在窗體中需要添加該組件處拖動鼠標左鍵，松開鼠標左鍵后，組件就以剛才拖動的大小出現(xiàn)在窗體中，接著也可以對組件的大小進行調(diào)整。 (3) 在組件欄中雙擊組件，則被雙擊的組件會自動添加到當前默認的窗口或容器組件中。二、二、 編輯組件對象編輯組件對象

4、1. 選中窗體組件選中窗體組件 有時要對多個組件進行同時編輯，就需要同時選中多個組件。選定多個組件的方法有2種： (1) 按下Shift 鍵的同時，利用鼠標左鍵單擊各個組件。 (2) 在窗體上沒有組件的地方按下鼠標左鍵并拖動，將會出現(xiàn)一個虛框。松開鼠標左鍵后，該虛框“觸及”到的組件就被選中。2. 復制窗體中的組件復制窗體中的組件方法1：（1）選擇一個或多個要復制的組件。（2）通過主菜單命令EditCopy復制到剪貼板中。（3）然后通過菜單命令EditPaste將剪貼板中的組件粘貼到窗體中。方法2：（1）選擇一個或多個要復制的組件。（2）通過快捷鍵Ctrl+C將選中的組件復制到剪貼板中。（3）通

5、過快捷鍵Ctrl+V將剪貼板中的組件粘貼到窗體中。3. 刪除窗體中的組件刪除窗體中的組件刪除窗體中的組件，有兩種常用方法：方法1：（1）選中要刪除的組件。（2）單擊Delete鍵。方法2：（1）選中要刪除的組件。（2）選擇主菜單中的EditDelete命令。 4. 調(diào)整組件的大小和位置調(diào)整組件的大小和位置 改變組件在窗體中的大小和位置可以采用下面的方法： 方法1：鼠標操作 選中組件，在組件上按下鼠標左鍵并拖動到目的位置，組件就被移動到該位置。 將鼠標移動到某個黑點上，鼠標形狀將變成雙向箭頭，此時可以按下鼠標左鍵進行拖動，即可改變組件的大小。 方法2：鍵盤操作 利用鍵盤的上()、下()、左()、

6、右()移動鍵可以在窗體中選擇組件。選中某個組件后，通過Ctrl +、Ctrl+、Ctrl +、Ctrl+可以改變組件的位置，通過Shift +、Shift +、Shift +、Shift +可以改變組件的大小。 方法3：統(tǒng)一操作 先選中幾個組件，然后通過主菜單EditSize.命令，將打開Size對話框，如圖所示，在Size對話框中選擇寬度和高度的有關設置即可。 圖圖 Size對話框?qū)υ捒?Alignment 對話框?qū)υ捒?將多個組件選中后，除了用上述方法改變它們的大小外，還可以同時對它們進行移動和對齊等操作，方法是：選擇主菜單的EditAlign.命令，將彈出如圖所示的Alignment 對

7、話框。在Alignment對話框中，可對選中的組件進行水平和垂直兩個方向的對齊操作，其中各選項的含義列于下表中。 Alignment對話框中各選項的含義對話框中各選項的含義 5. 設置可視組件的設置可視組件的Tab順序順序 方法：選擇主菜單的EditTable Order. . .命令，將彈出如圖所示的“Edit Tab Order”對話框，在其中的“Controls listed in tab order”框中選中某組件后，點擊右部的上、下箭頭就可改變該組件的TabOrder屬性。圖圖Edit Tab Order對話框?qū)υ捒蛞?、一、Label組件（位于組件（位于standard面板）面板）

8、標簽組件用于在窗體上顯示文本，多用于顯示提示信息；也可顯示動態(tài)文本，如用label顯示不斷變化的當前時間。Label組件常用屬性的含義見下表。 表表 Label組件的常用屬性組件的常用屬性 （3）PasswordChar屬性 將用戶輸入的所有字符以同一個字符顯示，其默認值是“#0”，表示編輯框直接顯示用戶輸入的字符；如果將其設置為“*”，則不論用戶輸入什么，編輯框中都只顯示“*”號，一般在鍵入密碼時可以這樣設置。 （4）Autosize屬性 用于控制是否隨字體的高度來改變編輯框的高度。當Autosize設置為True時，編輯框的高度會自動適應輸入文字的字體高度。值得注意的是，該屬性只有當Bor

9、derStyle屬性設置為bsSingle（單線邊框，大小不可改變）時才有效。 Edit組件的其他常用屬性見下表。 Edit組件最常用的事件（也是默認事件）為OnChange，一旦Edit組件中的文本內(nèi)容發(fā)生改變，就會觸發(fā)OnChange事件。 Edit組件的其他常用屬性組件的其他常用屬性 【例例】用戶身份驗證程序。本程序接收用戶輸入的用戶名和口令，進行驗證，根據(jù)輸入是否正確顯示相應的提示信息。 （1）主窗體denglu界面如圖所示，界面上包含6個組件，2個Label組件用于顯示提示信息、2個Edit組件（txtusername用于輸入用戶名，txtpassword用于輸入用戶口令）和2個Bu

10、tton組件。 （2）組件的屬性設置。denglu窗體和welcome窗體所包含的各組件的主要屬性設置分別如表一和表二所示。 表一表一 denglu窗體及其包含的組件對象屬性表窗體及其包含的組件對象屬性表表二表二 welcome窗體及其包含的組件對象屬性表窗體及其包含的組件對象屬性表 (3) 編寫denglu窗體相應的程序代碼。 在implementation區(qū)中加入“unit2”單元，表示需引用該單元（unit2單元是welcome窗體所對應的單元）。如下所示：uses unit2; 定義兩個unit級符號常量： const username=guest; / 定義用戶名 password=

11、12345; / 定義口令 雙擊“確定”按鈕，在代碼編輯區(qū)中輸入該按鈕的OnClick事件代碼：procedure Tdenglu.BtnOKClick(Sender: TObject);/ 判斷所輸入的用戶名和口令是否正確，以決定“welcome”窗體上的顯示內(nèi)容。begin if (txtusername.text=username) and (txtpassword.text=password) then begin / 用戶名和口令都正確，執(zhí)行 welcome.caption:=歡迎使用; welcome.label1.caption:=歡迎使用教師管理系統(tǒng); end else / 用

12、戶名和口令只要有一項不正確，執(zhí)行 begin welcome.caption:=拒絕使用; welcome.label1.caption:=口令錯誤，請重新輸入; end ; welcome.ShowModal; / 顯示welcome窗體end; 雙擊“退出”按鈕，在編輯區(qū)中輸入該按鈕的OnClick事件代碼：close; / 關閉窗體 （4）運行程序 按F9，在用戶名中輸入“guest”，在口令中輸入正確的口令“12345”，見圖(a)，單擊“確定”按鈕，顯示“welcome”窗體，見圖（b），若輸入錯誤的用戶名或口令，運行結(jié)果如圖（c）所示。 (a) (b) (c) 圖圖 運行結(jié)果運行結(jié)

13、果v3 3、掩碼編輯框、掩碼編輯框MaskEditMaskEditMaskEditMaskEdit控件是一種格式化的編輯框，它控件是一種格式化的編輯框，它的主要作用為以一定的格式規(guī)范用戶所輸?shù)闹饕饔脼橐砸欢ǖ母袷揭?guī)范用戶所輸入的數(shù)據(jù)。如郵政編碼、固定格式的電話入的數(shù)據(jù)。如郵政編碼、固定格式的電話號碼、身份證號碼等。掩碼編輯框隸屬于號碼、身份證號碼等。掩碼編輯框隸屬于類類TmaskEditTmaskEdit，TmaskEditTmaskEdit繼承了繼承了 TeditTedit的的所有屬性、事件和方法，即與組件所有屬性、事件和方法，即與組件editedit類類似。該組件位于【似。該組件位于【A

14、dditionalAdditional】面板中】面板中 掩碼編輯框掩碼編輯框MaskEditMaskEdit主要屬性主要屬性 A A、EditMaskEditMask為掩碼編輯框的掩碼字符串屬性，為掩碼編輯框的掩碼字符串屬性，主要用于確定輸入數(shù)據(jù)的格式以及風格。主要用于確定輸入數(shù)據(jù)的格式以及風格。取值主要劃分成為三個部分，并且用分號隔開，取值主要劃分成為三個部分，并且用分號隔開，如：如：“！99/99/00;1;_”,99/99/00;1;_”,其中第一部分是掩碼其中第一部分是掩碼字符串的主要部分，它確定了數(shù)據(jù)的格式，第二字符串的主要部分，它確定了數(shù)據(jù)的格式，第二部分為整數(shù)，默認為部分為整數(shù)，

15、默認為1 1表示掩碼中的所有字符將表示掩碼中的所有字符將被保存否則表示掩碼中的非輸入數(shù)據(jù)和標準分隔被保存否則表示掩碼中的非輸入數(shù)據(jù)和標準分隔符不將被保存，第三部分代表了掩碼中將要輸入符不將被保存，第三部分代表了掩碼中將要輸入的末輸入數(shù)據(jù)的字符。的末輸入數(shù)據(jù)的字符。 掩碼輸入的格式定義是使用掩碼輸入的格式定義是使用Input Mask EditorInput Mask Editor對話框來對話框來設置的。設置的。打開打開Input Mask EditorInput Mask Editor對話框的方法有如下兩種：對話框的方法有如下兩種：(1)(1)窗體上選中窗體上選中EditMaskEditMas

16、k控件，在對象編輯器中選擇控件，在對象編輯器中選擇EditMaskEditMask屬性，單擊屬性值旁所對應的按鈕；屬性，單擊屬性值旁所對應的按鈕；(2)(2)右擊右擊EditMaskEditMask控件，在彈出菜單中執(zhí)行控件，在彈出菜單中執(zhí)行Input Mask Input Mask EditorEditor命令，打開命令，打開Input Mask EditorInput Mask Editor對話框。對話框。使用時可以選擇一個使用時可以選擇一個DelphiDelphi所提供的樣本掩碼，也可以自所提供的樣本掩碼，也可以自己設定特殊的掩碼字符串。己設定特殊的掩碼字符串。B B、edittexte

17、dittext屬性：返回掩碼框中的文本內(nèi)容，該屬性只屬性：返回掩碼框中的文本內(nèi)容，該屬性只能在代碼中使用。能在代碼中使用。C C、ismaskedismasked：用于測試掩碼框中是否設置了掩碼，該屬：用于測試掩碼框中是否設置了掩碼，該屬性只能在代碼中使用。性只能在代碼中使用。 Editmask屬性中特殊字符的意義例：使用maskedit編輯單行文本步驟（1）新建應用程序，在窗體上添加5個label組件、4個maskedit組件、1個edit組件（2）在form的oncreate事件寫代碼，為4個maskedit設置格式和顯示文本。代碼如下：v多行文本編輯框多行文本編輯框MemoMemo 當需

18、要處理備注類型的多行文本時可當需要處理備注類型的多行文本時可以選用以選用MemoMemo控件，但控件，但MemoMemo控件只能顯控件只能顯示單一的一種字體格式，如果想使文示單一的一種字體格式，如果想使文本的字體多樣化，可以選擇本的字體多樣化，可以選擇RichEditRichEdit控件?？丶emoMemo控件隸屬于控件隸屬于StandardStandard控件頁中。控件頁中。 多行文本編輯框多行文本編輯框Memo Memo 主要屬性主要屬性 （1）Lines屬性：Lines是用于處理Memo對象中文本內(nèi)容的屬性，類型為Tstrings，即字符串數(shù)組類型Lines作為一種對象又有其自身的方

19、法Add方法、Delete方法、Insert方法、Move方法：如memo1.lines.add(A New line.)表示在最后增加一行。Memo組件的常用方法 Add方法：該方法用來向字符串列表的尾部添加一個字符串。其語法格式如下：memo1.lines.add(aaaa); Append方法：在最后添加一行文本，如emo1.lines.append(aaaa);與add不同的是append是過程，而add是函數(shù)。 Delete方法：該方法用來從字符串列表中刪除一個指定的字符串。其語法格式如下：memo1.lines.delete(0);/刪除行0文本 Insert方法：該方法用來向字符

20、串列表中插入一個字符串。其語法格式如下：memo1.lines.insert(2,ccc); Move方法:用于將一行文本從一個位置移動另一個位置。其語法格式如下： memo1.lines.move(3,1)/ 將行3文本移到行1位置. LoadFromFile方法：該方法的作用是用指定的文件填充字符串列表。 SaveToFile方法：該方法用來把字符串列表中的數(shù)據(jù)寫到某文件中去。（2）ScrollBars屬性 ScrollBars屬性用于控制滾動條的狀態(tài)，取值分別為：取值取值說明說明ssNone無滾動條ssHorizontal僅有水平滾動條ssVerticall僅有垂直滾動條ssBoth同時

21、具有水平垂直滾動條（3）WantTabs屬性該屬性插入一個Tab字符，如果將WantTabs屬性設置為True時，按下Tab鍵，插入一個Tab字符，否則按Tab鍵將改變窗體上獲得焦點的組件。（4）wordwarp屬性該屬性決定memo組件是否具有自動換行的功能，默認值為ture表示當輸入滿一行后有自動換行的功能。（5）wantreturns屬性該屬性設置memo組件是否插入一個回車符，值為ture時按enter鍵插入一個回車符，否則按回車鍵事件由窗體處理，如果想輸入回車符則需按下ctrl+enter組合鍵。v多行文本編輯框多行文本編輯框Memo Memo 使用使用例：對例：對MemoMemo控

22、件中的文本進行編輯，其中包控件中的文本進行編輯，其中包括：剪切、復制、粘貼、刪除操作。括：剪切、復制、粘貼、刪除操作。 （1 1）創(chuàng)建應用程序界面，在窗體設計器中添加）創(chuàng)建應用程序界面，在窗體設計器中添加一個一個MemoMemo控件，四個控件，四個ButtonButton控件，并且分別將控件，并且分別將四個按鈕控件的四個按鈕控件的CaptionCaption屬性設置為屬性設置為“剪切剪切”、“復制復制”、“粘貼粘貼”和和“刪除刪除”，將，將Memo1Memo1控控件的件的LinesLines屬性設置為所需要的文字，屬性設置為所需要的文字， n（2 2）分別為四個按鈕的單擊事件編寫代）分別為四個

23、按鈕的單擊事件編寫代碼：碼：“剪切剪切”按鈕的單擊事件為：按鈕的單擊事件為：procedure TForm1.Button1Click(Sender: procedure TForm1.Button1Click(Sender: TObject);TObject);beginbeginMemo1.CutToClipboard;Memo1.CutToClipboard;end;end;“復制復制”按鈕的單擊事件為：按鈕的單擊事件為：procedure procedure TForm1.Button2Click(Sender: TForm1.Button2Click(Sender: TObject)

24、;TObject);beginbegin Memo1.CopyToClipboard; Memo1.CopyToClipboard;end;end;“粘貼粘貼”按鈕的單擊事件為：按鈕的單擊事件為：procedure TForm1.Button3Click(Sender: procedure TForm1.Button3Click(Sender: TObject);TObject);beginbegin Memo1.PasteFromClipboard; Memo1.PasteFromClipboard;end;end;“刪除刪除”按鈕的單擊事件為：按鈕的單擊事件為：procedure proc

25、edure TForm1.Button4Click(Sender: TForm1.Button4Click(Sender: TObject);TObject);beginbegin Memo1.SelText:=; Memo1.SelText:=;end;end;v豐富文本編輯框豐富文本編輯框RichEditRichEdit（ 該控件在Win32組件面板中）1常用屬性（1）SelStart以及SelLenght屬性：分別表示被選中文字的起始位置和長度。（2）DefAttributes和SelAttributes屬性：分別為默認字體的樣式和被選中文字字體的樣式。（3）Paragraph屬性：光標

26、以及被選中的文字所在位置的段落屬性。 n2豐富文本編輯框RichEdit的使用RichEdit控件與Memo控件類似，不同之處在于RichEdit可以對所輸入的文字單獨進行字體的設置，類似于Microsoft Office中的Word。 例：對例：對RichEditRichEdit控件中輸入的文字進行字控件中輸入的文字進行字體的設置體的設置 （1）創(chuàng)建應用程序界面，在窗體設計器中添加一個RichEdit控件，以及六個按鈕控件，將三個按鈕控件的標題（Caption）屬性分別設為“紅”、“黃”、“藍”、“隸書”、“宋體”以及“幼圓”，將RichEdit控件的Lines屬性設為空，F(xiàn)ont屬性中的s

27、ize（即字體大小）設為“24”，“紅”、“黃”、“藍”按鈕用于設置選中文字的顏色，“隸書”、“宋體”以及“幼圓”按鈕設置被選中文字的字體樣式。 n（2 2）編寫按鈕所對應的事件的代碼：）編寫按鈕所對應的事件的代碼： 單獨設置RichEdit控件中所選定的文本的字體時，需要使用到SelAttributes屬性，該屬性表示當前選中文字的屬性，其中Color表示選中文字的顏色，而Name表示選中文字的字體樣式。 三種顏色所對應的按鈕的單擊事件為：procedure TForm1.Button1Click(Sender: TObject); /紅色按鈕begin RichEdit1.SelAttributes.Color := rgb(255,0,0);end; procedure TForm1.Button2Click(Sender: TObject); /綠色按鈕begin RichEdit1.SelAttributes.Color := rgb(0,255,0);end;procedure TForm1.Button3Click(S