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

