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

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

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

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

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

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

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

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

(2)

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

(3)

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

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

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

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

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

4.

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

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

圖Size對話框Alignment對話框

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

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

5.設(shè)置可視組件的Tab順序

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

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

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

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

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

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

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

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

表一

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

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

(3)編寫denglu窗體相應(yīng)的程序代碼。在implementation區(qū)中加入“unit2”單元，表示需引用該單元（unit2單元是welcome窗體所對應(yīng)的單元）。如下所示：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 //用戶名和口令只要有一項(xiàng)不正確，執(zhí)行

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

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

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

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

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

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

（1）Lines屬性：Lines是用于處理Memo對象中文本內(nèi)容的屬性，類型為Tstrings，即字符串?dāng)?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屬性設(shè)置為True時，按下Tab鍵，插入一個Tab字符，否則按Tab鍵將改變窗體上獲得焦點(diǎn)的組件。（4）wordwarp屬性該屬性決定memo組件是否具有自動換行的功能，默認(rèn)值為ture表示當(dāng)輸入滿一行后有自動換行的功能。（5）wantreturns屬性該屬性設(shè)置memo組件是否插入一個回車符，值為ture時按enter鍵插入一個回車符，否則按回車鍵事件由窗體處理，如果想輸入回車符則需按下ctrl+enter組合鍵。多行文本編輯框Memo——使用例：對Memo控件中的文本進(jìn)行編輯，其中包括：剪切、復(fù)制、粘貼、刪除操作。（1）創(chuàng)建應(yīng)用程序界面，在窗體設(shè)計(jì)器中添加一個Memo控件，四個Button控件，并且分別將四個按鈕控件的Caption屬性設(shè)置為“剪切”、“復(fù)制”、“粘貼”和“刪除”，將Memo1控件的Lines屬性設(shè)置為所需要的文字，（2）分別為四個按鈕的單擊事件編寫代碼：“剪切”按鈕的單擊事件為：procedureTForm1.Button1Click(Sender:TObject);beginMemo1.CutToClipboard;end;“復(fù)制”按鈕的單擊事件為：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屬性：分別為默認(rèn)字體的樣式和被選中文字字體的樣式。（3）Paragraph屬性：光標(biāo)以及被選中的文字所在位置的段落屬性。2．豐富文本編輯框RichEdit的使用RichEdit控件與Memo控件類似，不同之處在于RichEdit可以對所輸入的文字單獨(dú)進(jìn)行字體的設(shè)置，類似于MicrosoftOffice中的Word。例：對RichEdit控件中輸入的文字進(jìn)行字體的設(shè)置

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

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

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