字体设置
Style有一个子属性Font,用于设置对象字体。
示例一
Dim
doc
As New PrintDoc
'定义一个报表
Dim rt As
New prt.RenderText '定义一个文本对象
rt.Text = "Hello Foxtable"
'设置文本对象的内容
rt.Style.TextAlignHorz = prt.AlignHorzEnum.Center
'水平居中
rt.Style.Font = New Font("宋体",
16, FontStyle.Bold)
'设置字体
doc.Body.Children.Add(rt) '将文本对象加入到报表
doc.Preview() '预览
执行结果:
字体设置是报表设计中一个经常性的工作,为了减轻用户的编码工作量,我们特地为Style属性提供了以下子属性,用于快捷地设置字体
属性名称 |
属性说明 |
FontName |
字体名称 |
FontSize |
字体大小 |
FontBold |
逻辑型,字体是否加粗 |
FontItalic |
逻辑型,字体是否倾斜 |
FontStrikeout |
逻辑型,是否有删除线 |
FontUnderline |
逻辑型,是否有下划线 |
示例二
Dim
doc
As New PrintDoc
'定义一个报表
Dim rt As
New prt.RenderText '定义一个文本对象
rt.Text = "Hello Foxtable"
'设置文本对象的内容
rt.Style.FontBold = True
'字体加粗
rt.Style.FontSize = 16
'字体大小为16磅
doc.Body.Children.Add(rt) '将文本对象加入到报表
doc.Preview() '预览
本页地址:http://www.foxtable.com/webhelp/topics/1179.htm