[求助]如何在vb里加载和使用大字体文件

tongyu · 发表于 2006-10-30 12:43:00

哪位高手,指点一下.主要是如何在VB中使用大字体文件?如何加载?

dchlmz · 发表于 2006-10-30 13:50:00

FontsName = "C:\AutoCAD 2002\Fonts\等线体(标准).shx"
ThisDrawing.ActiveTextStyle.fontFile = FontsName

ThisDrawing.ActiveTextStyle.BigFontFile = FontsName
这样可以用，

azjmjsj · 发表于 2006-11-4 13:51:00

创建新字体AAA(111.shx,222.shx)
   Dim txtStyle As AcadTextStyle
   Set txtStyle = ThisDrawing.TextStyles.Add("AAA")
      txtStyle.fontFile = "111.shx"
      txtStyle.BigFontFile = "222.shx"
      txtStyle.Width = 1
   ThisDrawing.ActiveTextStyle = ThisDrawing.TextStyles.Add("AAA")

[求助]如何在vb里加载和使用大字体文件

发表回复

精选推荐