| 以文本方式查看主题 - Foxtable(狐表) (http://foxtable.com/bbs/index.asp) -- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2) ---- [求助] 关于字体设置 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=56548) |
| -- 作者：don -- 发布时间：2014/9/8 21:46:00 -- [求助] 关于字体设置 Dim fnt1 As New Font("颜色比它黑点",20, FontStyle.Underline ) \'Dim fnt01 As New Font("颜色比它黑点",20.5, FontStyle.Underline ) \'这个报错，不能通过！ Dim fnt2 As New Font("颜色比它淡点",20, FontStyle.Underline Or FontStyle.Bold) Dim rt As New prt.RenderText \'定义一个文本对象 Dim doc As New PrintDoc \'定义一个报表 rt = New prt.RenderText \'定义一个文本对象 rt.Text = "Hello Foxtable" \'设置文本对象的内容 rt.Style.Font = fnt1 doc.Body.Children.Add(rt) \'将文本对象加入到报表 rt = New prt.RenderText \'定义一个文本对象 rt.Text = "Hello Foxtable" \'设置文本对象的内容 rt.Style.Font = fnt2 doc.Body.Children.Add(rt) \'将文本对象加入到报表 doc.Preview() 上面代码中，打印出来的效果：Fnt1颜色稍淡，Fnt2颜色又稍黑！ （对比其它程式HTML报表文件，一样的字体，FOX专业报表打印出来颜色好似较深！） 我想在字体及大小一样时，黑色素取Fnt1和Fnt2的中间值（不太淡，也不太黑），有何办法？ [此贴子已经被作者于2014-9-8 21:55:16编辑过]
|
| -- 作者：狐狸爸爸 -- 发布时间：2014/9/9 9:46:00 -- 这个不能通过字体来设置，通过设置字体颜色来设置： http://www.foxtable.com/help/topics/1168.htm
|