VFP右鍵功能

　　他語言做的軟件，其Text、EDIT、COMBOX等都有右鍵功能， 即一按右鍵就會在其對象旁彈出一個(gè)這樣的菜單，惟獨(dú)VFP做的程序沒有，您說氣不氣人。

　　下面就是該功能實(shí)現(xiàn)的方法：

　　先介紹幾個(gè)需要用到常數(shù)，這里所說的常數(shù)，是系統(tǒng)默認(rèn)的常數(shù)，也就是在編輯時(shí)會以藍(lán)色顯示的字符。

　　這些常數(shù)是：

　　常數(shù)名 所代表的含義

　　_med_undo "撤消(U)"

　　_med_cut "剪切(T)"

　　_med_copy "復(fù)制(C)"

　　_med_paste "粘貼(P)"

　　_med_clear "刪除(D)"

　　_med_slcta "全選(A)"

　　第一步我們在COMMAND窗口打：

　　MODIFY COMMAND remouse.prg

　　在編輯窗內(nèi)輸入如下內(nèi)容：

　　DEFINE POPUP popRight SHORTCUT RELATIVE FROM MROW()，MCOL()

　　DEFINE BAR _med_undo OF popRight PROMPT "撤消("

　　DEFINE BAR 2 OF popRight PROMPT ""-"

　　DEFINE BAR _med_cut OF popRight PROMPT "剪切("

　　DEFINE BAR _med_copy OF popRight PROMPT "復(fù)制("

　　DEFINE BAR _med_paste OF popRight PROMPT "粘貼("

　　DEFINE BAR _med_clear OF popRight PROMPT "刪除("

　　DEFINE BAR 7 OF popRight PROMPT ""-"

　　DEFINE BAR _med_slcta OF popRight PROMPT "全選("

　　ACTIVATE POPUP popRight

　　存盤退出。

　　這樣我們就建立了一個(gè)名為remouse.prg的文件。

　　接下來我們就可在需要右鍵功能對象的RinhtClick事件里寫入：

　　do remouse

　　好了，我們的程序也有右鍵功能了，就這么簡單，不信您試試。

　　這個(gè)方法唯一不足的是，必須在每個(gè)需要右鍵功能的對象里都寫上：do remouse這一句，但比起借用外部程序來達(dá)到這個(gè)目的，我覺得還是這個(gè)方法好。

　　相關(guān)推薦：

　　2012年計(jì)算機(jī)等考四級數(shù)據(jù)庫工程師備考筆記匯總

　　2012年計(jì)算機(jī)等級考試二級VB重點(diǎn)知識匯總

　　2012年下半年計(jì)算機(jī)等級考試報(bào)名時(shí)間及入口匯總