浅谈VFP使用的技巧.docVIP

浅谈VFP使用的技巧 　　摘要: 在使用Visual FoxPro 6.0开发设计和教学过程中,经常会出现一些软件使用问题,这些问题看似渺小不重要,但经常困扰学生及初学者,本人将对这些问题进行总结归纳,以便对学生及初学者解决相关问题。 　　关键词:Visual FoxPro 6.0;使用技巧 　　 　　在使用Visual FoxPro 6.0编程或学习过程中,经常会出现或遇到这样或那样的问题,在不能解决的情况下,往往打击了使用者的学习兴趣,本文特将一些VFP使用技巧进行归纳总结,与广大VFP学习爱好者交流探讨。 　　1 避免VFP中出现CannotQuitVisualFoxPro 　　出现“Cannot Quit Visual FoxPro”的原因有两种情况,一是在执行了read event后,read event事件处于活动状态,此时,试图使用系统窗口的关闭按钮退出Visual FoxPro(或Visual FoxPro编写的应用,以下同),则会出现“Cannot Quit Visual FoxPro”。二是在Visual FoxPro6.0中,如果在还有活动表单的情况下,无论使用系统窗口的关闭按钮,还是调用Quit,都会出现“Cannot Quit Visual FoxPro”。这时,要正常退出,必须先关闭活动的表单。要避免出现“Cannot Quit Visual FoxPro”,在欲退出之前,要先执行clear event。在Visual FoxPro5.0中还要先关闭活动的表单。 　　在Visual FoxPro 6.0中,程序的开头可以加上类似以下的程序 　　ON SHUTDOWN DO MyQuit 　　PROC MyQuit 　　CLEAR Event 　　IF-SCREEN.cFormCount0 　　DIME TmpForm[-SCREEN.FormCount] 　　FOR i=1 TO -SCREEN.FormCount 　　TmpForm[i]=-SCREEN.Forms(i) 　　ENDFOR 　　FOR i=1 TO -SCREEN.FormCount 　　TmpForm[i].Release 　　ENDFOR 　　ENDIF 　　QUIT 　　这样,在欲退出Visual FoxPro时,程序先自动清除read event事件,关闭所有的表单,然后调用Quit正常退出。 　　2 改变VFP可执行文件要的运行库位置和文件名 　　我们知道,编译成 exe 的 VFP 程序要加载两个运行时库,它们的缺省名称为 VFP9r.dll 和 VFP9rchs.dll。VFP 在正常情况下查找和加载这两个 dll 的方式是这样的: 　　2.1 首先从注册表中(位置: HKEY_CLA 　　SSES_ROOT\VisualFoxProRuntime.9\Shell\Ope 　　n\Command)读取运行库的文件路径和名称定义,通常是 C:\Program Files\Common Files\Mi 　　crosoft Shared\VFP\VFP9r.dll,然后加载它。 　　2.2 加载成功的 VFP9r.dll 根据 Windows 确定要使用的语言资源文件 VFP9r???.dll,对于简体中文,使用 VFP9rchs.dll 　　假定我们将这两个运行库文件更名为 aaa.dll 和 aaa.chs.dll,并放到 c:\windows\system32 下的话,如何让我们的 exe 仍能正常运行,又不影响其他 VFP 程序正常运行呢? 　　首先,要使我们的 exe 不使用 HKCR\Vi 　　sualFoxProRuntime.9\Shell\Open\Command 中的运行库缺省定义。先在注册表中增加一项我们要使用的运行库定义: 　　Windows Registry Editor Version 5.00 　　[HKEY_CLASSES_ROOT\MyRuntime\Shell\Open\Command] 　　@=“C:\\WINDOWS\\system32\\aaa.dll” 　　打开记事本,贴入上面的内容并保存为 my.reg,然后双击这个文件导入到注册表中。下面修改 exe 让它来读取这个设置。 　　使用任何16进制编辑器(例如:UltraEdit),在 exe 中查找 VisualFoxProRuntime.9,找到后将其改为我们刚定义的 MyRuntime(注意修改后的串不要超过原串长度,若长度小于原串的话,注意尾部要填一个 00) 　　保存修改后的 exe 文件,现在我们的 exe 运行时将加载这个 aaa.dll