Foxtable(狐表) → 用户栏目 → 专家坐堂 → 专业报表设置页眉首页不显示


  共有2714人关注过本帖树形打印复制链接

主题：专业报表设置页眉首页不显示
帅哥哟，离线，有人找我吗？
yifan3429
 小大  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：九尾狐 帖子：2482 积分：22932 威望：0 精华：0 注册：2011/3/29 17:14:00 		专业报表设置页眉首页不显示  发帖心情 Post By：2021/3/13 14:53:00 [只看该作者]

'设置页眉
rt = New prt.RenderText '设置文本对象的内容
rt.Text = "第[PageNo]页,共[PageCount]页" '设置文本内容
rt.Style.TextAlignHorz = prt.AlignHorzEnum.Right '靠右对齐
rt.Style.Borders.Bottom = New prt.LineDef(0.3, Color.Green) '设置底边框
rt.Style.Padding.Bottom = 0.5 '底端内容缩进0.5毫米
rt.Style.FontSize = 8 '字体大小为8磅
Doc.PageHeader = rt '作为页眉使用
doc.Preview() '预览


第一页是标题页 不想显示怎么控制
 回到顶部
帅哥哟，离线，有人找我吗？
有点蓝
 小大  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：超级版主 帖子：110450 积分：562116 威望：0 精华：9 注册：2015/6/24 9:21:00 		  发帖心情 Post By：2021/3/13 16:10:00 [只看该作者]

分开打开，先调用代码打印标题，再调用代码处理正文

 回到顶部
帅哥哟，离线，有人找我吗？
yifan3429
 小大  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：九尾狐 帖子：2482 积分：22932 威望：0 精华：0 注册：2011/3/29 17:14:00 		  发帖心情 Post By：2021/3/13 18:28:00 [只看该作者]

没明白，
有实例吗

[此贴子已经被作者于2021/3/13 18:29:57编辑过]
 回到顶部
帅哥哟，离线，有人找我吗？
有点蓝
 小大  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：超级版主 帖子：110450 积分：562116 威望：0 精华：9 注册：2015/6/24 9:21:00 		  发帖心情 Post By：2021/3/14 20:12:00 [只看该作者]

就把标题和内容分开2段代码
 
Dim doc As New PrintDoc 
Dim rt As New prt.RenderText 
rt.Text = "我是标题" 
doc.Body.Children.Add(rt) 
doc.print() '预览

doc = New PrintDoc 
rt= New prt.RenderText 
rt.Text = "我是内容" 
doc.Body.Children.Add(rt) 
'设置页眉
rt = New prt.RenderText '设置文本对象的内容
rt.Text = "第[PageNo]页,共[PageCount]页" '设置文本内容
rt.Style.TextAlignHorz = prt.AlignHorzEnum.Right '靠右对齐
rt.Style.Borders.Bottom = New prt.LineDef(0.3, Color.Green) '设置底边框
rt.Style.Padding.Bottom = 0.5 '底端内容缩进0.5毫米
rt.Style.FontSize = 8 '字体大小为8磅
Doc.PageHeader = rt '作为页眉使用
doc.print() '预览
 回到顶部
RSS2.0 | Xhtml无图版 | Xslt无图版 Copyright © 2000 - 2018 foxtable.com Tel: 4000-810-820 粤ICP备11091905号
   Powered By Dvbbs Version 8.3.0
页面执行时间 0.04590 秒, 4 次数据查询