[求助]：如何修改COPY命令？

烨006

最初由 czg09180274 发布
[B]楼主可以这样做的
用记事本打开ACAD.MNU文件找到ID_COPY   [复制(&C)]^C^CCOPY 这个玩意把它改成
ID_COPY   [复制(&C)]*^C^CCOPY Single
或者是
ID_COPY   [复制(&C)]*^C^CCOPY  就可以了,（至于两种方式有什么... [/B]

记得以前在XD里看到兄弟所说的类似改法，也是我最想要的改法，但找不到ID_COPY   [复制(&C)]^C^CCOPY 这东东，因此无法改动——相似的有这个：ID_Copy      [Cop&y]$M=$(if,$(eq,$(substr,$(getvar,cmdnames),1,4),GRIP),_copy,^C^C_copy)，可惜也改不成功！

最初由 whcdy 发布
[B]在ACADR14.LSP中加入以下一行：
(DEFUN C:CC(/ ent) (setq ent (ssget)) (COMMAND "COPY" ent "" "m")(princ))
使用时输入命令“CC”即是多重复制。[/B]

按兄台提供的代码，可以实现多重复制的功能了！尽管这不是我想要的改法，但还是加载上去用了！多谢！

czg09180274

你那里的[COP&Y]后面用到了DIESEL语句,所以你还是不要去改它比较好,
我建议你另建一个菜单文件,格式如下:
***MENUGROUP=MYUSER

//自定义命令

***POP101
**MYSET
ID_MNMYSET     [常用命令]
ID_COPY           [复制(&C)]*^C^CCOPY \ Multiple


注意:
     你在上面的最后那一行"*^C^CCOPY \ Multiple"输入完后切记要加上一个回车来结束菜单,要不调用时将会出错.

定义完后将它存为XXX.MNU ,再在CAD里把它加载进去就能够正常使用了.