以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  这种带下划线和不带下划线的混在一起,用专业报表,怎么实现?  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=185006)

--  作者:xxfoxtable
--  发布时间:2023/1/30 9:48:00
--  这种带下划线和不带下划线的混在一起,用专业报表,怎么实现?

图片点击可在新窗口打开查看此主题相关图片如下:1.png
图片点击可在新窗口打开查看
[此贴子已经被作者于2023/1/30 9:48:05编辑过]

--  作者:有点蓝
--  发布时间:2023/1/30 9:49:00
--  
参考:http://www.foxtable.com/webhelp/topics/1183.htm
--  作者:xxfoxtable
--  发布时间:2023/1/30 10:08:00
--  

图片点击可在新窗口打开查看此主题相关图片如下:2.png
图片点击可在新窗口打开查看

--  作者:有点蓝
--  发布时间:2023/1/30 10:19:00
--  
http://www.foxtable.com/webhelp/topics/0494.htm
--  作者:xxfoxtable
--  发布时间:2023/1/30 10:51:00
--  
能给段落整体设置字体大小吗?
--  作者:有点蓝
--  发布时间:2023/1/30 10:57:00
--  
不能的。必须每个文本都设置。
--  作者:xxfoxtable
--  发布时间:2023/1/30 11:22:00
--  
能写一个例子吗?有下划线和字体大小同时都有语句
--  作者:有点蓝
--  发布时间:2023/1/30 11:23:00
--  

关于字体

普通用户可以跳过本节内容。

字体的类型为Font,定义一个字体的语法为:

Dim 变量名 As New Font(Name, Size, Style)

Name:  字体名称。
Size:  字体大小,单位为磅。
Style: 可选参数,字体样式,FontStyle型枚举。

下面是FontStyle型枚举的可选值:

Bold:      加粗。
Italic:    倾斜。
Regular:   普通。
Strikeout: 中间有直线通过。
Underline: 带下划线。

例如定义一个黑体、大小为12磅、带下划线的字体:

Dim fnt As New Font("黑体",12,FontStyle.Underline)

样式可以用Or运算符叠加,例如定义一个宋体、大小为12磅、加粗且带下划线的字体:

Dim fnt As New Font("宋体",12,FontStyle.Bold or FontStyle.Underline)


--  作者:xxfoxtable
--  发布时间:2023/1/30 11:50:00
--  
这个我知道,在段落里不会用
--  作者:有点蓝
--  发布时间:2023/1/30 11:52:00
--  

RenderText对象用于打印文本,该对象中的文本格式是统一的,不能分别设置。
RenderParagraph类型专门用于打印成段文本,而且段落中的文本格式可以不同,甚至可以图文混排。
我们先在命令窗口执行下面的代码,看看RenderParagraph的不同,然后我们再具体说明RenderParagraph。

Dim doc As New PrintDoc \'定义一个报表
Dim
 rpar As New prt.RenderParagraph() \'定义一个段落对象

例如定义一个黑体、大小为12磅、带下划线的字体:

Dim f As New Font("黑体",12,FontStyle.Underline)

rpar.Content.AddText("这是一个段落. 现在是正常文本. ")
rpar.Content.AddText("现在的文本是加粗的. ", f)