tssd2015的文字刷命令不能用了，网上找了个cad插件，不能框选文字，高手帮忙看下

tssd2015的文字刷命令不能用了，网上找了个cad插件，不能框选文字，高手帮忙看下，如何修改使其能够框选，谢谢！ *********************************************************** (defun c:w (/ txt1 txt2 ent) ;;;文字刷，将文字内容改成源文字内容 (setq ent (car (entsel "\n选择源文字："))) (setq txt1 (entget ent)) (setq txt1 (cdr (assoc 1 txt1))) (while t (setq ent (car (entsel "\n选择目标文字："))) (setq ent (entget ent)) (setq ent (subst (cons 1 txt1) (assoc 1 ent) ent) ) (entmod ent) ) )

• 0人已收藏

• 0人已打赏

  免费
• 0人已点赞

• 分享

  复制链接 新浪微博 微信扫一扫