[求助]：求一个能把尺寸标注炸开后其中的文字属性变为普通文字属性的LISP程序

magiczertul

把尺寸标注炸开后，其中的文字属性和正常写入的文字属性不同，能否编一个能把尺寸标注炸开后其中的文字属性变为普通文字属性的LISP程序

xyp1964

什么作用？
最好别把尺寸标注炸开！否则再编辑就麻烦了！

icewangqing

应该 编辑的差不多了在放缩时再炸开，否则要么跟着变标注要么不好编辑

li809

期待高手出招

无痕

搜索一下，在论坛见过这样的程序

liuyj

哪有那么麻烦，标注炸开了，标注文字变成了多行文字，再炸开不就成普通文字了吗？

boy_jun

我觉得用好CAd里的标注比例可以解决这个问题

onesam1

应该 编辑的差不多。了在放缩时再炸开，否则要么跟着变标注要么不好编辑 、、？

梦断江南

炸开一次后文字好像是ｍｔｅｘｔ，再炸一次就可

2. 
   
3. (defun c:tt ()
   
4.   (princ "\n选要炸开的标注．慎重！")
   
5.   (setvar "qaflags" 1)
   
6.   (command ".explode" (ssget '((0 . "DIMENSION"))) "")
   
7.   (command ".explode" (ssget "p" '((0 . "MTEXT"))) "")
   
8.   (princ)
   
9. )

<br /> (defun c:tt ()<br />   (princ "\n选要炸开的标注．慎重！")<br />   (setvar "qaflags" 1)<br />   (command ".explode" (ssget '((0 . "DIMENSION"))) "")<br />   (command ".explode" (ssget "p" '((0 . "MTEXT"))) "")<br />   (princ)<br /> )