如何获得修改后的图元
如何获得修改后的图元,比如选择集选择后从交点处打断,如何获得打断后的所有图元?试试这个:
;;说明:返回某图元名后的图元名表
;;参数:en:图元名
(defun Entnext-lst (en / enlst)
(setq enlst '())
(while (setq en (entnext en))
(setq enlst (cons en enlst))
)
(if (/= (length enlst) 0)
enlst
nil
)
)
ssyfeng 发表于 2024-8-18 10:51
试试这个:
估计他不知道用。
页:
[1]