【正文】 窗體和組件的關(guān)系非常密切。l 窗體組件對(duì)應(yīng)TWinControl 子類，是基于系統(tǒng)窗體的可視組件，具有窗體句柄，可作為輸入焦點(diǎn)或含有其它組件，例如TEdit組件、TPanel組件。這些不可視組件集中地實(shí)現(xiàn)了一些特殊的功能。在Delphi中，這些窗體和對(duì)話框就是程序設(shè)計(jì)階段的窗體，Delphi的可視化設(shè)計(jì)工作就是在窗體中進(jìn)行的。為了簡(jiǎn)化編程工作，Delphi 提供了許多功能強(qiáng)大的函數(shù)和類。 掌握焦點(diǎn)的含義，與焦點(diǎn)相關(guān)的屬性，應(yīng)用焦點(diǎn)設(shè)計(jì)程序的方法。掌握ShowMessage、ShowMessageFmt、MassageDlg、MassageDlgPos、InputBox、InputQuery對(duì)話框函數(shù)與對(duì)話框過程的特點(diǎn)，并能熟練應(yīng)用。熟悉公共對(duì)話框控件組件的屬性，方法、事件及應(yīng)用。了解CreateMessageDialog函數(shù)的定義與用法、speedbutton和文件有關(guān)的控件的屬性、方法與事件。其中很重要的一部分就是組件類。通常，窗體中會(huì)有文字輸入、滾動(dòng)條、復(fù)選框、單選框、按鈕等一系列組件，通過這些直觀易懂的組件，可以方便的實(shí)現(xiàn)多種多樣的功能。比如，時(shí)鐘控制等功能。l 圖形組件對(duì)應(yīng)TGraphicControl 子類，沒有窗體句柄，不可作為輸入焦點(diǎn)，也不能含有其它組件，例如Label 組件。窗體就像一個(gè)容器，其中包容了可視組件和非可視組件。有些組件也具有窗體的“容器”屬性，也就是在這些組件中可以放置其它組件，通常這些組件稱為容器組件。所有的這些類都是由一個(gè)基類派生出來的，也就是TObject 類。根據(jù)不同的窗體類型，Windows環(huán)境中的應(yīng)用程序可以分為下面的三類：l 單文檔界面(SDI)應(yīng)用程序：這種應(yīng)用程序同時(shí)只能打開一個(gè)文檔。l 對(duì)話框應(yīng)用程序：這種應(yīng)用程序的主界面基于一個(gè)對(duì)話框類型的窗體。 窗體的屬性窗體的屬性是與其外觀密切相關(guān)的。l Heigth屬性和Width屬性分別指定窗體的高度和窗體的寬度 l 窗體的左上角相對(duì)于父容器（屏幕）的坐標(biāo)：Top屬性和Left屬性 l Align屬性用來設(shè)定窗體相對(duì)與父容器（屏幕）的對(duì)齊方式，該屬性為枚舉類型，取值如下取值含義alBotton窗體位于屏幕的下方，寬度為整個(gè)屏幕寬（Width屬性失效），高度為Heigth屬性值alClient窗體占據(jù)屏幕的中部，Width與Height屬性失效alLeft窗體位于屏幕的左方，寬度為Width屬性值，高度為整個(gè)屏幕（Heigth屬性失效）alNoneWidth與Height屬性有效，以及其他屬性有效alRight窗體位于屏幕的右方，寬度為Width屬性值，高度為整個(gè)屏幕（Heigth屬性失效）alTop窗體位于屏幕的上方，寬度為整個(gè)屏幕寬（Width屬性失效），高度為Heigth屬性值l Position屬性：在應(yīng)用程序運(yùn)行階段，確定窗口在屏幕上的位置。2. 窗體的名稱與標(biāo)題Caption屬性確定了窗體的標(biāo)題，當(dāng)窗體最小化后，Caption屬性值為圖標(biāo)的文本說明。Name屬性是窗體對(duì)象的變量名，當(dāng)工程中有多個(gè)窗體時(shí)，每個(gè)窗體的名稱必須是唯一的，即其名稱不能相同。與窗體的外觀與樣式有關(guān)的屬性有：BorderIcons、BorderStyle、FormStyle、WindowStyle、HorzScrollBar和 VertScrollBar屬性等。bsSizeable邊框可移動(dòng)大小可變的標(biāo)準(zhǔn)窗體bsToolWindow風(fēng)格與bsSingle 相同，只是標(biāo)題欄比較小。注意：窗體屬性BorderIcons的設(shè)置與屬性BorderStyle的設(shè)置可能會(huì)發(fā)生互斥，例如屬性BorderIcons的biMinimize和biMaximize會(huì)與屬性BorderStyle的bsDialog沖突，屬性BorderIcons的biHelp會(huì)與屬性BorderStyle的bsSizeable沖突。一般不要單個(gè)地對(duì)窗體中的組件進(jìn)行Font 屬性的設(shè)置。通過菜單Tools/ Image Editor可運(yùn)行Image Editor 編輯制作圖標(biāo)。這兩個(gè)事件過程的基本語法形式為：procedure (Sender: TObject)。begin :=39。 :=39。 :=39。 :=50。參見表1142．Show和Hide事件Show事件和Hide事件分別在窗體顯示與隱藏時(shí)被觸發(fā)。這兩個(gè)事件過程的基本語法形式為：procedure (Sender: TObject)。 當(dāng)窗體不再激活時(shí)，就會(huì)產(chǎn)生Deactivate事件。該事件過程的基本語法形式為：procedure (Sender: TObject)。非模態(tài)顯示的窗口用Show 方法打開。使用Free方法，既能刪除這個(gè)對(duì)象，還能刪除對(duì)象實(shí)體所占的內(nèi)存空間。主窗體：當(dāng)應(yīng)用程序運(yùn)行時(shí)，首先顯示出來的窗體一般稱之為主窗體。l 打開已有工程文件l 新建窗體l 建立主窗體與該窗體的聯(lián)系。Use unit2l 保存并運(yùn)行。l 修改工程選項(xiàng)。2. 設(shè)計(jì)一個(gè)不能改變大小的窗體。True。窗體組件（FORM）常見屬性屬性說明Active 指示此窗體是否擁有FOCUSActivecontrol 指示窗體中目前擁有FOCUS的組件Activemdichild 指示主窗體中目前擁有FOCUS的子窗體Activeolecontrol 用于取得或設(shè)定此窗體上的OLE控制，以響應(yīng)FOCUS改變Bordericons 指定哪些ICON顯示在窗體的TITLE BAR上Bordersytle 用以指定窗體BORDER外觀及行為Canvas 提供使用者可在窗體上CLIENT內(nèi)自行顯示的畫板，一般在ONPAINT事件中使用Clienthandle 提供可存取系統(tǒng)內(nèi)部使用的MDI CLIENT WINDOW HANDLEClientheight 窗體客戶區(qū)高度Clientrect 窗體客戶區(qū)所對(duì)應(yīng)的矩形Clientwidth 窗體客戶區(qū)寬度Defaultmonitor 指定此窗體所顯示的預(yù)設(shè)的顯示器，用于多顯示器環(huán)境下Designer 此窗體的設(shè)計(jì)界面，一般不用用戶設(shè)定Droptarget 用以指定窗體是否為目前DRAG AND Drop動(dòng)作的目標(biāo)Floating 用以指示此窗體是否正在停泊在另一個(gè)視窗內(nèi)Formstate 用于指示此窗體所處狀態(tài)Formstyle 用于指示窗體的樣式Helpfile 用于指定HELP文件Icon 指定窗體最小化時(shí)所顯示的ICONKeypreview 指定此窗體是否需在目前的ACTIVE組件之前取得鍵盤輸入Mdichildcount 用于取得子窗體數(shù)目Mdichildren 用于取得子窗體（數(shù)組）Menu 用于指定窗體主菜單Modalresult 當(dāng)窗體作用為MODAL對(duì)話框時(shí)，作為對(duì)話框的效果Monitor 用于指示窗體所顯示的顯示器Oldcreateorder 指定ONCreate和ONDESTROY事件何時(shí)發(fā)生Oleformobject 對(duì)包含在此窗體內(nèi)的OLE對(duì)象指定OLEFORM界面Parent 設(shè)定此窗體的PARENTParentbidimode 指定是否此窗體使用PARENT的BIDIMODEPixelsperinch 表示此窗體設(shè)計(jì)時(shí)系統(tǒng)上字形的比例Position 表示此窗體的大小及位置Printscale 表示此窗體打印的比例Scaled 用于指定窗體的大小是否依據(jù)PIXELSPERINTCH屬性來指定Tilemode 用于指定TILE方法被調(diào)用時(shí)子窗體如何排列Visible 用于設(shè)定此窗體是否被顯示W(wǎng)indowmenu 如果窗體是一個(gè)MDI PARENT窗體，用于指定視窗的菜單Windowstate 用于指定窗體如何顯示于屏幕中窗體組件（FORM）常見事件及說明事件 說明Onpaint 當(dāng)窗體必須重畫時(shí)發(fā)生Onhelp 當(dāng)窗體收到HELP請(qǐng)求時(shí)發(fā)生Ondragdrop 當(dāng)一個(gè)對(duì)象拉進(jìn)此窗體并丟下時(shí)發(fā)生Ondragover 當(dāng)一個(gè)對(duì)象拉進(jìn)此窗體時(shí)發(fā)生Onconstrainedresize 在ONCANRESIZE事件發(fā)生后發(fā)生Oncanresize 當(dāng)企圖改變窗體尺寸時(shí)確認(rèn)是否改變Onresize 當(dāng)窗體尺寸改變時(shí)發(fā)生Onstartdock 當(dāng)對(duì)象開始停泊時(shí)發(fā)生Onenddock 當(dāng)對(duì)象停泊結(jié)束時(shí)發(fā)生Onundock 當(dāng)窗體解除停泊時(shí)發(fā)生Ondockdrop 當(dāng)其它窗體停泊到此組件時(shí)發(fā)生Ondockover 當(dāng)其它窗體向此組件停泊接近時(shí)發(fā)生Ongetsiteinfo 當(dāng)有關(guān)停泊消息傳回此窗體時(shí)發(fā)生Oncreate 當(dāng)窗體創(chuàng)建時(shí)發(fā)生Onclose 當(dāng)窗體即將關(guān)閉時(shí)發(fā)生Onclosequery 在窗體即將關(guān)閉時(shí)確認(rèn)是否真的關(guān)閉窗體Ondestroy 當(dāng)窗體釋放時(shí)發(fā)生Onshow 當(dāng)窗體顯示時(shí)發(fā)生Onhide 當(dāng)窗體隱藏時(shí)發(fā)生Onactivate 當(dāng)窗體獲得FOCUS時(shí)發(fā)生Ondeactivate 當(dāng)窗體失去FOCUS時(shí)發(fā)生 使用焦點(diǎn)焦點(diǎn)focus就是光標(biāo)，當(dāng)對(duì)象具有焦點(diǎn)時(shí)，才能響應(yīng)用戶的操作，焦點(diǎn)就是對(duì)象接受用戶操作（鼠標(biāo)或鍵盤）的能力。l 程序運(yùn)行中：用戶操作時(shí)（1） 鼠標(biāo)單擊對(duì)象（visible enabled都為true）（2） 按Tab鍵或Shift+Tab在當(dāng)前窗體的各對(duì)象之間巡回移動(dòng)焦點(diǎn)（3） 按熱鍵選擇對(duì)象。False跳過該控件。方法是設(shè)置Label部件的FocusControl屬性，在值段中，選用與它關(guān)聯(lián)對(duì)象的對(duì)象名稱。WordWrap 布爾型,用于設(shè)定組件文本寬于組件寬度時(shí)是否自動(dòng)換行Alignment 枚舉型，用來決定標(biāo)簽中顯示的文本的對(duì)齊方式 。Transparent 布爾型，用來確定標(biāo)簽是否為透明的。課堂練習(xí):修改實(shí)驗(yàn)一的登錄窗體，設(shè)計(jì)如圖所示界面,對(duì)齊方式采用上下、左右均采用居中對(duì)齊，且當(dāng)按熱鍵U，P時(shí)編輯框1,2可分別獲得焦點(diǎn)。MaxLength可以設(shè)置輸入文本的長(zhǎng)度限制。這種設(shè)置為操作提供了方便，用戶不必每次先刪除原來的文本；但也可能會(huì)導(dǎo)致誤刪文本。Lines屬性訪問的文本被存儲(chǔ)在一個(gè)TStrings對(duì)象中，按動(dòng)它的省略按鈕，可以通過對(duì)話框向它增加文本，也可以用程序?qū)@一屬性進(jìn)行操作，以達(dá)到修改或增加備注文本的目的。 CharCase 用來控制編輯框中文本的大小寫。 SelStart 運(yùn)行屬性，用來設(shè)置或指示選中文本的第一個(gè)字符的位置，文本框的第一個(gè)字符位置為0。CanUndo 用來指出對(duì)編輯框中顯示內(nèi)容的改變是否能夠撤消。 :=3。SelectAll 該方法用來選中編輯框中的所有文本。CutToClipboard 該方法用來把選中的文本移動(dòng)到剪貼板上，相當(dāng)于剪切操作。OnKeyDown 當(dāng)用戶按下鍵盤上的任何鍵時(shí)都會(huì)觸發(fā)該事件。 3. 新建一個(gè)工程，實(shí)現(xiàn)功能限制：在edit1中只能輸入10個(gè)字母，超過的在edit2中顯示。程序中不得使用任何變量。 6. 按照要求編寫程序：新建一個(gè)工程，在窗體中添加一個(gè)文本框“Edit1”。 Memo控件1． TMemo組件的常用屬性 屬性說明Caretpos ，y表示所在行，從0開始計(jì)數(shù)。WordWrap 用來決定當(dāng)輸入的文本到達(dá)右邊界時(shí)是否插入軟回車，換到下一行輸入。當(dāng)WantTabs為True可使用。TEXT 用于取得組件中文本（字符串）2． TMemo組件的常用方法Add 該方法用來向字符串列表的尾部添加一個(gè)字符串。其語法格式如下：procedure Clear。其語法格式如下：procedure Delete(Index: Integer)。其語法格式如下：procedure Insert(Index: Integer。Move 該方法用來在字符串列表中移動(dòng)字符串的位置。其語法格式如下：procedure LoadFromFile(const FileName: string)。 virtual。//在最后增加一行 (5)。//在第4行插入新行 (2,4)。 主要部分確定數(shù)據(jù)格式，特殊字符及其意義參見p65表313。216。使用它可以設(shè)計(jì)出許多復(fù)雜的輸入格式。掩碼格式可以分為三部分，每個(gè)部分之間用分號(hào)“；”分開，第一部分。_ ”。L該位置必須是一個(gè)字符。9和09表示該位置只可能是一個(gè)數(shù)字，0表示該位置必須有一個(gè)數(shù)字。\表示該格式符之后的那個(gè)掩碼格式符將作為數(shù)據(jù)中的普通字符對(duì)待。!如有!表示數(shù)據(jù)前的空格將不被保存在數(shù)據(jù)中，沒有!則數(shù)據(jù)后的空格不被保存。其中/在顯示時(shí)為‘－’而非/。!\(9999\)999999。因?yàn)槔ㄌ?hào)是特殊字符，所以在前面加“\”。“?！?。該數(shù)據(jù)前兩位為字母且為大寫，第三位為一個(gè)系統(tǒng)分隔符號(hào)，后６位為數(shù)字。第三部分的“_”表示在掩碼編輯框中為空時(shí)，用“_”來表示空位。_　　在掩碼設(shè)計(jì)對(duì)話框的右側(cè)是Sample Masks，這里有系統(tǒng)預(yù)設(shè)的常用的掩碼格式，如電話號(hào)碼（Phone）、日期（Date）等。1。_例如：!0000年09月09日。_ text值：20060301EditText值：2006年03月01日參見p59例4 使用對(duì)話框函數(shù)與對(duì)話框過程 ShowMessage與ShowMessageFmt過程procedure ShowMessage