win7系统LISP生成宋体样式后如何改变字高、比例的疑问
win7 系统自带宋体样式后缀是 .TTC,可CAD只认.TTF，因此在本论坛中有找到一个办法，但不知道如何在创建文字样式的时候增加改变字高、比例，请各位帮帮啊，谢谢啦http://bbs.mjtd.com/forum.php?mod=viewthread&tid=99969&highlight=%CE%C4%D7%D6%D1%F9%CA%BD
这是找到的方法，但没有设置字高、比例等，请各位前辈指导下
关注一下，也想知道如何设为当前 本帖最后由 ssyfeng 于 2018-11-14 11:37 编辑
看看是不是这样：
(defun asdf ( / obj )
(setq obj (vla-add (vla-get-TextStyles (vla-get-ActiveDocument (vlax-get-acad-object))) "asdf"))
(vla-setFont obj "宋体" :vlax-false :vlax-false 134 2)
(vla-put-Height obj 8);;;设置字高
(vla-put-Width obj 0.75);;设置宽度因子
(vla-put-ActiveTextStyle (vla-get-ActiveDocument (vlax-get-acad-object)) obj);;设置为当前字体样式
)
ssyfeng 发表于 2018-11-14 10:16
看看是不是这样：
可以了，谢谢啦:handshake:handshake:handshake
页:
[1]