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