当前位置: 代码迷 >> VFP >> vfp9.0中做项目,出现了以下异常,谁解答下
  详细解决方案

vfp9.0中做项目,出现了以下异常,谁解答下

热度:9600   发布时间:2013-02-26 00:00:00.0
vfp9.0中做项目,出现了以下错误,哪位高手解答下?
小弟是新手,现在仍然依葫芦画瓢。先说明以下,我的vfp9.0安装是默认安装,完整版(200M)。
做的项目是绩效考核系统,项目路径是在 F:\公共卫生绩效考核系统\ 下,所有表单、表、库、图标都在里面,在运行mainform表单时出现了下图的错误:






mainform中 init时间已经声明
lcFile = SYS(1271, THISFORM) &&取得当前表单的存放路径,包括文件名*.scx
pos=rAT("\",JUSTPATH(lcFile)) 
libfile=LEFTc(JUSTPATH(lcFile),pos) &&取得文件夹的名称
DO LIBFILE+"\xtmenu.mpr" WITH THISFORM,.T.
THIS.Show &&注意,一定要先显示表单,否则工具栏会一直被表单覆盖

IF TYPE("thisform.MyToolbar")="O" AND;
!ISNULL(thisform.MyToolbar)
RETURN
ENDIF
SET CLASSLIB TO LIBFILE+"\toolbars.VCX" ADDITIVE
thisform.mytoolbar=createobject("mytoolbar")
thisform.Mytoolbar.dock(0) &&将工具栏停靠在顶层表单窗口中
thisform.MyToolbar.show
RELEASE CLASSLIB LIBFILE+"\toolbars.vcx"

这类问题如何解决呢?

------解决方案--------------------------------------------------------
Set PATH TO 路径
Set Default TO 路径
------解决方案--------------------------------------------------------
路径出问题了,建议不要用绝对路径
  相关解决方案