《Visual FoxPro數(shù)據(jù)庫程序設(shè)計教程》課件第8章

第8章菜單的設(shè)計與應(yīng)用8.1菜單的概念

8.2用菜單設(shè)計器設(shè)計菜單

8.3快捷菜單設(shè)計

8.4在菜單中添加事件代碼

8.1菜?單?的?概?念

8.1.1菜單的類型

在Windows環(huán)境下，常見的菜單類型有兩種，即下拉式菜單和快捷菜單，如圖8.1和圖8.2所示。這兩類菜單通常都是以一組菜單選項顯示于屏幕供用戶選擇，用戶選擇其中的某個選項時都會有一定的動作。這個動作可以是三種情況之一：執(zhí)行一條命令、執(zhí)行一個過程或激活另一個菜單。圖8.1下拉式菜單示意圖圖8.2快捷菜單示意圖

1.下拉式菜單

下拉式菜單如圖8.1所示，它是VisualFoxPro的系統(tǒng)菜單，由一個稱做主菜單(一級菜單)的條形菜單和一組稱作子菜單的彈出式菜單組成。主菜單包括文件、編輯、顯示、工具、程序、窗口和幫助，當(dāng)單擊某個主菜單后，就會彈出其子菜單。例如單擊“文件”菜單后就彈出子菜單，子菜單包括新建、打開、關(guān)閉、保存等若干項。

主菜單一般位于應(yīng)用程序的頂部，標(biāo)題欄的下方，單擊某個主菜單后會彈出其子菜單。子菜單的每一個菜單選項都可以有選擇地設(shè)置一個熱鍵和快捷鍵。熱鍵通常是一個字符，當(dāng)菜單激活時，可以按菜單項的熱鍵快速選擇該菜單?？旖萱I通常是Ctrl和另一個字符鍵組成的組合鍵。

2.快捷菜單

快捷菜單一般由一個或一組上下級的彈出式菜單組成。當(dāng)用鼠標(biāo)右鍵單擊某個對象時，會彈出一個快捷菜單快速顯示當(dāng)前對象可用的命令功能，如圖8.2所示?？旖莶藛螞]有條形菜單，只有一個彈出式菜單。

8.1.2系統(tǒng)菜單設(shè)置

圖8.1所示的菜單系統(tǒng)就是VisualFoxPro的系統(tǒng)菜單。啟動VisualFoxPro系統(tǒng)后，就顯示文件、編輯、顯示、工具、程序、窗口和幫助等7個主菜單，隨著操作任務(wù)的改變，在系統(tǒng)菜單中會添加與當(dāng)前操作任務(wù)相關(guān)的菜單。例如，打開“菜單設(shè)計器”窗口后，在主菜單欄上就添加“菜單”選項。用戶除了使用VisualFoxPro系統(tǒng)菜單的默認(rèn)顯示外，還可以通過SETSYSMENU命令重新設(shè)置系統(tǒng)菜單。命令格式為

SETSYSMENUON|OFF|AUTOMATIC|TO[<彈出式菜單名表>]|TO[<條形菜單項名表>]|TO[DEFAULT]|SAVE|NOSAVE

其中各子句的含義是：

ON允許程序執(zhí)行時訪問系統(tǒng)菜單，OFF禁止程序執(zhí)行時訪問系統(tǒng)菜單，AUTOMATIC可使系統(tǒng)菜單顯示出來，可以訪問系統(tǒng)菜單。

TO子句用于重新設(shè)置系統(tǒng)菜單。“TO[<彈出式菜單名表>]”以菜單項內(nèi)部名字列出可用菜單的彈出式菜單?！癟O[<條形菜單項名表>]”以條形菜單項內(nèi)部名字列出可用的子菜單。

TO[DEFAULT]將系統(tǒng)菜單恢復(fù)為缺省配置。

SAVE將當(dāng)前系統(tǒng)菜單配置指定為缺省配置。

NOSAVE將缺省設(shè)置恢復(fù)成VisualFoxPro系統(tǒng)的標(biāo)準(zhǔn)配置。要將系統(tǒng)菜單恢復(fù)成標(biāo)準(zhǔn)配置，可先執(zhí)行SETSYSMENUNOSAVE命令，然后執(zhí)行SETSYSMENUTODEFAULT命令。不帶參數(shù)的SETSYSMENUTO命令將屏蔽系統(tǒng)菜單，使系統(tǒng)菜單不可用。

菜單項內(nèi)部名字表示：條形菜單本身的內(nèi)部名字為_MSYSMENU，它可看作是整個菜單系統(tǒng)的名字。每個條形菜單項也有自己的內(nèi)部名字，例如“文件”、“編輯”和“窗口”的內(nèi)部名字分別為_MSM_FILE，_MSM_EDIT，_MSM_WINDOW。8.1.3菜單設(shè)計步驟

菜單系統(tǒng)設(shè)計的好壞直接影響到應(yīng)用程序的使用，設(shè)計一個結(jié)構(gòu)合理的菜單系統(tǒng)，不但使應(yīng)用程序的主要功能得到良好體現(xiàn)，而且還可以使用戶快捷、方便地使用應(yīng)用程序中的各種命令和工具。下面簡要介紹在VisualFoxPro中利用菜單設(shè)計器創(chuàng)建菜單系統(tǒng)的步驟。

(1)啟動菜單設(shè)計器。

(2)進行菜單設(shè)計，使用菜單設(shè)計器定義菜單標(biāo)題、菜單項和子菜單。設(shè)置相應(yīng)的訪問鍵和快捷鍵。

(3)預(yù)覽菜單，在VisualFoxPro的系統(tǒng)菜單欄中顯示設(shè)計的菜單。

(4)保存菜單定義，生成一個擴展名為.mnx的菜單定義文件。

(5)生成菜單程序，生成一個擴展名為.mpr的菜單程序文件，以便在VisualFoxPro應(yīng)用程序中執(zhí)行。

(6)運行生成的菜單程序文件。

當(dāng)然，在設(shè)計菜單系統(tǒng)之前，首先要規(guī)劃菜單系統(tǒng)，確定需要哪些菜單，哪些菜單有子菜單，菜單項出現(xiàn)在界面的什么位置，以及哪些菜單要執(zhí)行相應(yīng)的操作等等。 8.2用菜單設(shè)計器設(shè)計菜單

8.2.1菜單設(shè)計器窗口

1.打開菜單設(shè)計器窗口

打開菜單設(shè)計器窗口的方法有以下幾種。

(1)在項目管理器中選取“其他”標(biāo)簽，選中“菜單”項，按下“新建”按鈕，彈出“新建菜單”選項對話框，如圖8.3所示。選擇“菜單”按鈕，另一個按鈕是用來建立一個快捷菜單的。

(2)在“文件”菜單中選取“新建”，在彈出的“新建文件”對話框中選擇“菜單”，單擊右方的“新建”按鈕。

(3)用命令建立或打開菜單。圖8.3“新建菜單”對話框建立菜單的命令格式為

CREATEMENU<菜單文件名>

打開或新建菜單的命令格式為

MODIFYMENU<菜單文件名>

若<菜單文件名>是新名字，則為建立菜單，否則為打開菜單。

命令中的<菜單文件名>指菜單文件，擴展名為?.mnx，允許缺省。

用上述方法都可以打開菜單設(shè)計器窗口，菜單設(shè)計器窗口如圖8.4所示。圖8.4菜單設(shè)計器窗口

2.菜單設(shè)計器窗口的組成

菜單設(shè)計器窗口用于定義菜單，可以定義條形菜單(菜單欄)，也可以定義彈出式菜單(子菜單)。菜單設(shè)計器窗口的左邊是一個列表框，其中每行可定義一個菜單項，包括菜單名稱、結(jié)果和選項三列內(nèi)容。窗口的右邊有一個組合框和四個按鈕。各選項功能介紹如下：

1)菜單名稱

用于在菜單系統(tǒng)中指定菜單標(biāo)題和菜單項。此外，在每個提示文本框的前面有一個小方塊按鈕。當(dāng)把鼠標(biāo)移到它上面時指針形狀會變成上下雙箭頭樣，用鼠標(biāo)拖動它可上下改變當(dāng)前菜單項在菜單列表中的位置。在這里可以為菜單項定義熱鍵。定義熱鍵的方法是在要作為熱鍵的字符之前加上“\<”兩個字符。可以根據(jù)各菜單項功能的相似性或相近性，將彈出式菜單的菜單項分組。分組方法是在相應(yīng)行的“菜單名稱”列上輸入“\—”兩個字符。

2)結(jié)果

指定在選擇菜單標(biāo)題或菜單項時發(fā)生的動作。單擊該列將出現(xiàn)一個下拉列表框，包括命令、填充名稱、子菜單和過程4個選項。

命令如果當(dāng)前菜單項的功能是執(zhí)行某種動作的話應(yīng)選擇該項，此選項僅對應(yīng)于執(zhí)行一條命令或調(diào)用其他程序的情況。選中這一項后，在其右側(cè)出現(xiàn)一文本框，只需將命令輸入到這個文本框內(nèi)即可。如果所有執(zhí)行的動作需多條命令才能完成，而又無相應(yīng)的程序可用，那么在這里應(yīng)選擇“過程”。填充名稱選中這一項后，在其右側(cè)出現(xiàn)一文本框，可以在文本框中輸入一個名字。這個名字是用戶定義的條形菜單的內(nèi)部名字，目的是為了在程序中引用它。當(dāng)然，如果不選擇此項，系統(tǒng)也會自動設(shè)定菜單內(nèi)部及菜單項序號，只不過系統(tǒng)所取名字往往難以記憶。

子菜單該選項供用戶定義當(dāng)前菜單的子菜單。選擇子菜單后，組合框的右邊會出現(xiàn)一個“創(chuàng)建”按鈕或“編輯”按鈕(建立時顯示“創(chuàng)建”，修改時顯示“編輯”)。單擊“創(chuàng)建”按鈕將進入新的一屏來創(chuàng)建子菜單。

過程用于定義一個與菜單相關(guān)聯(lián)的過程，當(dāng)選擇了該菜單項后將執(zhí)行此過程。選擇此項后，在其右側(cè)將出現(xiàn)一個“創(chuàng)建”按鈕，單擊此按鈕將調(diào)出編輯窗口供輸入過程代碼。

3)選項

按下此按鈕將彈出“提示選項”對話框，如圖8.5所示?！疤崾具x項”對話框用于定制菜單項的附加屬性。一旦定義過屬性，按鈕面板上就會顯示符號“√”。下面說明“提示選項”對話框的主要屬性。

快捷方式用于指定菜單或菜單項的快捷鍵。VisualFoxPro菜單項的鍵盤快捷鍵是Ctrl鍵和其他鍵的組合。其中“鍵標(biāo)簽”文本框顯示鍵組合，其定義方法為：單擊“鍵標(biāo)簽”文本框，使光標(biāo)定位到文本框，然后在鍵盤上按快捷鍵。此時在“鍵說明”文本框中也會出現(xiàn)相同的內(nèi)容，但該內(nèi)容可修改。當(dāng)菜單激活時，“鍵說明”文本框中的內(nèi)容將顯示在菜單項標(biāo)題的右側(cè)，作為對快捷鍵的說明。要取消已定義的快捷鍵，可以先單擊“鍵標(biāo)簽”文本框，然后按空格鍵。圖8.5“提示選項”對話框位置包括“容器”和“對象”兩個選項，主要用于編輯OLE對象。它可以指定當(dāng)用戶在應(yīng)用程序中編輯一個OLE對象時菜單標(biāo)題的位置。該位置有4種選擇：無、左、中、右。

跳過用于定義菜單項的跳過條件。指定一個表達式，由表達式的值決定該菜單項是否可選。

信息用于定義菜單項的說明信息。指定一個字符串或字符表達式。當(dāng)鼠標(biāo)指向該菜單時，該字符串或字符表達式的值就會顯示在VisualFoxPro主窗口的狀態(tài)欄上。

主菜單名允許定制可選的菜單標(biāo)題。產(chǎn)生的菜單程序中的名稱或編號是可選的，如果沒有指定它們，系統(tǒng)會自動設(shè)定。

備注提供輸入個人使用的備注的空間。在任何情況下備注都不影響所生成的代碼，運行菜單程序時VisualFoxPro將忽略備注。

4)菜單級

允許用戶選擇要處理的菜單或子菜單。用于從下級菜單頁切換到上級菜單頁。其中“菜單欄”選項表示第一級菜單。

5)菜單項

在“菜單項”中包含插入、插入欄和刪除3個按鈕。

插入選擇該按鈕，系統(tǒng)會在當(dāng)前菜單項行之前插入一個菜單項行。

插入欄該按鈕的功能也是在當(dāng)前菜單項行之前插入一個菜單項行，但是它能提供與系統(tǒng)菜單一樣的菜單項來作為用戶菜單的命令。單擊“插入欄”按鈕將顯示“插入系統(tǒng)菜單欄”對話框，如圖8.6所示。用戶可在其中選一個菜單項插入。但要注意的是：該按鈕僅當(dāng)建立或編輯“子菜單”時才可用。圖8.6“插入系統(tǒng)菜單欄”對話框刪除選擇此按鈕，可以刪除當(dāng)前的菜單項行。

6)預(yù)覽

顯示正在創(chuàng)建的菜單。單擊此按鈕可以查看所設(shè)計菜單的形象。在所顯示的菜單中可以進行選擇、檢查菜單的層次關(guān)系與提示是否正確等。這些操作不會執(zhí)行各菜單的相應(yīng)動作。

8.2.2創(chuàng)建下拉式菜單

下拉式菜單是最常見的一種菜單。在VisualFoxPro中，利用菜單設(shè)計器可以很方便地創(chuàng)建下拉式菜單。下面以倉庫管理為例，設(shè)計一個表數(shù)據(jù)維護的菜單，主要的菜單項見表8.1。表8.1表數(shù)據(jù)維護菜單構(gòu)成

1.創(chuàng)建菜單文件

1)輸入菜單項和子菜單

打開菜單設(shè)計器窗口，如圖8.7所示。逐行在“菜單設(shè)計器”窗口中的“菜單名稱”列的文本框中輸入第一級5個菜單項名稱。因為所設(shè)計的系統(tǒng)菜單有第二層次，所以在“子菜單”項右邊單擊“編輯”，進入下一個對話框。下級菜單對話框的形式和操作都與圖8.7的窗口一樣，只是在“菜單級”下拉列表框中顯示上級菜單項的名稱。逐個打開第一級各菜單項的“子菜單”設(shè)計窗口，并在其“菜單名稱”列中輸入第二層菜單中各菜單項名稱或者單擊“插入欄”按鈕，打開“插入系統(tǒng)菜單欄”對話框，選擇需要的菜單項。比如對于“文件”菜單項，選擇“結(jié)果”為子菜單，單擊“編輯”按鈕，可以進入其第二級子菜單。在“插入系統(tǒng)菜單欄”對話框中選擇各菜單項，創(chuàng)建下拉菜單各項，如圖8.8所示。依次可以創(chuàng)建編輯、顯示和表維護等菜單項的二級菜單項。圖8.7輸入菜單項信息圖8.8創(chuàng)建二級菜單項如果希望將來菜單的使用可以像VisualFoxPro系統(tǒng)菜單那樣用熱鍵的方式操作，則可以在創(chuàng)建的菜單項后面輸入(\<字母)，比如可以把圖8.7中的一級菜單修改為如圖8.9所示的內(nèi)容。圖8.9為第一級菜單添加熱鍵

2)保存文件

菜單項的格式設(shè)計好后，應(yīng)作為菜單定義保存在擴展名為.mnx的菜單文件和擴展名為.mnt的菜單備注文件中，供以后修改、生成及調(diào)用。保存方法可以選擇下述方法之一。

(1)選擇VisualFoxPro系統(tǒng)菜單中“文件”的“保存”命令，系統(tǒng)即保存當(dāng)前的菜單定義，但菜單設(shè)計器窗口不關(guān)閉。

(2)單擊菜單設(shè)計器窗口的“關(guān)閉”按鈕，系統(tǒng)會詢問“要將所做更改保存在菜單設(shè)計器中嗎？”，若選擇“是”按鈕，菜單定義被保存，并關(guān)閉菜單設(shè)計器窗口。

(3)按組合鍵“Ctrl+W”，此時保存菜單定義并關(guān)閉菜單設(shè)計器窗口。

(4)如果沒有保存過菜單定義文件，在生成菜單程序時系統(tǒng)會詢問“要將所做更改保存在菜單設(shè)計器中嗎？”，若選擇“是”按鈕，菜單定義即被保存。

2.下拉式菜單的生成

保存創(chuàng)建的菜單定義文件后，將建立菜單文件(擴展名為.mnx)和菜單備注文件(擴展名為.mnt)。但是菜單文件僅是菜單格式信息的對應(yīng)數(shù)據(jù)表，是不能運行的文件。要想運行菜單，必須創(chuàng)建菜單程序。

首先打開菜單設(shè)計器窗口，這時在VisualFoxPro系統(tǒng)菜單中會添加“菜單”選項，選擇“菜單”選項中的“生成”命令來生成菜單程序。選擇該命令將會出現(xiàn)“生成菜單”對話框，如圖8.10所示。對話框中有一個“輸出文件”文本框，用來顯示系統(tǒng)默認(rèn)的菜單程序路徑和程序名，用戶可以直接修改或利用其右側(cè)的對話框按鈕來選一個文件名，再單擊“生成”按鈕就會生成菜單程序。圖8.10“生成菜單”對話框

3.運行菜單

生成菜單程序文件之后就可以運行菜單，通過菜單實現(xiàn)對用戶應(yīng)用系統(tǒng)中各對象的聯(lián)系和管理。在VisualFoxPro中運行菜單程序的方法主要有以下幾種。

1)主菜單運行

選擇VisualFoxPro系統(tǒng)菜單中的“程序”菜單項中的“運行”命令，然后選擇相應(yīng)的文件名，即可運行菜單程序文件。

2)用命令運行

在命令窗口中輸入命令：

DO<菜單程序文件名>

3)用程序運行

將菜單程序運行命令嵌入到程序中，通過執(zhí)行程序間接調(diào)用菜單。

本例通過在命令窗口中輸入：DO下拉式菜單.mpr，運行結(jié)果如圖8.11所示。圖8.11表維護菜單運行結(jié)果8.2.3生成快速菜單

快速菜單是VisualFoxPro系統(tǒng)為用戶提供的快速調(diào)用系統(tǒng)菜單內(nèi)容到當(dāng)前菜單設(shè)計器中的一種方法。如果用戶在菜單設(shè)計過程中需要使用VisualFoxPro系統(tǒng)菜單，就可以使用快速菜單，當(dāng)系統(tǒng)菜單內(nèi)容調(diào)用到當(dāng)前菜單設(shè)計器后，用戶可以根據(jù)需要進行修改。

生成快速菜單的主要操作如下。

(1)打開菜單設(shè)計器。在項目管理器中，選擇“其他”選項卡，選擇列表中的“菜單”項，然后選用“新建”按鈕建立菜單，打開菜單設(shè)計器窗口。此時，VisualFoxPro系統(tǒng)菜單中就會增加一個名為“菜單”的菜單項。在“菜單”這一選項中共有6個菜單命令，“快速菜單”位于第一個，如圖8.12所示。圖8.12“快速菜單”命令

(2)建立快速菜單。在圖8.12中選擇“快速菜單”命令后，VisualFoxPro系統(tǒng)菜單的內(nèi)容自動復(fù)制到菜單設(shè)計器窗口中，一個與VisualFoxPro系統(tǒng)菜單內(nèi)容一樣的菜單就生成了，如圖8.13所示。在此基礎(chǔ)上，用戶可以根據(jù)自己的需要修改。圖8.13建立的快速菜單

(3)保存快速菜單。將所做的修改保存到菜單設(shè)計器中，文件名為“快速菜單.mnx”。

使用說明：“快速菜單”只有在菜單設(shè)計器窗口為空時才允許選擇，否則它是不可選的?？焖俨藛蚊顑H用于產(chǎn)生下拉式菜單，不能用于產(chǎn)生快捷菜單。

(4)快速菜單生成。生成快速菜單的方法與生成下拉式菜單的操作一致。在菜單設(shè)計器窗口打開的狀態(tài)下，選擇系統(tǒng)菜單的“菜單”項中的“生成”命令，打開“生成菜單”對話框，單擊“生成”按鈕，就可生成一個系統(tǒng)默認(rèn)的快速菜單程序名，如圖8.14所示。圖8.14“生成菜單”對話框8.2.4創(chuàng)建SDI菜單

運行用戶自定義的菜單后，菜單會出現(xiàn)在VisualFoxPro系統(tǒng)窗口中，如果希望定義的菜單出現(xiàn)在表單中，就要創(chuàng)建SDI菜單。SDI菜單是顯示在SDI(單文檔界面)窗口中的菜單。

下面以將前面已生成的“快速菜單.mpr”創(chuàng)建為SDI菜單為例，介紹創(chuàng)建SDI菜單的方法。主要操作步驟如下。

(1)在“項目管理器”中打開“快速菜單.mnx”，然后在VisualFoxPro系統(tǒng)菜單中選擇“顯示”菜單中的“常規(guī)選項”菜單項，打開“常規(guī)選項”對話框，如圖8.15所示，在該對話框中選中“頂層表單”復(fù)選框，單擊“確定”按鈕，關(guān)閉“常規(guī)選項”對話框。然后保存“快速菜單.mnx”文件，并生成快速菜單程序。圖8.15“常規(guī)選項”對話框

(2)創(chuàng)建一個表單，將表單的ShowWindow屬性值設(shè)為“2-頂層表單”，使該表單成為頂層表單，接著在表單的Init事件代碼中添加如下代碼：

DOD:\VisualFoxPro數(shù)據(jù)庫\示例數(shù)據(jù)庫\快速菜單.mprWITHTHIS，.T.

這樣在運行SDI表單時，菜單系統(tǒng)就會附著在SDI表單中，如圖8.16所示。圖8.16頂層表單

8.3快捷菜單設(shè)計

快捷菜單是右擊對象時彈出的菜單，是獨立于菜單欄而顯示在表單上的浮動菜單，它用于快速執(zhí)行與當(dāng)前所選對象最為相關(guān)的命令?？旖莶藛紊巷@示的菜單項取決于按下鼠標(biāo)右鍵時指針?biāo)幍奈恢谩Ｔ赩isualFoxPro中可以利用“快捷菜單設(shè)計器”生成快捷菜單，但是實現(xiàn)單擊右鍵來彈出一個菜單的動作還需要編程。

可以按以下步驟創(chuàng)建快捷菜單：

(1)從項目管理器的“其他”選項卡中選擇“菜單”，再單擊“新建”按鈕，彈出“新建菜單”對話框，如圖8.3所示。

(2)單擊“快捷菜單”按鈕，進入快捷菜單設(shè)計器，然后就可以像創(chuàng)建下拉式菜單那樣創(chuàng)建快捷菜單。當(dāng)然，創(chuàng)建快捷菜單后，還必須將其附著在對象中，操作方法如下：

(1)在表單設(shè)計器中，選擇快捷菜單要附著的對象。

(2)在對象的RightClick事件代碼中執(zhí)行以下命令：

DO快捷菜單名.mpr

實現(xiàn)過程如下：

(1)采用上述方法，在“項目管理器”中進入快捷菜單設(shè)計器窗口。

(2)插入系統(tǒng)菜單欄。在“快捷菜單設(shè)計器”窗口中，選擇“插入欄”按鈕，打開“插入系統(tǒng)菜單欄”對話框，在該對話框中分別將“清除”、“粘貼”、“復(fù)制”和“剪切”等選項插入到快捷菜單設(shè)計器中，如圖8.17所示，然后關(guān)閉“插入系統(tǒng)菜單欄”對話框，并保存快捷菜單文件。圖8.17建立快捷菜單

(3)生成快捷菜單程序。選擇主菜單欄中的“菜單”選項中的“生成”命令，打開“生成菜單”對話框，在該對話框中填寫輸出的菜單文件名和確定輸出位置，如圖8.18所示。圖8.18“生成菜單”對話框

(4)新建訂購表單。以“dgd.dbf”表為數(shù)據(jù)源，使用表單向?qū)Ы⒁粋€商品訂購表單，將表單的ShowWindow屬性值設(shè)為“2-頂層表單”，使該表單成為頂層表單，接著在表單的RightClick事件代碼中添加如下代碼：

DOD:\VisualFoxPro數(shù)據(jù)庫\示例數(shù)據(jù)庫\快捷菜單.mpr

(5)運行表單。在命令窗口中執(zhí)行“DOFORMd:\vf數(shù)據(jù)庫\示例數(shù)據(jù)庫\訂購表單.scx”文件，就可以運行表單，此時選擇某一字段數(shù)據(jù)后，在表單上右擊就彈出快捷菜單，便可執(zhí)行剪切、復(fù)制、粘貼等編輯操作，如圖8.19所示。圖8.19快捷菜單的使用

8.4在菜單中添加事件代碼

1.設(shè)定菜單選項的程序代碼

在VisualFoxPro中為菜單選項制定任務(wù)，可以用一個命令執(zhí)行一個任務(wù)，也可以用過程來完成任務(wù)。在表維護菜單的設(shè)計中，“文件”和“編輯”菜單項的子菜單調(diào)用了VisualFoxPro系統(tǒng)菜單選項，只有“顯示”、“表維護”和“退出”需要添加程序代碼。

1)添加命令

在項目管理器中打開菜單設(shè)計器(雙擊“下拉式菜單

.mnx”),進入到“顯示”菜單項的下一級子菜單，在“瀏覽”行的“結(jié)果”列選擇“命令”，然后在其右側(cè)的“文本框”中輸入命令：browse，在“關(guān)閉”行的“結(jié)果”列選擇命令，然后在其右側(cè)的“文本框”中輸入命令：use。返回到“菜單欄”后，進入到“表維護”菜單項的下一級子菜單，為“添加記錄”選項添加命令：appendblank。

2)添加過程

將設(shè)計器窗口切換到“表維護”的子菜單頁，將“插入記錄”的“結(jié)果”列設(shè)置為“過程”。然后單擊其后出現(xiàn)的“創(chuàng)建”按鈕，在代碼編輯窗口輸入如下代碼：

insertblankbefore

=messagebox('請點擊"查詢"按鈕，刷新表格！',0,'提示')將“刪除記錄”的“結(jié)果”列設(shè)置為“過程”。然后單擊其后出現(xiàn)的“創(chuàng)建”按鈕，在代碼編輯窗口輸入如下代碼：

delete

pack

=messagebox('請點擊"查詢"按鈕，刷新表格！',0,'提示')

返回到“菜單欄”，將“退出”行的“結(jié)果”列設(shè)置為“過程”。然后單擊其后出現(xiàn)的“創(chuàng)建”按鈕，在代碼編輯窗口輸入如下代碼：

setsysmenunosave

setsysmenutodefault

quit

3)增加總體提示

在“菜單設(shè)計器”窗口組成中介紹過為菜單項建立信息提示，但是這種方法必須為每個需要的菜單項單獨建立，而且菜單運行時，提示信息顯示在狀態(tài)欄上。如果在菜單設(shè)計中，有某個菜單項的子菜單功能還沒設(shè)定，用戶在使用時希望看到提示，那么就可以使用菜單總體提示功能來完成。

假設(shè)圖8.7中顯示的“表維護”菜單項中的子菜單的功能還沒有設(shè)定。為了能夠在使用時提示用戶，可以先在圖8.7中選定“表維護”菜單項，單擊右側(cè)的“創(chuàng)建”按鈕，打開其子菜單窗口。此時“菜單設(shè)計器”窗口中的“菜單級”列表框顯示為“表維護”。在VisualFoxPro的主菜單的“顯示