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

設置組件屬性根據(jù)組件在運行期間是否可見，可以把組件分為兩大類：可視組件和不可視組件。二、組件屬性事件和方法1.組件屬性

對組件屬性的設置有兩種方式：一是在ObjectInspector的Properties選項卡中設置組件的屬性值，例可以通過雙擊Enabled后的True，將Enabled屬性設置為False；二是通過程序語句使組件的屬性值在程序運行時動態(tài)地被改變，如：

edit1.enabled:=True;Label1.Caption:=“計算機系”；還有一種比較特殊的屬性：嵌套屬性，即包含子屬性的屬性。一般嵌套屬性在ObjectInspector窗口中顯示時前面有一個“+”號或“-”號。單擊帶有子屬性的屬性前面的“+”號時，展開子屬性，此時“+”號變成“-”號；單擊已展開其子屬性的屬性前的“-”號，則將子屬性隱藏起來。另外雙擊嵌套屬性，則將其子屬性在展開和隱藏兩種狀態(tài)之間切換。2.組件事件

每個組件都有相應的一組事件，各組件有很多事件是相同的，包括與鼠標、鍵盤、拖曳和焦點相關(guān)的事件等，這些常用事件及其觸發(fā)條件列于下表中。3.組件方法組件方法，實質(zhì)上就是函數(shù)或過程。組件的方法是該類或?qū)ο箢愋蛯嵗暮瘮?shù)或過程。每一類組件都有自己的方法，以實現(xiàn)各種功能。（見下表）組件常見的基本屬性屬性含義Height高度Width寬度Left左上角所處的橫向位置Top左上角所處的縱向位置Align在其父組件上的對齊方式Visible設置組件是否顯示，默認值為“True”Caption顯示類組件常用的標題名稱，主要用于顯示Color組件的背景顏色Fonts設置組件顯示文本的字體Ctl3D是否以3D方式顯示組件，默認值為“True”ShowHint是否顯示組件的提示信息，默認值為“False”Hint組件的提示信息Enabled用戶是否能夠操作Name機器內(nèi)部對組件進行標識的名稱TabOrderTab次序

組件的常用事件及觸發(fā)條件事件名觸發(fā)條件OnClick當鼠標單擊時觸發(fā)本事件OnDblClick當鼠標雙擊時觸發(fā)本事件OnMouseDown當鼠標左鍵按下時觸發(fā)本事件OnMouseMove當鼠標移動時觸發(fā)本事件OnKeyDown當按下任意鍵（包括組合鍵）時觸發(fā)本事件OnKeyPress當按下任意鍵（單個字符鍵）時觸發(fā)本事件OnKeyUp當松開已按下鍵時觸發(fā)本事件OnEnter當獲得焦點時觸發(fā)本事件一、向窗體中添加組件

向窗體中添加組件的方法很多，主要有以下3種：

(1)在組件面板的組件欄中單擊需要添加的組件，然后在窗體中需要添加該組件處單擊鼠標左鍵，即可將組件添加到窗體中。此時添加的組件以缺省的大小出現(xiàn)在窗體中，可根據(jù)需要對組件的大小進行調(diào)整。

(2)

在組件欄中單擊需要添加的組件，然后在窗體中需要添加該組件處拖動鼠標左鍵，松開鼠標左鍵后，組件就以剛才拖動的大小出現(xiàn)在窗體中，接著也可以對組件的大小進行調(diào)整。

(3)

在組件欄中雙擊組件，則被雙擊的組件會自動添加到當前默認的窗口或容器組件中。二、編輯組件對象1.選中窗體組件

有時要對多個組件進行同時編輯，就需要同時選中多個組件。選定多個組件的方法有2種：

(1)按下Shift鍵的同時，利用鼠標左鍵單擊各個組件。

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

刪除窗體中的組件刪除窗體中的組件，有兩種常用方法：方法1：（1）選中要刪除的組件。（2）單擊Delete鍵。方法2：（1）選中要刪除的組件。（2）選擇主菜單中的EditDelete命令。

4.

調(diào)整組件的大小和位置改變組件在窗體中的大小和位置可以采用下面的方法：方法1：鼠標操作選中組件，在組件上按下鼠標左鍵并拖動到目的位置，組件就被移動到該位置。將鼠標移動到某個黑點上，鼠標形狀將變成雙向箭頭，此時可以按下鼠標左鍵進行拖動，即可改變組件的大小。方法2：鍵盤操作利用鍵盤的上(↑)、下(↓)、左(←)、右(→)移動鍵可以在窗體中選擇組件。選中某個組件后，通過Ctrl+↑、Ctrl+↓、Ctrl+←、Ctrl+→可以改變組件的位置，通過Shift+↑、Shift+↓、Shift+←、Shift+→可以改變組件的大小。

方法3：統(tǒng)一操作先選中幾個組件，然后通過主菜單EditSize...命令，將打開Size對話框，如圖所示，在Size對話框中選擇寬度和高度的有關(guān)設置即可。

圖Size對話框Alignment對話框

將多個組件選中后，除了用上述方法改變它們的大小外，還可以同時對它們進行移動和對齊等操作，方法是：選擇主菜單的EditAlign...命令，將彈出如圖所示的Alignment對話框。在Alignment對話框中，可對選中的組件進行水平和垂直兩個方向的對齊操作，其中各選項的含義列于下表中。

Alignment對話框中各選項的含義選項名含義Nochange不變化控件的對齊方式Leftsides選中的各控件靠最左邊的對齊Centers選中的各控件居中對齊Rightsides選中的各控件靠最右邊的對齊Tops Lines選中的各控件靠最上邊的對齊Bottoms選中的各控件靠最下邊的對齊Spaceequally選中的各控件等間距排列Centerinwindow選中的各控件排列在窗體的中心

5.設置可視組件的Tab順序

方法：選擇主菜單的EditTableOrder...命令，將彈出如圖所示的“EditTabOrder”對話框，在其中的“Controlslistedintaborder”框中選中某組件后，點擊右部的上、下箭頭就可改變該組件的TabOrder屬性。圖EditTabOrder對話框一、Label組件（位于standard面板）

標簽組件用于在窗體上顯示文本，多用于顯示提示信息；也可顯示動態(tài)文本，如用label顯示不斷變化的當前時間。Label組件常用屬性的含義見下表。表Label組件的常用屬性

（3）PasswordChar屬性將用戶輸入的所有字符以同一個字符顯示，其默認值是“#0”，表示編輯框直接顯示用戶輸入的字符；如果將其設置為“*”，則不論用戶輸入什么，編輯框中都只顯示“*”號，一般在鍵入密碼時可以這樣設置。（4）Autosize屬性用于控制是否隨字體的高度來改變編輯框的高度。當Autosize設置為True時，編輯框的高度會自動適應輸入文字的字體高度。值得注意的是，該屬性只有當BorderStyle屬性設置為bsSingle（單線邊框，大小不可改變）時才有效。

Edit組件的其他常用屬性見下表。

Edit組件最常用的事件（也是默認事件）為OnChange，一旦Edit組件中的文本內(nèi)容發(fā)生改變，就會觸發(fā)OnChange事件。

Edit組件的其他常用屬性屬性名含義CharCase強制組件中的文本全部為大寫（或小寫）字母。CharCase屬性可取下列值：ecLowerCase：表示編輯框中所輸入的英文字母全部轉(zhuǎn)換為小寫。ecNormal：表示不進行大小寫轉(zhuǎn)換。ecUpperCase：表示編輯框中所輸入的英文字母全部轉(zhuǎn)換為大寫。MaxLength輸入文字的最大字符數(shù)。其默認值為零，表示不由應用程序來限制每行的字符數(shù)，而是由操作系統(tǒng)來確定的。ReadOnly用戶是否可以修改組件中的內(nèi)容。默認值為False，即可修改組件中的內(nèi)容。SelStart返回編輯框中被選文本的起點位置（從0算起）。此時SelText返回編輯框中所選擇的內(nèi)容。Visible編輯框是否可見。為True，則編輯框可見；為False，則編輯框不可見。

【例】用戶身份驗證程序。本程序接收用戶輸入的用戶名和口令，進行驗證，根據(jù)輸入是否正確顯示相應的提示信息。（1）主窗體denglu界面如圖所示，界面上包含6個組件，2個Label組件用于顯示提示信息、2個Edit組件（txtusername用于輸入用戶名，txtpassword用于輸入用戶口令）和2個Button組件。

（2）組件的屬性設置。denglu窗體和welcome窗體所包含的各組件的主要屬性設置分別如表一和表二所示。

表一

denglu窗體及其包含的組件對象屬性表組件類型組件名屬性名設置值窗體（Form）dengluCaption登錄標簽（Label）Label1Caption用戶名Font的子屬性Size10Label2Caption口令Font的子屬性Size10文本框（Edit）txtusernamePasswordChar（空）txtpasswordPasswordChar*按鈕（Button）BtnOKCaption確定BtnCancelCaption退出表二

welcome窗體及其包含的組件對象屬性表組件類型組件名屬性名設置值窗體（Form）welcomeCaptionForm2標簽（Label）Label1Font的子屬性Size12Font的子屬性Name隸書按鈕（Button）BtnOKCaption確定

(3)編寫denglu窗體相應的程序代碼。在implementation區(qū)中加入“unit2”單元，表示需引用該單元（unit2單元是welcome窗體所對應的單元）。如下所示：usesunit2;●定義兩個unit級符號常量：

constusername='guest'; //定義用戶名

password='12345'; //定義口令●雙擊“確定”按鈕，在代碼編輯區(qū)中輸入該按鈕的OnClick事件代碼：procedureTdenglu.BtnOKClick(Sender:TObject);//判斷所輸入的用戶名和口令是否正確，以決定“welcome”窗體上的顯示內(nèi)容。beginif(txtusername.text=username)and(txtpassword.text=password)thenbegin //用戶名和口令都正確，執(zhí)行

welcome.caption:='歡迎使用';welcome.label1.caption:='歡迎使用教師管理系統(tǒng)';endelse //用戶名和口令只要有一項不正確，執(zhí)行

beginwelcome.caption:='拒絕使用';welcome.label1.caption:='口令錯誤，請重新輸入';end;welcome.ShowModal; //顯示welcome窗體end;●雙擊“退出”按鈕，在編輯區(qū)中輸入該按鈕的OnClick事件代碼：close; //關(guān)閉窗體

（4）運行程序按F9，在用戶名中輸入“guest”，在口令中輸入正確的口令“12345”，見圖(a)，單擊“確定”按鈕，顯示“welcome”窗體，見圖（b），若輸入錯誤的用戶名或口令，運行結(jié)果如圖（c）所示。

(a)(b)(c)圖運行結(jié)果3、掩碼編輯框MaskEditMaskEdit控件是一種格式化的編輯框，它的主要作用為以一定的格式規(guī)范用戶所輸入的數(shù)據(jù)。如郵政編碼、固定格式的電話號碼、身份證號碼等。掩碼編輯框隸屬于類TmaskEdit，TmaskEdit繼承了

Tedit的所有屬性、事件和方法，即與組件edit類似。該組件位于【Additional】面板中掩碼編輯框MaskEdit——主要屬性

A、EditMask為掩碼編輯框的掩碼字符串屬性，主要用于確定輸入數(shù)據(jù)的格式以及風格。取值主要劃分成為三個部分，并且用分號隔開，如：“！99/99/00;1;_”,其中第一部分是掩碼字符串的主要部分，它確定了數(shù)據(jù)的格式，第二部分為整數(shù)，默認為1表示掩碼中的所有字符將被保存否則表示掩碼中的非輸入數(shù)據(jù)和標準分隔符不將被保存，第三部分代表了掩碼中將要輸入的末輸入數(shù)據(jù)的字符。掩碼輸入的格式定義是使用InputMaskEditor對話框來設置的。打開InputMaskEditor對話框的方法有如下兩種：(1)窗體上選中EditMask控件，在對象編輯器中選擇EditMask屬性，單擊屬性值旁所對應的按鈕；(2)右擊EditMask控件，在彈出菜單中執(zhí)行InputMaskEditor…命令，打開InputMaskEditor對話框。使用時可以選擇一個Delphi所提供的樣本掩碼，也可以自己設定特殊的掩碼字符串。B、edittext屬性：返回掩碼框中的文本內(nèi)容，該屬性只能在代碼中使用。C、ismasked：用于測試掩碼框中是否設置了掩碼，該屬性只能在代碼中使用。字符含義！出現(xiàn)時字符串的前導空格不會保留>或<出現(xiàn)時則它后面的所有字符都變?yōu)榇螅ㄐ。?，除非遇?lt;(>)號\\后的字符為一般字符，可用于顯示特殊字符L或I本位置只能有一個字母，A-Z及a-z，I時不一定要輸入A或a本位置只能有一個字母或數(shù)字，A-Z及a-z、0-9，a時不一定要輸入C或c本位置可以有一個字符，c時不一定要輸入0或9本位置只能有一個數(shù)字，9時不一定要輸入#本位置只能有一個數(shù)字或正負號，但不一定要輸入：用來分隔時間中的時、分、秒/用來分隔日期中的年、月、日；用來分隔屏蔽字符串的三部分_自動插入一個空格，輸入時光標會跳過這些字符Editmask屬性中特殊字符的意義例：使用maskedit編輯單行文本步驟（1）新建應用程序，在窗體上添加5個label組件、4個maskedit組件、1個edit組件（2）在form的oncreate事件寫代碼，為4個maskedit設置格式和顯示文本。代碼如下：多行文本編輯框Memo

當需要處理備注類型的多行文本時可以選用Memo控件，但Memo控件只能顯示單一的一種字體格式，如果想使文本的字體多樣化，可以選擇RichEdit控件。Memo控件隸屬于Standard控件頁中。多行文本編輯框Memo——主要屬性

（1）Lines屬性：Lines是用于處理Memo對象中文本內(nèi)容的屬性，類型為Tstrings，即字符串數(shù)組類型Lines作為一種對象又有其自身的方法——Add方法、Delete方法、Insert方法、Move方法：如memo1.lines.add(‘ANewline.’)表示在最后增加一行。Memo組件的常用方法

Add方法：該方法用來向字符串列表的尾部添加一個字符串。其語法格式如下：

memo1.lines.add(‘a(chǎn)aaa’);Append方法：在最后添加一行文本，如emo1.lines.append(‘a(chǎn)aaa’);與add不同的是append是過程，而add是函數(shù)。

Delete方法：該方法用來從字符串列表中刪除一個指定的字符串。其語法格式如下：

memo1.lines.delete(0);//刪除行0文本

Insert方法：該方法用來向字符串列表中插入一個字符串。其語法格式如下：

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同時具有水平垂直滾動條（3）WantTabs屬性該屬性插入一個Tab字符，如果將WantTabs屬性設置為True時，按下Tab鍵，插入一個Tab字符，否則按Tab鍵將改變窗體上獲得焦點的組件。（4）wordwarp屬性該屬性決定memo組件是否具有自動換行的功能，默認值為ture表示當輸入滿一行后有自動換行的功能。（5）wantreturns屬性該屬性設置memo組件是否插入一個回車符，值為ture時按enter鍵插入一個回車符，否則按回車鍵事件由窗體處理，如果想輸入回車符則需按下ctrl+enter組合鍵。多行文本編輯框Memo——使用例：對Memo控件中的文本進行編輯，其中包括：剪切、復制、粘貼、刪除操作。（1）創(chuàng)建應用程序界面，在窗體設計器中添加一個Memo控件，四個Button控件，并且分別將四個按鈕控件的Caption屬性設置為“剪切”、“復制”、“粘貼”和“刪除”，將Memo1控件的Lines屬性設置為所需要的文字，（2）分別為四個按鈕的單擊事件編寫代碼：“剪切”按鈕的單擊事件為：procedureTForm1.Button1Click(Sender:TObject);beginMemo1.CutToClipboard;end;“復制”按鈕的單擊事件為：procedureTForm1.Button2Click(Sender:TObject);beginMemo1.CopyToClipboard;end;“粘貼”按鈕的單擊事件為：procedureTForm1.Button3Click(Sender:TObject);beginMemo1.PasteFromClipboard;end;“刪除”按鈕的單擊事件為：procedureTForm1.Button4Click(Sender:TObject);beginMemo1.SelText:='';end;豐富文本編輯框RichEdit（該控件在Win32組件面板中）1．常用屬性（1）SelStart以及SelLenght屬性：分別表示被選中文字的起始位置和長度。（2）DefAttributes和SelAttributes屬性：分別為默認字體的樣式和被選中文字字體的樣式。（3）Paragraph屬性：光標以及被選中的文字所在位置的段落屬性。2．豐富文本編輯框RichEdit的使用RichEdit控件與Memo控件類似，不同之處在于RichEdit可以對所輸入的文字單獨進行字體的設置，類似于MicrosoftOffice中的Word。例：對RichEdit控件中輸入的文字進行字體的設置

（1）創(chuàng)建應用程序界面，在窗體設計器中添加一個RichEdit控件，以及六個按鈕控件，將三個按鈕控件的標題（Caption）屬性分別設為“紅”、“黃”、“藍”、“隸書”、“宋體”以及“幼圓”，將RichEdit控件的Lines屬性設為空，F(xiàn)ont屬性中的size（即字體大?。┰O為“24”，“紅”、“黃”、“藍”按鈕用于設置選中文字的顏色，“隸書”、“宋體”以及“幼圓”按鈕設置被選中文字的字體樣式。（2）編寫按鈕所對應的事件的代碼：

單獨設置RichEdit控件中所選定的文本的字體時，需要使用到SelAttributes屬性，該屬性表示當前選中文字的屬性，其中Color表示選中文字的顏色，而Name表示選中文字的字體樣式。三種顏色所對應的按鈕的單擊事件為：procedureTForm1.Button1Click(Sender:TObject);//紅色按鈕beginRichEdit1.SelAttributes.Color:=rgb(255,0,0);end;

procedureTForm1.Button2Click(Sender:TObject);//綠色按鈕beginRichEdit1.SelA