1、第五章第五章 菜單設(shè)計(jì)菜單設(shè)計(jì) 本章內(nèi)容：本章內(nèi)容： 菜單的種類菜單的種類 菜單設(shè)計(jì)菜單設(shè)計(jì) 常用工具欄設(shè)計(jì)常用工具欄設(shè)計(jì)5.1 菜單設(shè)計(jì)的一般原則菜單設(shè)計(jì)的一般原則 好的菜單設(shè)計(jì)應(yīng)該具有功能強(qiáng)大、條好的菜單設(shè)計(jì)應(yīng)該具有功能強(qiáng)大、條理清晰、易于使用等特點(diǎn)：理清晰、易于使用等特點(diǎn)： 菜單設(shè)計(jì)的第一個(gè)基本原則是應(yīng)用軟菜單設(shè)計(jì)的第一個(gè)基本原則是應(yīng)用軟件的主控模塊最好不超過件的主控模塊最好不超過9個(gè)個(gè) 菜單設(shè)計(jì)的另一個(gè)基本原則是菜單設(shè)計(jì)的另一個(gè)基本原則是“符合符合習(xí)慣、突出重點(diǎn)、盡量精簡習(xí)慣、突出重點(diǎn)、盡量精簡”。下圖即反映了菜單設(shè)計(jì)的一些基本原下圖即反映了菜單設(shè)計(jì)的一些基本原則：則：隱藏圖隱藏圖標(biāo)標(biāo)

2、分類分類如下圖，如下圖，MS OFFICE2000 主菜單有主菜單有9項(xiàng)，并將不常用的子菜項(xiàng)，并將不常用的子菜單隱藏，增強(qiáng)了菜單的可讀性。單隱藏，增強(qiáng)了菜單的可讀性。5.2 菜單的種類菜單的種類 菜單一般分為三大類：菜單一般分為三大類： 下拉菜單下拉菜單 下拉菜單一種是主菜單下拉菜單一種是主菜單(Mainmenu),一種是彈出菜單一種是彈出菜單(PopMenu). 按鈕菜單按鈕菜單 Delphi可用于設(shè)計(jì)菜單的按鈕組件主可用于設(shè)計(jì)菜單的按鈕組件主要有要有Button ,BitBtn ,SpeedButton三三種種. 多頁標(biāo)簽菜單多頁標(biāo)簽菜單 Delphi可用于設(shè)計(jì)菜單的多頁標(biāo)簽組可用于設(shè)計(jì)菜

3、單的多頁標(biāo)簽組件主要有件主要有TabbedNotebook, Pagecontrol兩種兩種.1. 下拉菜單設(shè)計(jì)下拉菜單設(shè)計(jì) (1) 單擊單擊“File” ”new”“Application”,建立建立新項(xiàng)目新項(xiàng)目 (2) 在新窗體上分別放入在新窗體上分別放入MainMenu和和PopMenu (3) 設(shè)置窗體使用主菜單和彈出菜單，設(shè)置方法是設(shè)置窗體使用主菜單和彈出菜單，設(shè)置方法是:將對象觀察器上窗體的將對象觀察器上窗體的MainMenu和和PopMenu屬屬性值分別設(shè)置為性值分別設(shè)置為MainMenu1和和PopMenu1 主菜單主菜單彈出彈出菜單菜單單擊單擊雙擊雙擊(1)添加菜單項(xiàng)方法：添

4、加菜單項(xiàng)方法： 雙擊菜單組件，或者是在菜單組件的對象觀察器雙擊菜單組件，或者是在菜單組件的對象觀察器中，單擊中，單擊Items屬性輸入框中的對話框按鈕。屬性輸入框中的對話框按鈕。打開菜單設(shè)計(jì)器打開菜單設(shè)計(jì)器(2)添加菜單圖標(biāo)添加菜單圖標(biāo): (1) 通過菜單項(xiàng)的通過菜單項(xiàng)的Bitmap屬性設(shè)置圖標(biāo)屬性設(shè)置圖標(biāo)點(diǎn)擊此處點(diǎn)擊此處加載圖標(biāo)加載圖標(biāo)選擇選擇途徑途徑選擇選擇圖標(biāo)圖標(biāo)確認(rèn)確認(rèn)在這種方式中，首先選擇要設(shè)置圖標(biāo)的菜單項(xiàng)，在其對象觀察器中在這種方式中，首先選擇要設(shè)置圖標(biāo)的菜單項(xiàng)，在其對象觀察器中找到找到Bitmap屬性，單擊屬性，單擊“對話框按鈕，單擊對話框按鈕，單擊load”,在此對話框在此對話

5、框中選擇一幅位圖，點(diǎn)擊中選擇一幅位圖，點(diǎn)擊“翻開翻開”，完成圖標(biāo)的設(shè)置工作，完成圖標(biāo)的設(shè)置工作.加載菜單圖標(biāo)對話框加載菜單圖標(biāo)對話框選擇圖標(biāo)對話框選擇圖標(biāo)對話框（3） 編輯菜單項(xiàng)，菜單的加速鍵和快捷鍵編輯菜單項(xiàng)，菜單的加速鍵和快捷鍵（4菜單對象的命名，設(shè)置菜單項(xiàng)的相應(yīng)事件菜單對象的命名，設(shè)置菜單項(xiàng)的相應(yīng)事件（5建立二級菜單建立二級菜單二級二級菜單菜單方法：選中需要?jiǎng)?chuàng)建二級菜單的菜單項(xiàng)；單擊鼠標(biāo)右鍵，在彈出方法：選中需要?jiǎng)?chuàng)建二級菜單的菜單項(xiàng)；單擊鼠標(biāo)右鍵，在彈出菜單中選擇菜單中選擇“Creates SubMenu ”菜單項(xiàng)，即生成二級菜單。菜單項(xiàng)，即生成二級菜單。 2. 動(dòng)態(tài)菜單設(shè)計(jì)動(dòng)態(tài)菜單設(shè)計(jì)

6、 2.1 創(chuàng)建動(dòng)態(tài)菜單創(chuàng)建動(dòng)態(tài)菜單(1) 定義主菜單對象定義主菜單對象 由于主菜單應(yīng)用于整個(gè)窗體，因此由于主菜單應(yīng)用于整個(gè)窗體，因此應(yīng)在窗體類的應(yīng)在窗體類的Public中定義的它，定義格中定義的它，定義格式如下：主菜單對象名：式如下：主菜單對象名：TMainMenu;例例如：定義一個(gè)名叫如：定義一個(gè)名叫MyMainMenu的主菜單的主菜單對象，格式為：對象，格式為：MyMainMenu：TMainMenu;(2) 實(shí)例化主菜單對象實(shí)例化主菜單對象 實(shí)例化主菜單對象用于為已定義的主實(shí)例化主菜單對象用于為已定義的主菜單對象分配內(nèi)存，方法如下菜單對象分配內(nèi)存，方法如下:菜單對象名菜單對象名:=TMa

7、inMenu.Create(Self)；例如，實(shí)例化例如，實(shí)例化MyMainMenu的主菜單對象，的主菜單對象，格式如下：格式如下：MyMainMenu:=TMainMenu.Create(Self)；注意：實(shí)例化主菜單對象及下面三步；注意：實(shí)例化主菜單對象及下面三步中的程序代碼應(yīng)放在窗體的創(chuàng)建事件中，中的程序代碼應(yīng)放在窗體的創(chuàng)建事件中，即窗體的即窗體的OnCreate事件中。事件中。2.1 創(chuàng)建動(dòng)態(tài)菜單創(chuàng)建動(dòng)態(tài)菜單設(shè)置主菜單項(xiàng)設(shè)置主菜單項(xiàng) 設(shè)置主菜單項(xiàng)其實(shí)是添加菜單項(xiàng)，在添設(shè)置主菜單項(xiàng)其實(shí)是添加菜單項(xiàng)，在添加菜單項(xiàng)前必須首先定義它，然后再將定加菜單項(xiàng)前必須首先定義它，然后再將定義好的菜單項(xiàng)添

8、加到主菜單中。下面先定義好的菜單項(xiàng)添加到主菜單中。下面先定義菜單項(xiàng)，方法為：菜單項(xiàng)名：義菜單項(xiàng)，方法為：菜單項(xiàng)名：TMenuItem。 (4)設(shè)置每個(gè)主菜單的子菜項(xiàng)設(shè)置每個(gè)主菜單的子菜項(xiàng) 動(dòng)態(tài)添加子菜單項(xiàng)的方法與添加主菜單項(xiàng)的動(dòng)態(tài)添加子菜單項(xiàng)的方法與添加主菜單項(xiàng)的方法相似，仍然是先定義子菜單項(xiàng)，再實(shí)方法相似，仍然是先定義子菜單項(xiàng)，再實(shí)例化，然后設(shè)置子菜單名，最后將子菜單例化，然后設(shè)置子菜單名，最后將子菜單項(xiàng)添加到相應(yīng)的主菜單項(xiàng)中項(xiàng)添加到相應(yīng)的主菜單項(xiàng)中2.1 創(chuàng)建動(dòng)態(tài)菜單創(chuàng)建動(dòng)態(tài)菜單(5)設(shè)置菜單項(xiàng)的響應(yīng)事件設(shè)置菜單項(xiàng)的響應(yīng)事件設(shè)置菜單的響應(yīng)事件與是否為主菜單或子菜單設(shè)置菜單的響應(yīng)事件與是否為

9、主菜單或子菜單無關(guān)，菜單項(xiàng)實(shí)例化后就可設(shè)應(yīng)事件，設(shè)無關(guān)，菜單項(xiàng)實(shí)例化后就可設(shè)應(yīng)事件，設(shè)置方法如下：置方法如下： 菜單項(xiàng)名菜單項(xiàng)名.OnClick:=菜單響應(yīng)處理過程菜單響應(yīng)處理過程; (6)動(dòng)態(tài)修改菜單動(dòng)態(tài)修改菜單 動(dòng)態(tài)修改菜單項(xiàng)包括添加、刪除等操作。動(dòng)態(tài)修改菜單項(xiàng)包括添加、刪除等操作。在前面的例子中，我們已經(jīng)使用了菜單項(xiàng)在前面的例子中，我們已經(jīng)使用了菜單項(xiàng)對象的對象的Add過程添加菜單項(xiàng)，其實(shí)菜單項(xiàng)過程添加菜單項(xiàng)，其實(shí)菜單項(xiàng)對象還有對象還有Insert、Delete等方法，使用這等方法，使用這些方法可完成菜單項(xiàng)的動(dòng)態(tài)插入或刪除操些方法可完成菜單項(xiàng)的動(dòng)態(tài)插入或刪除操作。下面簡要說明一下它們的使

10、用方法。作。下面簡要說明一下它們的使用方法。Insert過程過程插入主菜單項(xiàng)插入主菜單項(xiàng)格式：主菜單名格式：主菜單名.Items.Insert(Index: Integer; Item: TMenuItem);上述格式的功能是：在主菜單的第上述格式的功能是：在主菜單的第Index個(gè)菜單項(xiàng)前插個(gè)菜單項(xiàng)前插入一個(gè)由入一個(gè)由Item指定的主菜單項(xiàng)，注意，插入前主菜單必指定的主菜單項(xiàng)，注意，插入前主菜單必須實(shí)例化并至少有須實(shí)例化并至少有Index+1個(gè)主菜單項(xiàng)，同時(shí)個(gè)主菜單項(xiàng)，同時(shí)Item菜單菜單項(xiàng)也要實(shí)例化。項(xiàng)也要實(shí)例化。插入子菜單項(xiàng)插入子菜單項(xiàng)主菜單名主菜單名.ItemsMIndex.Insert

11、(SIndex: Integer; SItem: TMenuItem);此格式的功能是：在第此格式的功能是：在第MIndex個(gè)主菜單項(xiàng)的第個(gè)主菜單項(xiàng)的第Sindex個(gè)子菜單項(xiàng)前插入一個(gè)由個(gè)子菜單項(xiàng)前插入一個(gè)由SItem指定的子菜單項(xiàng)。注意，指定的子菜單項(xiàng)。注意，插入前，要插入的菜單項(xiàng)、主菜單和相應(yīng)的子菜單都要插入前，要插入的菜單項(xiàng)、主菜單和相應(yīng)的子菜單都要實(shí)例化。請讀者根據(jù)上面的例子改寫一個(gè)動(dòng)態(tài)插入菜單實(shí)例化。請讀者根據(jù)上面的例子改寫一個(gè)動(dòng)態(tài)插入菜單的例子。的例子。Click過程過程模擬鼠標(biāo)單擊某個(gè)菜單項(xiàng)，從而產(chǎn)生模擬鼠標(biāo)單擊某個(gè)菜單項(xiàng)，從而產(chǎn)生OnClick事件，使事件，使用格式為：菜單項(xiàng)對

12、象名用格式為：菜單項(xiàng)對象名.Click。 Delete過程過程 從菜單組件中刪除由索引號從菜單組件中刪除由索引號index指定的菜單項(xiàng)，指定的菜單項(xiàng)，使用格式為：菜單組件名使用格式為：菜單組件名.Delete (index); Indexof 函數(shù)函數(shù) 返回菜單項(xiàng)中的索引號，索引號從返回菜單項(xiàng)中的索引號，索引號從0開始，如果指開始，如果指定的菜單項(xiàng)沒有出現(xiàn)在菜單中，則返回定的菜單項(xiàng)沒有出現(xiàn)在菜單中，則返回-1，使用格，使用格式為：菜單組件名式為：菜單組件名.Indexof(Item)，其中，其中Item是菜是菜單項(xiàng)對象名。單項(xiàng)對象名。 Remove過程過程 刪除指定的菜單項(xiàng)，與刪除指定的菜單項(xiàng)

13、，與Delete過程不同的是，它使過程不同的是，它使用菜單項(xiàng)對象名作為參數(shù)，使用格式如下：用菜單項(xiàng)對象名作為參數(shù)，使用格式如下： 菜單組件名菜單組件名.Remove(Item）; (7)設(shè)置加速鍵和快捷鍵設(shè)置加速鍵和快捷鍵 (8) 彈出菜單彈出菜單 在激活方式上，主菜單是在顯示窗體時(shí)自動(dòng)激在激活方式上，主菜單是在顯示窗體時(shí)自動(dòng)激活的，彈出菜單則必須是在設(shè)置活的，彈出菜單則必須是在設(shè)置PopupMenu屬性的屬性的組件上通過單擊鼠標(biāo)右鍵來激活。組件上通過單擊鼠標(biāo)右鍵來激活。當(dāng)彈出菜單的當(dāng)彈出菜單的AutoPopup屬性設(shè)置為屬性設(shè)置為False時(shí)，只能通過時(shí)，只能通過調(diào)用彈出菜單的調(diào)用彈出菜單的

14、Popup方法才能激活它，方法才能激活它，Popup方法方法的使用格式如下：的使用格式如下：彈出菜名彈出菜名.Popup(X, Y); (9) 主菜單合并主菜單合并 菜單合并指的是兩個(gè)不同菜單按照一定的規(guī)則菜單合并指的是兩個(gè)不同菜單按照一定的規(guī)則合并成為一個(gè)菜單。按照合并方式不同，菜單合并分合并成為一個(gè)菜單。按照合并方式不同，菜單合并分為同一窗體上主菜單合并和不同窗體上的主菜單合并為同一窗體上主菜單合并和不同窗體上的主菜單合并兩種方式兩種方式 3 按鈕菜單按鈕菜單 Delphi可用于設(shè)計(jì)菜單的按鈕組件主要有可用于設(shè)計(jì)菜單的按鈕組件主要有Button、BitBtn和和SpeedButton三種，

15、其三種，其中，中，Buttton組件可用于設(shè)計(jì)一般應(yīng)用程序組件可用于設(shè)計(jì)一般應(yīng)用程序界面，它沒有圖標(biāo)和平面界面，它沒有圖標(biāo)和平面Flat屬性，屬性，不能修改按鈕標(biāo)題顏色，而不能修改按鈕標(biāo)題顏色，而BitBtn和和SpeedButton組件則不同，它們不僅可設(shè)組件則不同，它們不僅可設(shè)置圖標(biāo)，也可設(shè)置標(biāo)題的顏色。置圖標(biāo)，也可設(shè)置標(biāo)題的顏色。 (1) Button按鈕按鈕使用使用Button按鈕建立的菜單按鈕建立的菜單(2) Bitbtn按鈕按鈕加載加載圖標(biāo)圖標(biāo)確認(rèn)確認(rèn)使用使用BitBtn按鈕建立的菜單過程按鈕建立的菜單過程(3) SpeedButton按鈕按鈕 SpeedButton按鈕與按鈕與B

16、itBtn按鈕很相似，不過，按鈕很相似，不過，SpeedButton按鈕常用于按鈕常用于表示狀態(tài)，其常用屬性與表示狀態(tài)，其常用屬性與BitBtn按鈕很類似。按鈕很類似。 4.多頁標(biāo)簽菜單多頁標(biāo)簽菜單(1). TabbedNotebook組件組件TabbedNotebookTabbedNotebook是為了與早期是為了與早期Win31操作操作系統(tǒng)兼容而保留的，它在系統(tǒng)兼容而保留的，它在win31組件面板組件面板頁上頁上 (2) Page Control 組件組件選擇選擇標(biāo)簽處標(biāo)簽處修改修改標(biāo)簽標(biāo)標(biāo)簽標(biāo)題題調(diào)整標(biāo)簽調(diào)整標(biāo)簽排列順序排列順序右擊標(biāo)簽右擊標(biāo)簽控件菜單控件菜單建新標(biāo)簽建新標(biāo)簽到下一個(gè)到下

17、一個(gè)到上一個(gè)到上一個(gè)刪除標(biāo)簽刪除標(biāo)簽標(biāo)簽頁標(biāo)簽頁設(shè)置區(qū)設(shè)置區(qū)使用使用Pagecontrol控件設(shè)置多頁標(biāo)簽控件設(shè)置多頁標(biāo)簽5.工具欄組件工具欄組件我們在使用微軟我們在使用微軟Office系統(tǒng)軟件時(shí)，經(jīng)常用到系統(tǒng)提供系統(tǒng)軟件時(shí)，經(jīng)常用到系統(tǒng)提供的工具欄，下圖是的工具欄，下圖是Word 2000的一個(gè)工具欄。的一個(gè)工具欄。利用此組件開發(fā)應(yīng)用程序有工具欄需要如下幾個(gè)步驟：利用此組件開發(fā)應(yīng)用程序有工具欄需要如下幾個(gè)步驟： (1)將工具欄上使用的圖標(biāo)保存到將工具欄上使用的圖標(biāo)保存到ImageList組件中組件中. (2)加入加入ToolBar組件到窗體中，并用鼠標(biāo)右擊它，在彈出組件到窗體中，并用鼠標(biāo)右擊它，在彈出菜單中選擇菜單中選擇“New Button菜單項(xiàng)為工具欄添加按鈕菜單項(xiàng)為工具欄添加按鈕. (3)設(shè)置工具欄上的按鈕圖標(biāo)。要使保存到設(shè)置工具欄上的按鈕圖標(biāo)。要使保存到ImageList組件中的圖組件中的圖標(biāo)從按鈕上顯示出來，還要做如下設(shè)置：首先，選中標(biāo)從按鈕上顯示出來，還要做如下設(shè)置：首先，選中ToolBar組組件，在對象觀察器中找到它的件，在對象觀察器中找到它的Images屬性，并