求教！如何获得复制后的选择集

xxyyzzlg

有些函数还没接触，我是这么处理的
(setq ss1 (ssadd))
      (setq i 0)
      (repeat (sslength ss)
        (setq ent (ssname ss i))
        (command "._copy" ent "" pt1 pt2)
        (ssadd (entlast) ss1)
        (setq i (1+ i))
      );end_repeat

xiaocainiao

xxyyzzlg 发表于 2024-8-20 23:29
有些函数还没接触，我是这么处理的
(setq ss1 (ssadd))
      (setq i 0)

谢谢！我之前也是这种方法、不过这种方法有个问题、就是会造成原来关联的图形取消关联

xxyyzzlg

xiaocainiao 发表于 2024-8-21 08:42
谢谢！我之前也是这种方法、不过这种方法有个问题、就是会造成原来关联的图形取消关联

好的，没注意到这点

masterlong

还有一种方法
重定义copy命令
复制对象ss先移动再反向复制
这样ss还是原来的ss   

xiaocainiao

masterlong 发表于 2024-8-21 11:50
还有一种方法
重定义copy命令
复制对象ss先移动再反向复制

这个就有点看不懂了

lijiao

2. (setq b (vla-copy a))

(setq b (vla-copy a))

b就是复制后的对象,不用进行其它处理

xiaocainiao

lijiao 发表于 2024-8-21 13:44
b就是复制后的对象,不用进行其它处理

这个只能是单独的对象、选择集不行吧、如果配合循环、貌似会丢失图形的关联性

lijiao

什么关联性?没有听说过,好像很高大上

kozmosovia

lijiao 发表于 2024-8-21 14:44
什么关联性?没有听说过,好像很高大上

比如尺寸和物体，或者字段和物体。
比如一个圆和半径的字段，一起复制的话，新的字段会自动关联新的圆，单独分开复制，关联的还是旧的圆。保持关联相当于需要DeepClone

你有种再说一遍

xiaocainiao 发表于 2024-8-21 13:46
这个只能是单独的对象、选择集不行吧、如果配合循环、貌似会丢失图形的关联性

命令一起复制的就行了....然后一路entnext
不过还是c#我都写完了,连lisp也写了

https://www.cnblogs.com/JJBox/p/10713005.html#_label1