[建议]：如果天正能有“文字式样”替换功能该多好

leeou

由于多次从旧图或别人的图纸上多次复制粘贴详图和说明，使文字式样变成很多种了，这样使图纸交流变成很不方便，如果天正能有“文字式样”替换的功能就好了。

boy_tian

敲入“wzys”即可设置。建议purge一下，将没有用的字体清楚掉

设计者

楼上的，我按你说的敲入“WZYS“后不能用！！是不是要加载什么程序？？

boy_tian

我敲可以啊，而且我没有修改过快捷键。或者如图用鼠标操作吧，呵呵~~~

guan-c

我按你说的敲入“WZYS“后不能用！！是不是要加载什么程序？？

aiyins

真的不能用哦！你说的是什么版本？

leeou

用这个方法还是得一个一个地去替换，还有更好的方法吗？一份图纸有三至五个文字样式就够了。可现在已经有二十多个了。

陌生人

现编，友情赠送一个：

2. 
   
3. (defun c:sty ()
   
4. (princ "\n字型替换")
   
5.   (setq  e (entsel "\n选择字型参照母体:")
   
6.             e7 (assoc 7 (entget (car e)))
   
7.             i 0)
   
8.   (princ "\n选择要改变的文字(回车全选)")
   
9.   (or (setq ss (ssget  '((0 . "text"))))
   
10.        (setq ss (ssget  "x"  '((0 . "text"))))
    
11.   )
    
12.   (repeat (sslength ss)
    
13.     (setq ee (ssname ss i)
    
14.              el (entget ee)
    
15.              el (subst e7 (assoc 7 el) el)
    
16.              i (+ 1 i)
    
17.     )
    
18.     (entmod el)
    
19.   )
    
20.   (princ)
    
21. )
    
22. 
    

<br /> (defun c:sty ()<br /> (princ "\n字型替换")<br />   (setq  e (entsel "\n选择字型参照母体:")<br />             e7 (assoc 7 (entget (car e)))<br />             i 0)<br />   (princ "\n选择要改变的文字(回车全选)")<br />   (or (setq ss (ssget  '((0 . "text"))))<br />        (setq ss (ssget  "x"  '((0 . "text"))))<br />   )<br />   (repeat (sslength ss)<br />     (setq ee (ssname ss i)<br />              el (entget ee)<br />              el (subst e7 (assoc 7 el) el)<br />              i (+ 1 i)<br />     )<br />     (entmod el)<br />   )<br />   (princ)<br /> )<br /> <br />

天外飞馅

1关闭其他图层，仅留下文本层，2选中需要统一字高、样式的文本，CTRL+1，修改为想要的样式和字高即可

yhy

最初由 aiyins 发布
[B]真的不能用哦！你说的是什么版本？ [/B]

天正5.x的任何一个版本都有此命令

mouwei

其实只要关闭其他图层，仅留下文本层，用格式刷就可以解决。

陌生人

不是每个人作图都这么规范的，有时是拿别人的图》。。。。

qi7925

是啊，我也希望能这样！