CASS中高程样式的修改

zhangminmin

    请教在CASS中，图上的高程样式一些事HZ，一些是BG-ST，请问怎样统一成一样的，拜托各位贴友了

heart

特性-文字-字体样式-HZ
这样就可以统改了

zhb236623

1. (defun c:gzy ()   ;;by zhb
   
2. (setq ss (ssget '((0 . "*text"))))
   
3. (setq i 0)
   
4. (repeat (sslength ss)
   
5. (setq ssn (ssname ss i)
   
6. endata (entget ssn)
   
7. endata (subst (cons 7 "仿宋体") (assoc 7 endata) endata)
   
8. i (1+ i)
   
9. )
   
10. (entmod endata)
    
11. 
    
12. )
    
13. ) ;end defun

复制代码

把这个程序拿去吧。或者下载附件在CAD命令里面APPLOAD加载后再在命令行里面输入GZY，然后全选高程文字就可以了。之前要先打散高程，不过如果没打散你也看不到它的字体样式。



楼上的要加上这几步：
楼上的要用到快速选择  对象类型：文字  特性：图层    运算符：＝    值：GCD   选中后再操作。。


如要改成HZ   只要在程序中把   仿宋体改成HZ

zhb236623

heart 发表于 2012-4-25 19:12
特性-文字-字体样式-HZ
这样就可以统改了

楼上的要用到快速选择  对象类型：文字  特性：图层    运算符：＝    值：GCD   选中后再操作。。

wjabu

学习了  谢谢

111111

liwp5200

666666666666666666