实在没招了，菜单不会做，

[xxmiaoyong126com]

我在项目管理器里面做的菜单，我在一个子菜单的命令里面输入do form 存货档案
或者 do form 存货档案.SCX
或者 do form 存货档案 name form1
都不行

错误提示是 D:\My Documents\Visual FoxPro 项目\进销存\存货档案.SCX找不到。

我确认这个表单是在这个文件夹里的。
现在怎么办啊，看了很多资料，有些根本看不懂，感觉不是在讲VFP的菜单，、
另外论坛里查到说我上面那样子做就可以的，

现在怎么办啊，

高手指点下，我最近帖子是发的有点多，可能是会浪费CSDN的网络资源，也挺不好意思的，
但是现在实在没办法了，这又不能像代码那样1句1句的去试。

还有，这个软件做好后，我会写1个心得的，把初学者不容易明白的地方，都整理出来。

[xxmiaoyong126com]

DO Form "d:\my documents\visual foxpro 项目\进销存\存货档案.scx"

我把这句复制进去，可以打开表单。

难道本来就应该这样子写命令吗？

[jason_dion]

_SCREEN.Visible=.F. &&隐藏系统窗口

oldpath=SYS(5)+SYS(2003) &&获取当前默认路径
newpath=SYS(16) &&获取程序全路径名
newpath=getpath(newpath) &&得到程序所在的路径
SET DEFAULT TO (newpath) &&设置新的默认路径
你这个问题应该是路径的问题
把以上语句写入主程序或者应用环境参数文件可以解决
不要在VFP里测试
连编后试运行比较准确
因为你在VFP里有时是运行了某些语句而程序又没有设置的话
不容易检查出问题

[aabiao]

问题是：你运行EXE文件后，当前目录并不是EXE所在的目录,解决方法看楼上的。
问题是，你没把表单文件打包到项目中吗？编译成exe是不再需要表单文件了呀。
在继承环境中，不应该出现这情况，可什么情况把当前目录给换了。

[taohua300]

打包成.exe后出现这种情况的话，在主程序中加
SET DEFAULT TO sys(5) + sys（2003）

打包.exe的时候确保：1. 主程序是主文件
2. 所需要的表单以及其他文件都添加到项目中。
3. 设置菜单在顶层表单显示
4. 菜单子菜单中直接写 do form 表单名

[十豆三]

在主程序开头设置程序默认路径：

方法如下

*方法一:
**********************
Public gcNowPath
gcNowPath=Addbs(Justpath(Sys(16))) &&获取当前运行程序所在工作目录。
Set Default To (gcNowPath)
**********************

*方法二：
**********************
Public gcNowPath
gcNowPath=Addbs(Sys(5)+Sys(2003))
Set Default To (gcNowPath)
**********************


*方法三：（调用API）
**********************
Public gcNowpath
Declare Integer GetCurrentDirectory In "kernel32" Integer nBufferLength,String @lpBuffer
lpBuffer=Space(250)
lnSize=GetCurrentDirectory(Len(lpBuffer),@lpBuffer)
If lnSize>0
lpBuffer=Substr(lpBuffer,1,lnSize)
Set Default To (gcNowpath) &&设置默认工作目录
Endif
Clear Dlls
**********************

[laoqiaopi]

楼上好强悍啊 刚开始学这个 迷糊的很

[jason_dion]

鄙视不结贴的人