明经CAD社区

 找回密码
 注册

QQ登录

只需一步,快速开始

搜索
查看: 2860|回复: 5

批量修改文字字高:支持TEXT和MTEXT两种格式

[复制链接]
发表于 2006-9-11 16:52:00 | 显示全部楼层 |阅读模式

可以修改TEXT文本,也可以修改MTEXT文本。有些网站中,只可以修改TEXT文本
(defun c:chth( / a ns ts n index b1 b2 c c1 c2 d)
(setq a (ssget))
(setq ts (getdist "\nEnter new text size:"))
(setq n (sslength a))
(setq index 0)
(repeat n
(setq b1 (entget (ssname a index)))
(setq index (+ index 1))
(setq c1 (assoc 0 b1))
(setq c2 (cdr c1))
(if (or (= c2 "MTEXT") (= c2 "TEXT"))
................

全文 请查看
http://hi.baidu.com/ywxsh/blog/index/1


还有很多图层管理程序
改变某图层的随层颜色
关闭某些图层
只显示当前层
显示选择的图层,关闭其它为选择的图层
显示选择的图层,关闭其它图层
打开所有图层
获取图层颜色

发表于 2008-7-18 08:24:00 | 显示全部楼层
上当,没源码
发表于 2008-7-18 15:54:00 | 显示全部楼层
提示: 作者被禁止或删除 内容自动屏蔽
发表于 2008-7-18 17:24:00 | 显示全部楼层
提示: 作者被禁止或删除 内容自动屏蔽
发表于 2008-7-18 18:39:00 | 显示全部楼层
用“选择易”,选中后,直接修改。
发表于 2008-7-18 21:03:00 | 显示全部楼层
scaletext命令试试看
您需要登录后才可以回帖 登录 | 注册

本版积分规则

小黑屋|手机版|CAD论坛|CAD教程|CAD下载|联系我们|关于明经|明经通道 ( 粤ICP备05003914号 )  
©2000-2023 明经通道 版权所有 本站代码,在未取得本站及作者授权的情况下,不得用于商业用途

GMT+8, 2025-9-21 04:20 , Processed in 0.197436 second(s), 26 queries , Gzip On.

Powered by Discuz! X3.4

Copyright © 2001-2021, Tencent Cloud.

快速回复 返回顶部 返回列表