delphi控件和組件學(xué)習(xí)

組件和控件

非可視化組件（Nonvisual

Component）：非可視化組件是指在程序運(yùn)行期間用戶是不可以看到的，是從TComponent但不是從TControl派生出來的子類。

組件的屬性是組件特性的描述，包括組件的外觀特性（如位置、尺寸、外形、字體、可視性）和非可視化的特性。

組件的事件是對組件所做的某個(gè)動(dòng)作或系統(tǒng)的某些行為（如按下鼠標(biāo)、雙擊鼠標(biāo)、窗體裝入等）的反應(yīng)。每個(gè)組件都提供滿足用戶的各類事件處理器，當(dāng)發(fā)生特殊事件時(shí)，應(yīng)用程序?qū)?zhí)行事件處理器中的代碼。

組件的方法是指該類或?qū)ο箢愋蛯?shí)例的函數(shù)或過程，每一類組件都有自己的方法，以實(shí)現(xiàn)各種功能。第1頁/共47頁表3-1組件的常見基本屬性屬性

HeightWidthLeftTopAlignVisibleCaptionColorFontCtl3DShowHintHintEnabledNameTabOrder含義高度寬度組件在容器內(nèi)的x坐標(biāo)組件在容器內(nèi)的y坐標(biāo)組件上的對齊方式，居上、居下、居左、居右、占據(jù)剩余”設(shè)置組件是否顯示，默認(rèn)值為“true顯示類組件的標(biāo)題名稱顯示組件的背景顏色設(shè)置組件顯示文本的字體是否以3D方式顯示組件，默認(rèn)值為“true”是否顯示組件的提示信息，默認(rèn)值為“true”組件的提示信息用戶是否能夠操作機(jī)器內(nèi)部對組件進(jìn)行標(biāo)識的名稱Tab次序第2頁/共47頁表3-2組件的常用事件及觸發(fā)條件事件名onclickondblclickonmousedownonmousemoveonkeydownonkeypressonkeyupOnEnteronexitonstartDragondragdrop觸發(fā)條件當(dāng)鼠標(biāo)單擊時(shí)觸發(fā)本事件當(dāng)鼠標(biāo)雙擊時(shí)觸發(fā)本事件當(dāng)鼠標(biāo)左鍵按下時(shí)觸發(fā)本事件當(dāng)鼠標(biāo)移動(dòng)時(shí)觸發(fā)本事件當(dāng)按下任意鍵（包括組合鍵）時(shí)觸發(fā)本事件當(dāng)按下任意鍵（單字符鍵）時(shí)觸發(fā)本事件當(dāng)松開已按下鍵時(shí)觸發(fā)本事件當(dāng)獲得焦點(diǎn)時(shí)觸發(fā)本事件當(dāng)失去焦點(diǎn)時(shí)觸發(fā)本事件當(dāng)開始拖動(dòng)時(shí)觸發(fā)本事件當(dāng)組件拖動(dòng)操作結(jié)束時(shí)觸發(fā)本事件第3頁/共47頁二、文本控件第4頁/共47頁主要有五種：LabelEditStatic

TextMask

EditMemo1、TLabel組件

TLabel標(biāo)簽組件位于組件面板的Standard選項(xiàng)卡上（如圖），可以顯示一個(gè)只讀的字符串。

通常利用TLabel標(biāo)簽組件在窗體上顯示靜態(tài)文本，如顯示提示信息；也可顯示動(dòng)態(tài)文本，如用TLabel顯示不斷變化的當(dāng)前時(shí)間。第5頁/共47頁TLabel組件的主要屬性和方法第6頁/共47頁TLabel組件常用的屬性見表3

-

1

。A

1

ign屬性：該屬性決定TLabel組件的顯示位置（使其位于窗口的某個(gè)部分）。Alignment屬性：該屬性設(shè)置文字在水平方向的對齊方式。Auto

Size屬性：該屬性決定標(biāo)簽的大小是否和文字保持一致。Layout屬性：該屬性設(shè)置文字在垂直方向的對齊方式。Trans

Parent屬性：該屬性決定標(biāo)簽是否透明顯示，主要在圖形操作時(shí)使用，如果將其設(shè)置為true，則可透過標(biāo)簽看到背景圖。Word

Wrap屬性：該屬性決定當(dāng)Autosize屬性為true時(shí)，文字超長時(shí)的顯示方式。該屬性為true時(shí)，則文字在縱向方向擴(kuò)展，以多行顯示；為false時(shí)，則文字在橫向方向擴(kuò)展，以完全容納文本內(nèi)容。2、TEdit組件第7頁/共47頁TEdit文本框組件位于組件面板的Standard選項(xiàng)卡上，可以顯示、編輯單獨(dú)的一行文本。用途：TEdit組件提供了一個(gè)編輯區(qū)域，用戶可在區(qū)域中輸入單行信息。TEdit不但允許用戶在文本框中輸入數(shù)據(jù)，也可以用來顯示查詢的數(shù)據(jù)及提示信息。TEdit組件的主要屬性和方法第8頁/共47頁AutoSelect屬性：該屬性用來設(shè)置當(dāng)TEdit組件獲得輸入焦點(diǎn)時(shí)，自動(dòng)選中所有的文本。若它的值為true，則當(dāng)

Edit組件獲得輸入焦點(diǎn)時(shí)，自動(dòng)選中所有的文本；若它的值為false，則當(dāng)Edit組件獲得輸入焦點(diǎn)時(shí)，不自動(dòng)選中所有的文本。AutoSize屬性：用于控制是否隨字體的高度來改變編輯框的高度。當(dāng)AutoSize設(shè)置為true時(shí)，編輯框的高度會(huì)自動(dòng)適應(yīng)輸入文字的字體高度。但要注意，該屬性只有當(dāng)

BorderStyle屬性設(shè)置為bsSingle時(shí)才有效。CharCase屬性：該屬性用于強(qiáng)制組件中的文本全部為大寫（或小寫）字母。Enabled屬性：該屬性決定文本框中的內(nèi)容是否可以修改，其默認(rèn)值為true，即文本框中的文本可以修改；當(dāng)它的值為false時(shí)其中的文本不能修改。TEdit組件的主要屬性和方法Hint屬性：該屬性用來設(shè)置所顯示的提示信息。例如通過將該屬性設(shè)置為“請輸入職工姓名”，并將ShowHint屬性設(shè)置為true，則在應(yīng)用程序運(yùn)行時(shí)當(dāng)用戶將鼠標(biāo)移到文本框并停頓片刻后，將顯示引號中的提示信息。IME屬性：IME是輸入法編輯器（Input

MethodEditor）的英文縮寫，通過設(shè)置該屬性可以在輸入焦點(diǎn)定位在Edit組件上時(shí)，自動(dòng)實(shí)現(xiàn)輸入法的切換。設(shè)置ImeMode屬性：如果要設(shè)置為中文輸入法，可以將ImeMode屬性設(shè)置為imChinese.設(shè)置ImeName屬性：可以通過下拉組合框選擇一個(gè)具體的輸入法。PasswordChar屬性：將用戶輸入的所有字符以同一個(gè)字符顯示，其默認(rèn)值是“#0”，表示編輯框直接顯示用戶輸入的字符；如果將其設(shè)置為“*”，則不論用戶輸入什么，編輯框中都只顯示“*”號，一般在鍵入密碼時(shí)可以這樣設(shè)置。第9頁/共47頁TEdit組件的主要屬性和方法Clear方法：該方法刪除文本框中的所有文本。ClearSelection方法：該方法刪除文本框中被選擇的文本。如果文本框中沒有被選擇的文本，則不刪除任何內(nèi)容。CopyToClipboard方法：該方法將文本框中已選擇的

文本拷貝到剪貼板上，并取代原來剪貼板中的所有內(nèi)容。如果用戶未在文本框中選擇任何文本，該方法的執(zhí)行將不刪除原來剪貼板的所有內(nèi)容。CutToClipboard方法：該方法將文本框中已選擇的文本拷貝到剪貼板上，并取代原來剪貼板中的所有內(nèi)容，然后刪除在文本框中被選中的內(nèi)容。PasteFromClipboard方法：該方法將剪貼板上的內(nèi)容拷貝到文本框中，并插入到文本框中光標(biāo)所在的當(dāng)前位置。SelectAll方法：該方法選擇文本框中的所有文本。第10頁/共47頁TEdit組件的主要屬性和方法第11頁/共47頁Edit組件最常用的事件（也是默認(rèn)事件）為onchange，一旦Edit組件中的文本內(nèi)容發(fā)生了改變，就會(huì)觸發(fā)onchange事件?！纠?-1】

設(shè)計(jì)用戶登錄驗(yàn)證的窗體，用來接收用戶輸入的用戶

名和口令，單擊“確定”

按鈕進(jìn)行驗(yàn)證，根據(jù)輸入

是否正確顯示相應(yīng)的提示

信息。第12頁/共47頁3、TMemo組件第13頁/共47頁

TMemo備注框組件位于組件面板的Standard選項(xiàng)卡上，可以顯示、編輯多行文本。1．用途

TMemo組件為用戶提供了一種處理多行文本的方法，還可用來快速閱讀文件中的數(shù)據(jù)。盡管TLabel、TEdit和TMemo組件有許多相似之處，但它們的使用場合卻有所不同。

如果只顯示用戶不能修改的信息，可采用標(biāo)簽；如果用戶只處理單行信息，則使用TEdit組件；如果用戶要處理多行文本，那么只能采用TMemo組件。TMemo組件的主要屬性第14頁/共47頁TMemo組件的很多屬性（如MaxLength、ReadOnly和Text等）和TEdit組件的屬性類似，以下是TMemo組件的特殊屬性。Lines屬性：返回TMemo組件中文本的行數(shù)。ScrollBars屬性：該屬性用來設(shè)置TMemo組件是否有滾動(dòng)條。WantTabs屬性：該屬性用來設(shè)置是否可以使用Tab鍵來進(jìn)行文本編輯。其值設(shè)置為true，這時(shí)可以用Tab鍵來使TMemo組件獲得輸入焦點(diǎn)，但不能用Tab鍵從TMemo組件切換到其他組件，默認(rèn)值為false。方法M

1.lines.delete(0);//刪除第一行M

1.lines.insert(1,’line

inserted’);//第二行后加一行;M

1.lines[1]:=‘

’;//更改第二行內(nèi)容;Edit

1

.

text:

=M

1

.

lines[

1

];M

1.lines.clear;//清除M

1中所有文本第15頁/共47頁4、MaskEdit控件（格式化文本框控第16頁/共47頁在Additio

n件a

l頁）上，其作用類似于Edit。不過Mask

Edit控件可以對用戶輸入的文本進(jìn)行格式限定，用戶只能按指定的格式輸入。如：按照指定格式輸入日期、時(shí)間、電話號碼等格式的文本。常用屬性：Edit

Mask:可設(shè)置輸入格式；Edit

Text:可設(shè)置默認(rèn)值。三、按鈕類控件第17頁/共47頁普通按鈕（

TButton）位圖按鈕（

TBit

Btn）快捷按鈕（

TSpeed

Button）1、TButton組件第18頁/共47頁TButton命令按鈕組件位于組件面板的Standard選項(xiàng)卡上用途：TButton組件是為用戶提供用來選擇執(zhí)行命令的組件，通常稱為命令按鈕。按鈕在Windows程序中應(yīng)用非常廣泛，它可以放在應(yīng)用程序的任何地方，觸發(fā)之后執(zhí)行特定的操作主要屬性Cancel屬性：該屬性決定按鈕是否為Cancel按鈕。當(dāng)設(shè)置為true時(shí)，為Cancel按鈕，即當(dāng)用戶按Esc鍵時(shí)，將執(zhí)行按鈕的onclick事件處理程序。當(dāng)窗體中有多個(gè)

Cancel按鈕時(shí)，則只調(diào)用Tab

Order屬性最小按鈕的

onclick事件。Caption屬性：該屬性用來讓用戶識別組件，輸入屬性值顯示在組件表面。Default屬性：該屬性決定按鈕是否為默認(rèn)按鈕。如果將其設(shè)置為true，則按鈕為默認(rèn)按鈕，此時(shí)當(dāng)用戶按

Enter鍵時(shí)，將執(zhí)行按鈕的onclick事件處理程序。Enabled屬性：該屬性決定按鈕是否對鼠標(biāo)、鍵盤和計(jì)時(shí)器事件做出響應(yīng)。ModalResult屬性：該屬性確定按鈕是否以及如何關(guān)閉其父窗體。Name屬性：該屬性是組件的名稱，與Caption不同，它不顯示在組件表面，而是在應(yīng)用程序代碼中作為組件的名稱。第19頁/共47頁2、TBitBtn組件TBit

Btn位圖按鈕組件位于組件面板的Additional選項(xiàng)卡上，為圖形按鈕組件用途：TBit

Btn組件與其他按鈕一樣，在對話框和窗體中廣泛使用。該組件的作用和TButton組件相同，唯一的區(qū)別是可以在位圖按鈕上同時(shí)顯示文本信息和位圖。主要屬性第20頁/共47頁3、TSpeedButton組件第21頁/共47頁

TSpeedButton組件位于組件面板Additional選項(xiàng)卡上，為加速按鈕組件。

用途：TSpeedButton組件可以同時(shí)顯示圖形和文字，用法與位圖按鈕很相似。在按鈕上顯示圖像時(shí)，它的圖像必須是

Windows的位圖文件（.bmp）。該組件常和TToolBar、TPanel等組件一起使用，用戶使用該組件可快速建立工具欄和工具面板。主要屬性四、單選按鈕和復(fù)選框第22頁/共47頁1．TRadio

Button組件也稱為開關(guān)按鈕。TRadio

Button組件也稱為開關(guān)按鈕。單選按鈕為用戶提供了一組相互排斥的選項(xiàng)按鈕，無論何時(shí)選項(xiàng)組中最多只有一個(gè)選項(xiàng)被選擇。如果在選擇過程中又選擇了另一個(gè)按鈕，則先前被選擇的按鈕會(huì)自動(dòng)變成未選擇。主要屬性：TRadio

Button組件的屬性第23頁/共47頁(1)Checked屬性：該屬性表示單選按鈕是否被選中。如果該屬性為true，則單選按鈕的框中出現(xiàn)一個(gè)圓點(diǎn)并表示選中；默認(rèn)值為false，表示未選中。(2)Enable屬性：該屬性用來控制單選按鈕是否處于激活狀態(tài)。默認(rèn)值為true，即激活狀態(tài)；當(dāng)該屬性為false時(shí)，處于非激活狀態(tài)，此時(shí)組件上顯示的字體為灰色，表示該按鈕不起作用。(3)Visible屬性：該屬性決定該單選按鈕在窗體上是否可視。默認(rèn)值為true，即可視。2、TCheck

Box復(fù)選框組件第24頁/共47頁

位于組件面板的Standard選項(xiàng)卡上，為復(fù)選按鈕組件，可以組成多項(xiàng)選擇。TCheckBox組件稱為復(fù)選框，用戶可通過單擊一個(gè)選項(xiàng)來選擇或取消選擇該選項(xiàng)，在一個(gè)選擇組框中一次可做出多項(xiàng)選擇。主要屬性

(1)Alignment屬性：該屬性用于設(shè)置復(fù)選按鈕上文字的位置。

taRightJustify表示文字顯示在小方框的右邊；taLeftJustify表示文字顯示在小方框的左邊。

(2)AllowGrayed屬性：該屬性的默認(rèn)值為false，這時(shí)復(fù)選框只有兩種狀態(tài)，即“選中”、“未選中”。但當(dāng)該屬性為true，復(fù)選框則有3種狀態(tài)，即“選中”、“未選中”和“部分選中”（灰色）。TCheck

Box復(fù)選框組件第25頁/共47頁

(3)State屬性：該屬性用來設(shè)置或返回復(fù)選框的狀態(tài)，可取以下值：cbChecked：表示復(fù)選框處于啟用狀態(tài)。cbUnchecked：表示復(fù)選框處于未啟用狀態(tài)。cbGrayed：表示復(fù)選框處于啟用且變灰狀態(tài)。

(4)Check屬性：該屬性用來檢測復(fù)選框當(dāng)前處于什么狀態(tài)，為

true表示選中，為false表示未選中。如果復(fù)選框的State屬性為cbGrayed或cbUnchecked，則Check屬性為false。五、TList

Box列表框組件第26頁/共47頁位于組件面板的Standard選項(xiàng)卡上，可以顯示一系列字符串，用戶可以選中其中的一個(gè)或多個(gè)。用途：TList

Box組件用來顯示可滾動(dòng)的項(xiàng)目列表，在項(xiàng)目列表中可以選擇一個(gè)或多個(gè)項(xiàng)目，但不能直接對這些項(xiàng)目進(jìn)行修改。列表框中的項(xiàng)目列表是Items屬性的值，可使用方法對列表框中的項(xiàng)目進(jìn)行增加、刪除和插入操作。主要屬性第27頁/共47頁Columns屬性：該屬性用來設(shè)置列表框中項(xiàng)目的列數(shù)，默認(rèn)值為0，表示列表框以單列顯示。Extended

Select屬性：該屬性設(shè)置是否允許使用Shift鍵和Ctrl鍵對列表框中的項(xiàng)目進(jìn)行連續(xù)選擇。只有當(dāng)該屬性為true時(shí)，組件的Multi

Select屬性才起作用，通過配合

Shift鍵選擇連續(xù)多個(gè)項(xiàng)目，通過配合Ctrl鍵選擇不連續(xù)的多個(gè)項(xiàng)目。如果將該屬性設(shè)置為false，那么Multi

Select屬性即便設(shè)置成true也無意義。Integral

Height屬性：該屬性設(shè)置列表框在窗體上的顯示方式。設(shè)置為true時(shí)，在垂直方向上可完整地看到列表框的項(xiàng)目；設(shè)置為false時(shí)，列表框的高度由Item

Height屬性決定。Item

Height屬性：當(dāng)列表框的Style屬性設(shè)置為lb

Owner

Drag

Fixed時(shí)，列表框中的每一個(gè)項(xiàng)目的高度由Item

Height屬性來決定；當(dāng)Style屬性為其他值時(shí)，

ItemHeight屬性無意義。Item

Index屬性：該屬性返回列表框中的選中項(xiàng)目的索引號，從0開始，依次增1。屬性第28頁/共47頁(6)Items屬性：該屬性用于設(shè)置列表框中顯示的內(nèi)容。當(dāng)按下Items屬性右邊的“…”

按鈕時(shí)，將彈出Srting

List

Editor窗口，用戶可在該編輯窗口中輸入將要在列表框中顯示項(xiàng)目的默認(rèn)值。用戶也可在程序執(zhí)行過程中通過調(diào)用方法動(dòng)態(tài)地向列表框中增加項(xiàng)目，如在窗體中有一個(gè)列表框組件List

Box

1，則可通過代碼改變列表框的內(nèi)容，其方法如下：l向列表框中增加項(xiàng)目：List

Box

1.Items.Add("增加的新項(xiàng)目")l刪除當(dāng)前選中的項(xiàng)目：List

Box

1

.

Items.

Delete

(

List

Box

1

.

Item

Index)l

清除所有項(xiàng)目：List

Box

1

.

ClearMulti

Select屬性：該屬性用來設(shè)置用戶是否可從列表框中一次選中多項(xiàng)。其值為

true時(shí)，用戶可選擇多項(xiàng)。Sel

Count屬性：當(dāng)Multi

Select屬性設(shè)置為true時(shí)，該屬性返回在列表框中用戶選擇項(xiàng)目的個(gè)數(shù)。屬性Selected屬性：該屬性用來檢測在列表框中某一項(xiàng)目是否被選擇，該屬性為true，表示指定的項(xiàng)目被用戶選中。Sorted屬性：該屬性用來控制列表框中的數(shù)據(jù)是否自動(dòng)進(jìn)行排序。如果將其設(shè)置為true，那么列表框的數(shù)據(jù)按字母順序進(jìn)行排序；默認(rèn)值為

false，即不對數(shù)據(jù)進(jìn)行排序。Style屬性：該屬性用來設(shè)置列表框中項(xiàng)目的顯示方式。常取以下值：

l

lbOwnerDrawFixed:列表框中的每個(gè)項(xiàng)目可以是字符，也可以是圖像，其高度由ItemHeigh屬性決定。l

lbOwnerDrawVariable：列表框中的每個(gè)項(xiàng)目可以是字符或圖像，其高度可變。l

lbStandard：默認(rèn)值，即列表框中的每個(gè)項(xiàng)目作為一個(gè)高度相同的字符串顯示。第29頁/共47頁例第30頁/共47頁【例3-3】在窗體中新添加一個(gè)標(biāo)簽和一個(gè)列表框，用來輸入籍貫，要求使用動(dòng)態(tài)方法向列表框中增加內(nèi)容。添加如下代碼：procedure

TInput

Form.

Form

Create(

Sender:

Tobject);//使用Add方法向列表框增加項(xiàng)目begin//輸入如下7行代碼

List

Box

1.Items.Add("山西");List

Box

1.Items.Add("北京");List

Box

1.Items.Add("河北");List

Box

1.Items.Add("河南");List

Box

1.Items.Add("湖南");List

Box

1.Items.Add("內(nèi)蒙古");List

Box

1.Items.Add(‘福建’);end;六、組合框-----TComboBox組件TComboBox組合框組件位于組件面板的Standard選項(xiàng)卡上組合框由一個(gè)編輯框和一個(gè)下拉式列表框組成，可以從多個(gè)列表?xiàng)l目中選擇一個(gè)。1．用途TComboBox組件是設(shè)計(jì)Windows應(yīng)用程序時(shí)使用較多的組件之一。該組件匯集了列表框和文本框的功能，其作用是供用戶從下拉列表中選擇數(shù)據(jù)或直接向組合框中輸入數(shù)據(jù)。組合框下拉列表的內(nèi)容是該組件的Items屬性值，Items屬性是串類型。2．主要屬性(1)DropDownCount屬性：該屬性用來設(shè)置組合框下

拉列表中可顯示的文本行數(shù)。默認(rèn)值為8，即下拉列表在不需要滾動(dòng)的情況下可以顯示8個(gè)項(xiàng)目（8行文本）。第31頁/共47頁主要屬性第32頁/共47頁Enabled屬性：該屬性用來設(shè)置是否使組合框處于激活狀態(tài)。如果將其設(shè)置為false，則組合框處于非激活狀態(tài)，程序運(yùn)行時(shí)組合框區(qū)域呈灰色顯示。Style屬性：該屬性用來設(shè)置組合框中項(xiàng)目的顯示方式?？扇∫韵轮担?/p>

Cs

Drop

Down：為默認(rèn)值，是由編輯框和列表框組合而成的組合框，列表框中的每一個(gè)項(xiàng)目都是高度相同的字符串。

Cs

Drop

Down

List：只有列表框而沒有編輯框，每一個(gè)項(xiàng)目都是高度相同的字符串。

Cs

Owner

Draw

Fixed：和List

Box組件的

lb

Owner

Draw

Fixed方式相同。

Cs

Owner

Draw

Variable：和List

Box組件的

lb

Owner

Draw

Variable方式相同。Cs

Simple：只有編輯框而沒有列表框。Text屬性：該屬性用來設(shè)置或返回編輯框上顯示出來的文字內(nèi)容，也可在程序中給該屬性賦值。該屬性的賦值語句為：<組合框名>.Text:=<組合框名>.Item[索引號];ItemIndex屬性：該屬性返回ComboBox中被選中項(xiàng)目的索引號，從0開始，依次加1。SetText屬性：該屬性返回ComboBox中被選中的文本。

另外，用戶可通過Add、Delete和Insert方法對列表中的項(xiàng)目（Item）進(jìn)行增加、刪除和插入操作。第33頁/共47頁第34頁/共47頁case

radiogroup

1

.

Item

Index

of0:m

1.text:="您的職業(yè)是學(xué)生";1:m

1.text:="您的職業(yè)是工人";2:m

1.text:="您的職業(yè)是教師";3:m

1.text:="您的職業(yè)是農(nóng)民";end;第35頁/共47頁參考:M

1.lines.delete(0);//刪除第一行M

1.lines.insert(1,’line

inserted’);//第二行后加一行;M

1.lines[1]:=‘

’;//更改第二行內(nèi)容;Edit

1

.

text:

=M

1

.

lines[

1

];M

1.lines.clear;//清除M

1中所有文本第36頁/共47頁ifc1.Checked

thenm1.lines.Add("您愛好足球.");ifc2.Checked

thenm1.lines.add("您愛好籃球.");ifc3.Checked

thenm1.lines.add("您愛好網(wǎng)球.");ifc4.Checked

thenm1.lines.add("您愛好乒乓球.");ifc5.Checked

thenm1.lines.add("您愛好羽毛球.");第37頁/共47頁第38頁/共47頁TBitBtn組件的主要屬性第39頁/共47頁Glyph屬性：該屬性指定在用戶選擇的位圖按鈕表面設(shè)置圖形。單擊該屬性右邊的

“…”按鈕，彈出裝入位圖文件的Picture

Editor對話框（如圖4-6

），在其中單擊

Load按鈕選擇用戶需要的位圖，此時(shí)選擇的位圖將顯示在對話框中，再單擊OK按鈕后，位圖將顯示在按鈕上。Kind屬性：該屬性決定位圖按鈕的種類，包括bk

Abort、bk

All、bk

Cancel、bkClose、bk

Custom、bk

Help、bk

Ignore、bk

No、bk

OK、bk

Retry、bk

Retry。Layout屬性：該屬性決定位圖在按鈕上的顯示位置，即位圖可以顯示在按鈕的左邊、右邊、上邊或下邊。Margin屬性：該屬性確定位圖按鈕邊沿和位圖邊沿之間的距離，單位為像素。該屬性的默認(rèn)值為-1，表示位圖和文字都在按鈕的中間顯示，但相互不重疊。Num

Glyphs屬性：當(dāng)用戶為位圖按鈕在Glyph屬性中指定多個(gè)圖像時(shí)，必須用該屬性指定按鈕要顯示的圖像，它的值可以是1

～4之一，默認(rèn)值為1。TBitBtn組件的主要屬性第40頁/共47頁Spacing屬性：該屬性確定位圖按鈕上圖像和標(biāo)題之間的間隔。該屬性值可以是負(fù)數(shù)、0和正數(shù)，默認(rèn)值為4。Style屬性：該屬性決定位圖按鈕的外觀，共有3種可能的值：

bsAutoDetect、bsWin31和bsNew，即位圖按鈕采用Windows哪一種版本的風(fēng)格。l

bsAutoDetect：表示當(dāng)使用Windows

3.x時(shí)，位圖按鈕采用標(biāo)準(zhǔn)的

Windows

3.x外觀，當(dāng)使用Windows

3.x以后的版本時(shí)，位圖按鈕采用較新的外觀。l

bsWin31：表示不考慮所運(yùn)行的Windows版本而采用標(biāo)準(zhǔn)的Windows3.1外觀。l

bsNew：表示不考慮所運(yùn)行的Windows版本而采用新的位圖按鈕外觀。返回TSpeedButton組件的主要屬性第41頁/共47頁Allow

All

Up屬性：該屬性決定組中的快速按鈕是否可一個(gè)都不選擇。如果將其設(shè)置為true，那么在同一組中的快速按鈕可一個(gè)都不選擇，但可以出現(xiàn)；如果將其設(shè)置為

false，則必須選擇同一組中的快速按鈕之一，即處于被按下狀態(tài)，默認(rèn)值為false。Down屬性：該屬性用來設(shè)置顯示狀態(tài)。如果將其設(shè)置為true，那么快速按鈕以按下狀態(tài)（Down）顯示；如果將其設(shè)置為false，則快速按鈕以未選中（Un

Select）狀態(tài)顯示。Flat屬性：該屬性值為true，則按鈕在未選中狀態(tài)下沒有邊框，只有在選中狀態(tài)下才有邊框。Group

Index屬性：該屬性決定哪些快速按鈕作為一組。默認(rèn)時(shí)，它的值為0，表示該組件不屬于某個(gè)組。具有相同Group

Index屬性值且不為0的快速按鈕屬于同一個(gè)組，當(dāng)單擊其中之一時(shí)，該按鈕一直保持按下（Down）狀態(tài)，直到單擊了同一組的另一個(gè)按鈕為止?！纠?-1】第42頁/共47頁創(chuàng)建“人事管理”文件夾，用來保存該應(yīng)用程序代碼。創(chuàng)建一個(gè)工程RsglPrj.dpr，登錄窗體設(shè)計(jì)界面如圖

4-2所示，包含六個(gè)組件，即兩個(gè)Label組件用于顯示提示信息；兩個(gè)TEdit組件（UseName用于輸入用戶名，PassWord用于輸入用戶口令）；二個(gè)TButton組件。組件的屬性設(shè)置。編寫login窗體相應(yīng)的程序代碼。按F9鍵運(yùn)行程序。在用戶名中輸入“yonghu”，在

口令中輸入正確的口令“12345”，單擊“確定”按鈕，即可運(yùn)行。保存程序。選擇File→Save

All選項(xiàng)，出現(xiàn)一個(gè)SaveAs對話框，用戶選擇保存位置為“人事管理”文件夾，使用DengLuUnit.pas對單元文件進(jìn)行命名，使用

RsglPrj.dpr對工程文件進(jìn)行命名。返回?第43頁/共47頁?

掩碼編輯框（MaskEdit）是一種特殊的編輯框。使用它可以設(shè)計(jì)出許多復(fù)雜的輸入格式。在選用MaskEdit之后，需要為它設(shè)計(jì)一個(gè)輸入格式。方法如下：首先在窗體上將MaskEdit選中，在對象查看器（ObjectInspector）中找到EditMask屬性，雙擊它，彈出一個(gè)如下圖所示的對話框。對話框左上角的Input

Mask編輯框用于輸入掩碼格式。掩碼格式可以分為三部分，每個(gè)部分之間用分號“；”分開，如

“!90:90:90:;1;_”。下面解釋各輸入格式符的意義：?

1.

輸