请教com方式创建一个新的文字样式，想使用华文楷体， 为什么创建结果中的字体是@华...

elepeipei

如题请教下， com方式创建一个新的文字样式，想使用华文楷体， 我写的路径是"C:\Windows\Fonts\STKAITI.TTF"，
但是创建完后打开CAD看到的文字样式中字体是@华文楷体，导致写的文字都是字头向左了， 请问有没有小伙伴遇到过这样的问题 ，是怎么解决的

嘒彼小星

(command ;|命令|;"_.-STYLE";|样式名|;"宋体321";|TTF或SHX|;"宋体";|高度|;"0";|比例|;"1";|倾斜？|; "0";|反向?|;"N";|颠倒?|;"N";|垂直?|;"N")

elepeipei

嘒彼小星 发表于 2023-8-6 17:45
(command ;|命令|;"_.-STYLE";|样式名|;"宋体321";|TTF或SHX|;"宋体";|高度|;"0";|比例|;"1";|倾斜？|; "0" ...

谢谢回复, 请问这是lisp语言吗, 我还不会,现在想用的是c#语言

elepeipei

再验证发现, 我用的是添加‪C:\Windows\Fonts\STKAITI.TTF,结果dwg文件中显示的字体就是STKAITI,不是华文楷体, 也不知道是哪里出了问题

d1742647821

com去activex区问，这是.net区，捣乱来的？

guohq

使用VLISP测试了一下，思路与AutoCAD COM方法相同

1. (setq Cad (vlax-get-acad-object))
   
2. (setq Doc (vla-get-activedocument Cad))
   
3. (setq TextStyles (vla-get-TextStyles  Doc))
   
4. (setq NewStyle (vla-Add TextStyles "T1"))
   
5. (vla-put-FontFile NewStyle "c:\\windows\\fonts\\STKAITI.TTF")
   
6. (vla-regen Doc)

(setq Cad (vlax-get-acad-object))<br /> (setq Doc (vla-get-activedocument Cad))<br /> (setq TextStyles (vla-get-TextStyles  Doc))<br /> (setq NewStyle (vla-Add TextStyles "T1"))<br /> (vla-put-FontFile NewStyle "c:\\windows\\fonts\\STKAITI.TTF")<br /> (vla-regen Doc)

elepeipei

d1742647821 发表于 2023-8-7 09:33
com去activex区问，这是.net区，捣乱来的？

谢谢提醒, 我用net比较多, 这次问错地方了,不好意思

elepeipei

guohq 发表于 2023-8-7 09:41
使用VLISP测试了一下，思路与AutoCAD COM方法相同

谢谢大神, 也有大神用vba测试是正常的, 我也不知道我这差哪了