华南俳烁实业有限公司

　　如果您已經(jīng)對(duì)對(duì)象有一定的了解，想查閱它的具體方法、域等，可以直接用主題詞進(jìn)行檢索。

　　以上，我們已經(jīng)完成了簡(jiǎn)單的例程。運(yùn)行您的程序，選用各個(gè)按鈕改變圖形的顏色和形狀。如圖1.9所示。雖然它只是一個(gè)“小玩具”，卻直觀地給您一個(gè)用Delphi編程的印象。對(duì)比一下您親手編制的程序量和程序的功能，您就會(huì)理解Delphi為程序員提供了怎樣的方便。

　　1.3 Delphi 2.0的可視化部件用法簡(jiǎn)介

　　本節(jié)中，我們將較為深入地講解Delphi的部件。這是編制大型復(fù)雜應(yīng)用程序的必由之路。下面，我們將對(duì)各種部件分類進(jìn)行簡(jiǎn)單的介紹，以便于您在編程時(shí)能夠較快地了解有哪些部件可能會(huì)滿足您的要求，并對(duì)其重要的方法、屬性等有一個(gè)大致的了解。

　　基本技巧、工具的介紹在本章的第4節(jié)中，交互閱讀這兩部分，多創(chuàng)制幾個(gè)試驗(yàn)程序，有助于您迅速進(jìn)入Delphi世界，盡早將這一精妙軟件用于實(shí)際工作中。

　　1.3.1 常用的文本相關(guān)部件

　　以下的部件以各種格式顯示文本，其中有些是文本和數(shù)據(jù)輸入的途徑。它們是Label(標(biāo)簽)、Edit(文本編輯)、MaskEdit(格式編輯)、Memo(備注)、List Box(列表框)、Combo Box(組合框)。除了MaskEdit在Additional頁(yè)之外，其它的都在Standard頁(yè)中。

　　1.3.1.1 Label部件

　　Label(標(biāo)簽)一般放在對(duì)象的旁邊，用來(lái)標(biāo)記這些對(duì)象，從而對(duì)用戶的操作進(jìn)行提示，也可以用來(lái)顯示其它信息。您可以在標(biāo)簽中設(shè)置熱鍵，也即在Caption屬性值段中輸入含有“&”的字串，當(dāng)用戶使用“Alt+關(guān)鍵字母”時(shí)，將自動(dòng)選中它所指向的對(duì)象。方法是設(shè)置Label部件的FocusControl屬性，在值段中，選用與它關(guān)聯(lián)對(duì)象的對(duì)象名。

　　1.3.1.2 Edit、MaskEdit和Memo部件

　　Edit、MaskEdit、Memo部件都是用作接收、顯示用戶輸入文本的。它們具有一些相同的屬性。ReadOnly在運(yùn)行時(shí)間內(nèi)控制對(duì)象是否可以進(jìn)行Windows的操作，當(dāng)此值為False時(shí)，該框內(nèi)的文本就不能被復(fù)制到剪貼板上。MaxLength可以設(shè)置輸入文本的長(zhǎng)度限制。用PasswordChar屬性可以按照顯示隱蔽密碼的方法顯示用戶輸入文本，例如，它的缺省值為“*”，運(yùn)行時(shí)，您的輸入將用“*”來(lái)顯示，從而提供了一種安全措施。您可能也發(fā)現(xiàn)了，當(dāng)一個(gè)字段被加上高亮度顯示時(shí)，按鍵操作會(huì)將這一字段刪除，替換成當(dāng)前的鍵盤(pán)輸入。這種設(shè)置為操作提供了方便，您不必每次先刪除原來(lái)的文本;但也可能會(huì)導(dǎo)致誤刪文本。將AutoSelect屬性設(shè)置成False，這種替代功能就被取消了。

　　MaskEdit是格式文本輸入對(duì)象。它的EditMask屬性為它提供了過(guò)濾文本的格式。點(diǎn)動(dòng)這一屬性的省略按鈕，會(huì)彈出過(guò)濾編輯對(duì)話框，除了Delphi為您提供的幾種屏蔽格式，您也可以自己編寫(xiě)，查閱“幫助”，會(huì)為您提供更詳細(xì)的用法介紹。

　　Memo是備注框，與以上對(duì)象不同的是，它可以接收多行文本輸入。將ScrollBars設(shè)置成ssVertical，可以為它加上一個(gè)垂直的滾行條。Align屬性調(diào)整該對(duì)象在窗口中的對(duì)齊情況，有alNone(無(wú)對(duì)齊指定)、alBottom(底部對(duì)齊)、alClient(全窗口顯示)等可以選擇;而Alignment屬性則決定了文本在框中的對(duì)齊顯示格式。Lines屬性訪問(wèn)的文本被存儲(chǔ)在一個(gè)TStrings對(duì)象中，按動(dòng)它的省略按鈕，可以通過(guò)對(duì)話框向它增加文本，也可以用程序?qū)�這一屬性進(jìn)行操作，以達(dá)到修改或增加備注文本的目的。

　　1.3.1.3 List Box和Combo Box部件

　　List Box(列表框)和Combo Box(組合框)都顯示列表項(xiàng)目，所不同的是組合框占用較少的空間。常見(jiàn)的Windows操作系統(tǒng)中，顯示可用磁盤(pán)驅(qū)動(dòng)器時(shí)，用的就是組合框。列表框則提供了一個(gè)項(xiàng)目列表以供選擇，如Windows打開(kāi)文件操作時(shí)顯示文件列表的就是List Box。

　　下列程序段將Edit1的文本加入到ListBox1中，并清空Edit1中的文本：

　　procedure TForm1.AddButtonClick(Sender:TObject);

　　begin

　　ListBox1.Items.Add(Edit1.text);

　　Edit1.Text := ‘’;

　　end;

　　常見(jiàn)的組合框初始化用以下的語(yǔ)句可以實(shí)現(xiàn)，它用下拉式列表框的第一項(xiàng)來(lái)初始化組合框的缺省值：

　　procedure TForm1.ComboBox1Text(Sender:TObject);

　　begin

　　if ComboBox1.Text = ‘’then

　　ComboBox1.Text := ComboBox1.Items.String[1] ;

　　end;

　　以上就是文本輸入的基本部件。

　　1.3.2 按鈕和檢查框部件

　　1.3.2.1 Button和BitBtn部件

　　按鈕是Windows常用的部件，前文的例程中我們已經(jīng)基本掌握了Button和BitBtn的主要用法。它們一般用在對(duì)話框中，做為執(zhí)行某種功能的指示。您也可以為它們?cè)O(shè)置內(nèi)置返回功能，將ModelResult屬性加以匹配，可以不用編程，直接實(shí)現(xiàn)系統(tǒng)內(nèi)置的功能，這一點(diǎn)上和Kind屬性頗類似。

　　1.3.2.2 Speed Button部件

　　Speed Button(加速按鈕)部件在Additional頁(yè)上，是進(jìn)行工具條快速設(shè)計(jì)的理想部件。它只有一個(gè)位圖，沒(méi)有標(biāo)題。需要提起讀者注意的是，用多個(gè)Speed Button制作一個(gè)工具條時(shí)，必須先放置一個(gè)窗口類部件，如Panel(操作板)、Group Box(群組框)等。否則試圖將加速按鈕先制作好再移上去，您會(huì)發(fā)現(xiàn)它會(huì)總是處于窗口類部件下面不可見(jiàn)。當(dāng)然，您可以對(duì)加速按鈕進(jìn)行復(fù)制、粘貼到窗口類部件上處理，那就另當(dāng)別論了。