VFP程序设计技巧

来源:百度文库 编辑:神马文学网 时间:2024/04/19 09:47:52
1、将窗口最大化
在主程序中加入一段API程序,即可实现。
3DECLARE INTEGER FINDWINDOW IN WIN32API INTEGER,STRING
DECLARE INTEGER SHOWWINDOW IN WIN32API INTEGER,INTERGER
NULLPOINTER = 0
FOXHWND = FINDWINDOW(NULLPOINTER,"管理系统")
FOXGONE = SHOWWINDOW(FOXHWND,)
2、菜单设计
如果菜单中要加入一条分隔线,可以在菜单中添一条子菜单,菜单名称为"\-"。
   如果由于权限设置或防止程序冲突需要屏蔽某些菜单项,可以先定义一个逻辑值的全局变量,然后将需屏蔽的菜单项的选项设置成该变量为真时跳过,这样你就可以通过对该变量值的变化控制菜单项是否屏蔽。
3.设置文件运行目录
vfp程序一般分执行文件和数据文件,备份时只要把数据文件备份就可以了。为了便于程序更新和数据备份,可将数据文件单独置于子目录中由于编程及调试时一般都不设置程序运行目录,为了避免编译后程序找不到数据文件,可用下面两句指定数据文件在DBF子目录中。
SET DEFAULT TO SYS(5)+CURDIR()
SET PATH TO SYS(5)+CURDIR()+'DBF'
4、取得WINDOWS路径
如果要对注册表进行操作,你就要先找WINDOWS的路径,用下面的命令可以返回WINDOWS的路径。
GETENV('WINDIR')
5、用窗口关闭按钮退出程序
VFP程序运行时点窗口右上角的关闭按钮会显示一个"不能退出VISUAL FoxpRO"的警告窗口,很讨厌。如果要解决这个问题可以在主程序中加一句
    0n Shutdown do Q.prg
    然后在项目中新建Q.prg程序,程序内容为前面退出时确认那段语句,这样就搞定了