[求助]CAD 多重复制如何用一个命令按扭完成！！

xuyigu · 发表于 2003-10-15 08:03:00

楼上的朋友,帮忙做一下,这里谢谢了!!

xuyigu · 发表于 2003-10-15 08:54:00

我来公布一下:用这个命令:^C^C(COMMAND "COPY" (SSGET) "" "M" );一切OK

朋友们,我们共同努力学好CAD!!

citykunan · 发表于 2003-10-15 10:22:00

to meflying: 你的程序很不错，但和我的程序在效果上有点不同。
我的程序可以看到被复制的物体在屏幕上被拖动的效果。
但你的程序真的很简捷，值得学习。

meflying · 发表于 2003-10-15 10:41:00

其实一个人的思想肯定是有限的，看看xuyigu公布的代码，这是BDYCAD版主写的，我的程序比起你的已经相当简单了，但跟这个一比，简直没法比，而且它还有拖动效果。
我写程序的时候还不知道copy本身就有这个功能，看来基础扎实了，开发起来才能得心应手

hpy · 发表于 2003-10-16 20:45:00

下面的程序虽然不是最简单的，但也能达到多重复制的目的。
(command "undefine" "copy") (princ)
(defun C:copy()
   (setq ss_get (ssget))
   (setq get_point (getpoint "\n请指定基点"))
   (command ".copy" ss_get "" "m" get_point)
   (princ)
  )

看海的疯子 · 发表于 2003-10-16 21:09:00

不是吧，我有点高原反映了。
是不是我把程序按东哥给的那样输入就可以了？？？
还有没有注意事项呢？

meflying · 发表于 2003-10-17 09:27:00

hpy发表于2003-10-16 20:45:00下面的程序虽然不是最简单的，但也能达到多重复制的目的。
  (command "undefine" "copy") (princ)
  (defun C:copy()
   (setq ss_get (ssget))
   (setq ge

其实都是把12楼的内容展开了，类似于画蛇添足。我原来也这样
而且你把COPY覆盖了，如果想用一般的COPY岂不是又要麻烦一下？

看海的疯子 · 发表于 2003-10-17 11:33:00

兴奋是我此刻唯一存在的感觉我照上面的提示,用了1个小时终于知道了在那里粘贴这个命令.用了一下真的好啊,那是从头到脚趾的爽

呵呵, 不过有一点小意见,那个地方好象只能修改工具按纽,我要是手输入命令co.它就不多重复制了.

遗憾是最美.没有遗憾就不美吗?

zeng29 · 发表于 2003-10-17 16:28:00

为什么不用Express Tools 的 copym 命令(想要的效果都有,而且带有工具按钮),非要自已动手作呢?

BDYCAD · 发表于 2003-10-17 21:41:00

因為很多大俠很聰明, 很少再看書, 喜歡多多交流, 這樣可以了解有沒有更好用的招術. 也是一件好事.

------------------------------------------------------
我愛CAD. 多多指教. 多多學CAD.

账号		自动登录	找回密码
密码			注册

[求助]CAD 多重复制 如何用一个命令按扭完成！！

本帖子中包含更多资源

[求助]CAD 多重复制如何用一个命令按扭完成！！