geminigui 发表于 2002-7-24 14:10:00

大家过来看看我的菜单定制存在什么问题!

在acad.mns中加入如下语句:
***POP11
**叶片设计
ID_MnLeafDesign    [叶片设计]
ID_LD3DView         [给定参数]^C^C(if (load (findfile "DrumDesign.lsp")) ((DrumDesign)) (alert "Could not find or could not start Quick Tour."))
                      [--]
ID_LDGetPic      [工程出图]^C^C(if (load (findfile "GETDRUMDESIGNRESULT.lsp")) ((GETDRUMDESIGNRESULT)) (alert "Could not find or could not start Quick Tour."))
加载后点机菜单,出现如下错误提示:
(if (load (findfile "GETDRUMDESIGNRESULT.lsp"))
((GETDRUMDESIGNRESULT)) (alert "Could not find or could not start Quick Tour."))
       C:GetDrumDesignResult 已加载。 error: null function
(GETDRUMDESIGNRESULT)
可以看到lsp已经被正确加载。但为什么不能执行呢?
我的函数名就分别叫DrumDesign和GETDRUMDESIGNRESULT。已经加了C:

mccad 发表于 2002-7-24 19:35:00

将GetDrumDesignResult 改成C:GetDrumDesignResult 试试

因为你是在程序中引用其它程序,应该加C:的。

huajie111 发表于 2004-5-18 00:52:00

我的程序和他的一样,加了C:还是不行的

f5612140 发表于 2004-5-18 15:31:00

先刪除ACAD.MNC,再試試

无痕 发表于 2004-5-18 16:15:00

((DrumDesign))       -》(DrumDesign)


多了一重括号

独角斗士 发表于 2004-5-18 16:27:00

本帖最后由 作者 于 2004-5-18 17:31:38 编辑

没看懂为什么要在mns里这么麻烦,如果找不到文件加载失败,系统自会提示

meflying 发表于 2004-5-18 16:45:00

没看懂楼上的说什么,这是在把自己的程序做到菜单里很常用的一种做法,有什么麻烦的?
页: [1]
查看完整版本: 大家过来看看我的菜单定制存在什么问题!