小弟是新手,现在仍然依葫芦画瓢。先说明以下,我的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 路径
------解决方案--------------------------------------------------------
路径出问题了,建议不要用绝对路径