wangbo213 发表于 2008-8-18 16:58:00

字体问题

<p>(vl-load-com)<br/>(setq acadobject (vlax-get-acad-object))<br/>(setq acaddocument (vla-get-ActiveDocument acadobject))<br/>(setq textstyle1 (vla-get-TextStyles acaddocument))<br/>(setq textstyel2 (vla-add textstyle1 "NT"))<br/>(vla-put-Width textstyle2 0.7)<br/>(vla-put-fontfile textstyel2 "gbenor.shx,hztxt.shx")</p><p>最后一句执行有问题,高手指点一下吧</p><p>谢谢了</p>

caoyin 发表于 2008-8-18 17:09:00

(vla-put-fontfile textstyel2 "gbenor.shx")<br/>(vla-put-bigfontfile textstyel2 "hztxt.shx")
页: [1]
查看完整版本: 字体问题