VF輔導(dǎo):VFP編程的雕蟲(chóng)小技

字號(hào):

1.將窗口化
    現(xiàn)在顯示器一般都比較大,我們編程序時(shí)也喜歡把表單設(shè)計(jì)得大一點(diǎn),但VFP程序運(yùn)行時(shí)默認(rèn)的窗口大小卻只有640×480,每次運(yùn)行都要化窗口。其實(shí)只要把下面一段API調(diào)用程序放在主程序中,運(yùn)行時(shí)窗口就會(huì)自動(dòng)化了。
    declare integer FindWindow IN win32api integer,string
    declare integer ShowWindow IN win32api integer,integer
    NullPointer=0
    FoxHWND= FindWindow(NullPointer,″庫(kù)存管理系統(tǒng)″)
    FoxGone=ShowWindow(FoxHWND,3)
    2.菜單設(shè)計(jì)
    如果菜單中要加入一條分隔線,可以在菜單中添一條子菜單,菜單名稱為“\-”就可以了。
    如果由于權(quán)限設(shè)置或防止程序沖突需要屏蔽某些菜單項(xiàng),可以先定義一個(gè)邏輯值的全局變量,然后將需屏蔽的菜單項(xiàng)的選項(xiàng)設(shè)置成該變量為真時(shí)跳過(guò),這樣你就可以通過(guò)對(duì)該變量值的變化控制菜單項(xiàng)是否屏蔽。
    3.設(shè)置文件運(yùn)行目錄
    VFP程序一般分執(zhí)行文件和數(shù)據(jù)文件,備份時(shí)只要把數(shù)據(jù)文件備份就可以了。為了便于程序更新和數(shù)據(jù)備份,可將數(shù)據(jù)文件單獨(dú)置于子目錄中。由于編程及調(diào)試時(shí)一般都不設(shè)置程序運(yùn)行目錄,為了避免編譯后程序找不到數(shù)據(jù)文件,可用下面兩句指定數(shù)據(jù)文件在DBF子目錄中。
    set default to sys(5)+curdir()
    set path to sys(5)+curdir()+′dbf′
    4.取得Windows路徑
    如果要對(duì)注冊(cè)表進(jìn)行操作,你就要先找Windows的路徑,用下面的命令可以返回Windows的路徑。
    GetEnv(“WinDir”)
    5.用窗口關(guān)閉按鈕退出程序
    VFP程序運(yùn)行時(shí)點(diǎn)擊窗口右上角的關(guān)閉按鈕會(huì)顯示一個(gè)“不能退出 Visual FoxPro”的警告窗口,很討厭。如果要解決這個(gè)問(wèn)題可以在主程序中加一句
    on shutdown do q.prg
    然后在項(xiàng)目中新建q.prg程序,程序內(nèi)容為前面退出時(shí)確認(rèn)那段語(yǔ)句,這樣就搞定了。