[求助]：一个困扰我的问题期望能得到解决?(菜单中调用合成lisp 文件)

xxming

1、我想在把所有的lisp文件合成一个lisp文件,然后中菜单中调用合成lisp 文件中的所有的命令?
如下例:
ID_zbxwj       [_Button("坐标写入文本","zbxwj","zbxwj")]^C^C(load "C/zbxwj.LSP");zbxwj
iD_zbbz        [_Button("坐标标注","zbbz","zbbz")]^C^C(load "C:/zbbz.LSP");zbbz
2、如何不用调用原来路径直接调用命令?
ID_zbxwj       [_Button("坐标写入文本","zbxwj","zbxwj")]^C^Czbxwj
iD_zbbz        [_Button("坐标标注","zbbz","zbbz")]^C^Czbbz

zw_zwzx

应该很简单吧，只要把其中的某一个文件里的内容剪切或粘贴到另外一个文件里，就搞定了！现在只在加载合成后的文件就可以用里面的两个命令了。只要你愿意，可以把你编写的所有程序都放到这个文件中来，只要加载这一个文件就可以用所有的命令了！

TLHMQH

有几点错误：
1、菜单写法
例：ID_New       [新建(&N)...\tCtrl+N]^C^C_new
其中：ID_New   是菜单名称；
            [新建(&N)...\tCtrl+N]  是菜单显示的文字，即你明白的汉语命令；
      ^C^C  是系统命令清零；
      _new  是执行的命令，在这里你可以直接使用你在lisp 文件中定义的命令
不用指明路径。
你套用的是工具栏的写法，还有错误。
另：菜单命令必须放到菜单命令区，其它问题慢慢研究吧。

xxming

三楼我试过了,^C^C_new后面必须指明路径才能执行命令
你能否举个例子

TLHMQH

我用的2002、2004版，不用指明路径。如果你用的是R14以前版的，我就不清楚了。

xxming

楼上:我用的2004下必须指明路径,才能执行。你能否举个例子让我试试

TLHMQH

我的菜单一部分
[B]***POP6
**TOOLS
ID_MnTools     [工具(&T)]
ID_U           [放弃(&U)        Ctrl+Z]_u
ID_Redo        [重做(&R)        Ctrl+Y]^C^C_mredo 1
               [--]
ID_Regenall    [刷新(&A)]^C^C_regenall
ID_Purge       [清理(&P)...]^C^C_purge
               [--]
ID_Dist        [查询距离、角度(&D)]^C^C_dist
ID_Area        [查询面积(&A)]^C^C_area
               [--]
ID_GL          [高程归零]^C^C_GL
ID_XY          [坐标标注]^C^C_XY
ID_MJ          [面积标注（公顷）]^C^C_MJ
ID_MJM       [面积标注（市亩）]^C^C_MJM
……
[/B]

我的菜单和工具栏都是自己改的，没用的功能都删了，增加了一些自己的程序显示的下面部分就是我自己增加的内容。

xxming

菜单命令必须放到菜单命令区?解释一下

TLHMQH

户籍！你只能回你自己的家，上别人家不能算你是那家人。

xxming

"套用的是工具栏的写法，还有错误"你能不能帮我改一下

TLHMQH

ID_zbxwj [_Button("坐标写入文本","zbxwj","zbxwj")]^C^C(load "C/zbxwj.LSP");zbxwj
_Button：是ㄒ骞ぞ呃福?
"坐标写入文本"：是显示在工具栏的提示名称；
"zbxwj","zbxwj'：是工具栏显示的图标，系统应该有这个图标，或你自己绘制的图标，要标明格式；
^C^C：是使强制系统命令行归零；
zbxwj：是你给系统的命令，前面要加一_；
图标和命令必须放在系统支持的路径下。

xxming

“是你给系统的命令，前面要加一_”。奇怪有的命令可以运行而有的不能运行是什么原因呢
“菜单命令必须放到菜单命令区?”是什么意思