[求助] [求助]请教高手,判断字体样式为何出错?

[复制链接]

userzhluserzhl

发表于 2009-3-26 11:54:11 | 显示全部楼层 |阅读模式

【广而告之】积分规则、D豆获取攻略 窝窝空间装扮攻略

马上注册，结交更多好友，享用更多功能，让你轻松玩转社区。

您需要登录才可以下载或查看，没有账号？立即注册

(If (= (cdr (assoc 3 (tblsearch "style" "_hztxt"))) "_txt.shx")
(nil
   (SetQ STYLE (EntMakeX '((0 . "STYLE")(100 . "AcDbSymbolTableRecord")(100 . "AcDbTextStyleTableRecord")
                           (2 . "_HZTXT") (70 . 0) (40 . 0.0) (41 . 0.75) (50 . 0.0) (71 . 0) (42 . 0.0) (3 . "_txt.shx") (4 . "hztxt.shx"))
               )
   )
   (SetQ STYLE (TblObjName "STYLE" "_HZTXT"))
)
)
我的文字样式"_hztxt"是一个大字体:"_txt.shx,_hztxt.shx",想判断是否更改了(例如:"txt.shx,_hztxt.shx"),如果/="_txt.shx,_hztxt.shx"的话,把它改成:"_txt.shx,_hztxt.shx".

(/ = (cdr (assoc 3 (tblsearch "style" "_hztxt"))) "_txt.shx")

也不行,不知如何判断?

hztxt, shx, style