只需一步,快速开始
我有个图纸,里面有1000多个圆的标志,我想把圆变成十字叉,怎么弄,原来学过,很长时间不用了,忘了,请高手解答。
使用道具 举报
(setq ss (ssget "X" ''((0 . "circle"))))
(setq n (sslength ss) i 0)
(while (< i n)
(setq pt (cdr (assoc 10 (entget (ssname ss i))))) ;pt 就是圆心坐标
;十字叉就不用多说了吧?
;"(entmake ……)"
(setq i (1+ i))
)
本版积分规则 发表回复 回帖后跳转到最后一页
小黑屋|手机版|CAD论坛|CAD教程|CAD下载|联系我们|关于明经|明经通道 ( 粤ICP备05003914号 ) ©2000-2023 明经通道 版权所有 本站代码,在未取得本站及作者授权的情况下,不得用于商业用途
GMT+8, 2024-11-25 23:31 , Processed in 0.187026 second(s), 29 queries , Gzip On.
Powered by Discuz! X3.4
Copyright © 2001-2021, Tencent Cloud.