vormittag 发表于 2011-12-28 14:43:15

块替换不用这么麻烦吧?
写个简单的函数，目前不能很好的支持属性块。
(defun block2block (ename blockname / ell)
   (setq ell (entget ename))
   (setq ell (subst (cons 2 blockname) (assoc 2 ell) ell))
   (entmod ell)
   (entupd ename)
)

lizhiqiang9801 发表于 2011-12-28 16:14:03

备用收藏了

houncle 发表于 2011-12-28 19:41:55

学习了,谢谢

c735023723 发表于 2011-12-30 08:53:56

谢谢，收藏了

lidaxiu 发表于 2011-12-30 17:28:56

本帖最后由 lidaxiu 于 2011-12-30 17:41 编辑

楼主的程序有欠缺，没有计算替换后的块比例

longer1000 发表于 2012-6-15 10:39:11

要是能保持原块的比例、角度就完美了

lty 发表于 2012-8-27 16:22:52

支持楼主啊！

lish 发表于 2012-11-12 19:13:30

谢谢了！！！！！

pxt2001 发表于 2012-11-12 22:50:27

源程序就要顶起来。

wangjianyin 发表于 2019-4-10 17:55:56

感谢，各位，学习中
页: 1 [2] 3
查看完整版本: [原创]一个块替换程序