首页 | 社区 | 博客 | 招聘 | 文章 | 新闻 | 下载 | 读书 | 代码
亲,您未登录哦! 登录 | 注册

如何解决VFP6中文版安装错误

打印文章

分享到:
黄金铁

微软的数据库开发工具Visual FoxPro 6.0在国内应用很广,但也不可避免地存在某些Bug。近日,本人在使用VFP 6.0简体中文版开发软件时,就发现了其安装向导中的一个Bug,下面,笔者将具体介绍该问题及笔者的解决方案。

在制作应用程序发行版软件时,笔者利用安装向导将应用软件中的字形文件安装到Windows目录。按其提示正常操作后,得到的应用程序发行版在执行安装过程中出错,出错的窗口标题为“安装程序出错824”,错误提示为“对象16,您的安装程序文件可能已被破坏。请从您原来运行它的位置重新启动安装程序”。此错误代码在帮助文件中找不到。根据其提示的内容,笔者检查了所有的源文件和生成文件,发现均正确无误。将该字形文件安装到应用程序目录和Windows系统目录亦正常。最后锁定了故障的原因,即安装向导在把文件安装到Windows目录时出现错误。

经过较长时间的分析和思索,笔者最后在生成的安装程序中的两个参数文件setup.stf及setup.inf中找到了蛛丝马迹。在setup.stf中,该字形文件对应行有一个字段内容为“应用程序 - Windows,-0b20z4avw”;而在setup.inf中,文件的内容按节分开,节名用方括号包括。该字形文件单独在一节,节名为[Application - Windows]。笔者试着用debug反汇编程序把该节名修改为[应用程序 - Windows],以便与setup.stf对应,空出的三个字节用空格补齐。结果生成的安装程序顺利地将该字形文件安装到了Windows目录下,至此摆平了该Bug。

回头来看,此Bug产生的原因是微软Visual FoxPro 6.0汉化不完全造成的,在英文版的Visual FoxPro 6.0中不应该有此问题。为了以后应用的方便,本人专门做了一段FoxPro程序自动做替换节名的工作。程序如下:

&&&&解决Visual Viusal FoxPro 6.0简体中文版安装向导 Bug 的程序
f1=locfile('setup.inf','inf:inf')
if len(f1)>0
setupinf=fopen(f1,2)
else
wait windows "没找到 setup.inf 文件!"
return
endif
if setupinf<0
wait windows "打开 setup.inf 文件错误!"
return
endif
s1="[Application - Windows]"
s2="[应用程序 - Windows] "
&&&&s2字符串尾部有3个空格,以使其长度与s1长度相等
flag1=.f.
do while .not.feof(setupinf)
s3=fgets(setupinf)
if s3=s1
fseek(setupinf,0-len(s1)-2,1)
fputs(setupinf,s2)
flag1=.t.
exit
endif
enddo
fclose(setupinf)
if flag1
wait windows "替换成功!"
else
wait windows "没找到 "+s1+" 节!"
endif
return

以上是笔者的解决方案,希望能对大家的开发有所帮助。

本栏文章均来自于互联网,版权归原作者和各发布网站所有,本站收集这些文章仅供学习参考之用。任何人都不能将这些文章用于商业或者其他目的。( Pfan.cn )

编程爱好者论坛

本栏最新文章