visualfoxpro60程序設計教程電子教案第9章-資料下載頁
2025-08-01 14:42本頁面
【正文】 代碼協(xié)調(diào)工具欄和表單 除了使用“表單設計器”外，還可以使用代碼在表單集中添加工具欄。如果要使用代碼在表單集中添加工具欄，可以在表單集的 Init事件中，使用 SET CLASSLB命令，指定包含工具欄類的類庫，然后在表單集中由此類創(chuàng)建工具欄。 例如，要添加并顯示基于 _base類庫中 _toolbar類的工具欄mytoolbar，可以在表單集的 Init事件中添加下列代碼： SET CLASSLIB TO LIBS\_BASE (MYTOOLBAR,_TOOLBAR) 如果使用已經(jīng)定義了的一個工具欄，如在第五章中定義的NEWTOOLBAR工具欄，則可以在表單集的 Init事件添加如下代碼： SET CLASSLIB TO LIBS\NEWTOOLBAR ADDITIVE (MYTOOLBAR,NEWTOOLBAR) 注意： 如果工具欄類沒有定義工具欄及其按鈕要執(zhí)行的操作，那么必須在與工具欄及其按鈕相關的事件過程中定義操作。 2022/8/18 Visual FoxPro 33 創(chuàng)建自定義工具欄示例 可以在代碼中定義工具欄的各個要素。例如，在第五章中定義的 NEWTOOLBAR工具欄沒有指定工具欄及其按鈕等要執(zhí)行的操作，現(xiàn)以該工具欄添加到表單集為例，說明其方法。先在表單集的 Init事件中添加下列代碼，當加載表單集時， VFP將創(chuàng)建并顯示代碼中定義的工具欄，該工具欄如圖： SET CLASSLIB TO LIBS\NEWTOOLBAR ADDITIVE (MYTOOLBAR,NEWTOOLBAR) 對 NEWTOOLBAR工具欄中各控件的執(zhí)行代碼定義的步驟及代碼如下： （ 1）選擇“項目管理器”中的“類”選項卡。 （ 2）找到并選擇以前定義的 NEWTOOLBAR類。 （ 3）單擊“項目管理器”的 【 修改 】 按鈕。 2022/8/18 Visual FoxPro 34 （ 4）分控件進行代碼設計。 ■對 Combo1組合框的代碼進行定義： ●選擇 Combo1控件，在“屬性”中選擇“其它”選項卡，將Enabled屬性設為“假” 。（在表單集中不設文章排版）。 ■對 Combo2組合框的代碼進行定義： ● 選擇 Combo2控件 ， 在 “ 屬性 ” 中選擇 “ 數(shù)據(jù) ” 選項卡 ， 將RowSourceType屬性設為 “ 1值 ” ， 將 RowSource屬性設為 宋體 ,黑體 ,仿宋 ,楷體 （ 還可以添加其它 VFP能識別的字體名 ） 。 設置初始值 ， 將 Value屬性設為 =宋體 。 ● 選擇 “ 方法程序 ” 選項卡 ， 雙擊 Click Event， 在彈出的代碼編輯框中寫入如下代碼： = 2022/8/18 Visual FoxPro 35 ■ 對 Combo3組合框的代碼進行定義： ●在上一步的方法程序編輯框中，從“對象”后的組合框中選擇Combo3，然后在 Click Event方法程序編輯框中輸入如下的代碼： =。 VAL(ALLTRIM()) ● 在“屬性”中的對象選擇框中選擇 Combo3對象，再選擇“數(shù)據(jù)”選項卡，將 RowSourceType屬性設為“ 1值”，將 RowSource屬性設為 8,9,10,11,12,14,16,18,20,22,24,26,28, 36,48,72。設置初始值，將 Value屬性設為 =9。 ■對 Command1命令按鈕的代碼進行定義： 在上一步的方法程序編輯框中，從“對象”后的組合框中選擇Command1對象，然后在 Click Event方法程序編輯框中輸入如下的代碼： =。 ! = ■ 對 Command2命令按鈕的代碼進行定義： 2022/8/18 Visual FoxPro 36 在上一步的方法程序編輯框中，從“對象”后的組合框中選擇Command2對象，然后在 Click Event方法程序編輯框中輸入如下的代碼： =。 ! = ■ 對 Command3命令按鈕的代碼進行定義： 在上一步的方法程序編輯框中 ， 從 “ 對象 ” 后的組合框中選擇Command3對象 ， 然后在 Click Event方法程序編輯框中輸入如下的代碼： =。 ! = 到此 ， 對類設計定義完成 ， 可關閉 “ 方法程序編輯框 ” ， 關閉“ 類設計器 ” 并將所做修改保存 。 2022/8/18 Visual FoxPro 37 將該工具欄加入到 Student表單集運行后，選擇表單上的“說明”后面的編輯框?qū)ο?，進行圖中工具欄狀態(tài)設置后（黑體、 12磅字號、粗斜體、加下劃線）的結果： 返 回 2022/8/18 Visual FoxPro 38 小 結 進行菜單系統(tǒng)設計前應先做好規(guī)劃： ①按要執(zhí)行的任務組織系統(tǒng)：即菜單系統(tǒng)中要設計哪幾個菜單箋以及菜單箋在菜單系統(tǒng)中的順序； ②每個菜單箋中應設置的菜單項以及菜單項的先后順序，菜單項是否分組； ③菜單箋以及菜單項的中文名，訪問鍵和鍵盤快捷鍵設置和定義； ④為菜單項指定任務，可以使用命令、菜單項、過程等； ⑤設置菜單的啟用和廢止條件以及菜單的說明信息。 使用“菜單設計器”根據(jù)所規(guī)劃的菜單系統(tǒng)定義菜單系統(tǒng)： ①先設計菜單箋（包含中文名、先后順序、訪問鍵、啟用及廢止條件等）； ②再設計菜單項（包含中文名、先后順序、分隔線、快捷鍵、啟用及廢止條件、菜單項信息、菜單項應執(zhí)行的任務等）。 使用“快捷菜單設計器”設計快捷菜單并在表單中包含快捷菜單或者在表單類中包含調(diào)用快捷菜單的命令。 使用“快速菜 單”設計系統(tǒng)菜單。 菜單設計完成后要生成菜單文件（ .mpr文件）。 自定義工具欄，并在表單集中通過注冊類的方法或在表單集的 Init事件中使用命令的方法添加自定義工具欄。 返 回 2022/8/18 Visual FoxPro 39
外語相關推薦
鄂ICP備17016276號-1