统一文字

szx025 · 发表于 2017-8-8 10:12:02

当前有n个文字样式，如何把除了其中一个文字样式（比如axis样式）的所有文字样式的字体文件都改为相同的型文件比如都改为TXT.SHX ,GBCBIG.SHX

xyp1964 · 发表于 2017-8-9 13:15:50

;; tt(字型统一)
(defun c:tt ()
  (foreach st (xyp-TblNext "style")
(command "-style" st "TXT,hzdx" "" "0.7" "" "" "" "")
  )
  (VLA-PurgeAll (vla-get-ActiveDocument (vlax-get-acad-object)))
  (princ)
)

fan_zh · 发表于 2017-8-9 09:24:40

1. 格式刷
2. 改样式定义
3. 刷新

qq1254582201 · 发表于 2017-9-18 19:58:20

xyp1964 发表于 2017-8-9 13:15
;; tt(字型统一)
(defun c:tt ()
(foreach st (xyp-TblNext "style")

很简洁，很迅速

账号		自动登录	找回密码
密码			注册

[提问] 统一文字