Guest athabe 发表于 2022-7-6 08:50:07

图纸和模型空间

我正在寻找以下步骤的lisp例程：
*从模型移动到图纸空间
*从模型复制到图纸空间
*从图纸移动到模型空间
*从图纸复制到模型空间
 
所有关于Lisp程序天才的问候

ReMark 发表于 2022-7-6 08:58:39

CHSPACE命令不会处理四个中的两个吗？

alanjt 发表于 2022-7-6 09:08:50

同意，这应考虑其他两个：
 
(defun c:CHSpaceCopy (/ ss2 ss i)
(vl-load-com)
(if (setq ss2 (ssadd)
         ss(ssget "_:L")
   )
   (progn
   (repeat (setq i (sslength ss))
       (ssadd
         (vlax-vla-object->ename (vla-copy (vlax-ename->vla-object (ssname ss (setq i (1- i))))))
         ss2
       )
   )
   (vl-cmdf "_.chspace" ss2 "")
   )
)
(princ)
)

Guest athabe 发表于 2022-7-6 09:13:44

它起作用了
 
谢谢；）

alanjt 发表于 2022-7-6 09:24:05

不客气。

SLW210 发表于 2022-7-6 09:33:25

迁移到适当的论坛。

alanjt 发表于 2022-7-6 09:36:32

哈哈，你知道，我不得不把线程挖回来，使用我昨天晚些时候发布的代码。

Guest athabe 发表于 2022-7-6 09:49:33

这是一个很好的代码，我感谢你和所有想要帮助的人。
 
我刚刚加入了这个网站，我有一个想法，当问题发布后，它会自动过滤到正确的（指定）部门。
 
所有的想法都是分享知识和互相帮助。
 
我希望大家今天过得愉快。
 
阿萨贝·安娜
Autocad和Microstaion用户

SLW210 发表于 2022-7-6 09:51:42

 
你应该已经阅读了新会员信息，我该如何发帖？
 
我从未见过一个论坛“会自动过滤到正确的（指定的）部门”。
页: [1]
查看完整版本: 图纸和模型空间