社区
Delphi
帖子详情
怎样才能使报表的Title(表的标题)在每一页打印都出现?
stefanchow
2003-08-20 04:34:12
怎样才能使报表的Title(表的标题)在每一页打印都出现?
...全文
238
6
打赏
收藏
怎样才能使报表的Title(表的标题)在每一页打印都出现?
怎样才能使报表的Title(表的标题)在每一页打印都出现?
复制链接
扫一扫
分享
转发到动态
举报
写回复
配置赞助广告
用AI写文章
6 条
回复
切换为时间正序
请发表友善的回复…
发表回复
打赏红包
belllab
2003-08-20
打赏
举报
回复
有一个选项,是决定是否是第一页打印页头及在最后页打印页脚
stefanchow
2003-08-20
打赏
举报
回复
我试过,可第一页还是不能显示标题,其他页有!
lishen
2003-08-20
打赏
举报
回复
将你需要的title放入PageHeaderBand
wzf54
2003-08-20
打赏
举报
回复
up
WWWWA
2003-08-20
打赏
举报
回复
用什么报表控件?如用QR,将TITIL改为PAGEHEADER
WWWWA
2003-08-20
打赏
举报
回复
用什么报表控件?如用QR,将TITIL改为PAGEHEADER
RePrint
表
格
打印
轻松做
报
表
打印
datasource,dbgrid,string
reprint 使用说明 直接从datasource,dbgrid,stringgrid导入数据, 只需简单设置,不用手工制作,即可生成您需要的
报
表
,具有预览功能。即可自定义纸张,又可适应
打印
机默认纸张。各种
打印
设置,功能更强大。 一 、控件属性: 1、cols
title
设置
报
表
的列
标题
属性 (1)alignment 列
标题
对齐方式。 (2)font 列
标题
字体 (3)print 设置是否
打印
列
标题
(4)rowspace 列
标题
行的高度 2、datasource 选择要
打印
的datasource 3、dbgrid 选择要
打印
的dbgrid 4、stringgrid 选择要
打印
的stringgrid 5、detail 设置要
打印
的明细数据属性 (1)arrange 设置明细字段排列方向 Horizontal 横向
打印
(默认的一般
打印
) Vertical 竖向
打印
(字段竖向排列适合
打印
字段内容较长的
报
表
如“会议纪录”) (2)aotureturn
打印
明细字段时,如果字段超过列的宽度是否允许自动换行 (3)colsline 设置竖线属性引用tpen类 (4)footer 设置明细尾 (5)frame 设置明细边框属性引用tpen类 (6)head 设置明细头同footer (7)rowsline 设置横线属性引用tpen类 (8)rowspace 设置明细行的高度 (9)top 明细与
标题
的距离 6、page 设置纸张的上下左右边距 7、pagefooter 设置页脚同明细尾 8、pageheader 设置页眉同页脚 9、printobject 选择要
打印
的对象 (datasource 、dbgrid、 stringgrid ) 10、
title
设置
标题
类页眉、页脚 二 、控件方法: (1) preview 预览 (2) print
打印
(3) SaveToFile() 保存为
报
表
文件 (4) SaveToStream() 保存为流(然后就可把整个
报
表
存到数据库了很方便哦! ~_~) (5) PrintFile()
打印
报
表
文件 (6) PrintStream()
打印
流(流的数据库存取就不用多说了吧) (7) PreviewFile() 预览文件 (8) PreviewStream() 预览流 (9) OptionToStream()
报
表
的属性保存为流 (10) OptionFromStream() 从流中得到
报
表
属性 三、 控件事件: AfterPrint
打印
后 BeforePrint
打印
前 (本来很多事件,但没有预览,后来加上预览以及一些方法后实现很困难就去掉了!) 四、注意事项 (1) text 属性,输入“¦;#¦;”
打印
页码值,如果想
打印
页码可输入“第¦;#¦;页” 输入¦;RecordCount¦;”
打印
记录数 (2) 不同的
打印
机,
打印
和预览效果可能有一点点不同(保证数据
打印
完全正确一致)。本人用一台针式和一台激光
打印
机做测试,开始差别较大后经过调试基本一致,不知其他
打印
机如何。 就这些个吧基本满足了我的软件开发需要,解决了很多问题,关键是做
报
表
省了很大力气,当然了很复杂的
报
表
还是要其它
报
表
控件来解决。如果有其他问题或好的建议可与我联系。 程序设计:吴进昊 E-mail :jinhaowu@hotmail.com qq :54254770 2003.01.03 新增明细栏的左右对齐. 纸张类型、
打印
方向设置!
标题
的每页
打印
设置。 列
标题
的每页,每行
打印
设置。 修改了
打印
时的错误!
表
格
打印
控件,轻松做
报
表
(可
打印
datasource,dbgrid,string
reprint 使用说明 直接从datasource,dbgrid,stringgrid导入数据, 只需简单设置,不用手工制作,即可生成您需要的
报
表
,具有预览功能。即可自定义纸张,又可适应
打印
机默认纸张。各种
打印
设置,功能更强大。 一 、控件属性: 1、cols
title
设置
报
表
的列
标题
属性 (1)alignment 列
标题
对齐方式。 (2)font 列
标题
字体 (3)print 设置是否
打印
列
标题
(4)rowspace 列
标题
行的高度 2、datasource 选择要
打印
的datasource 3、dbgrid 选择要
打印
的dbgrid 4、stringgrid 选择要
打印
的stringgrid 5、detail 设置要
打印
的明细数据属性 (1)arrange 设置明细字段排列方向 Horizontal 横向
打印
(默认的一般
打印
) Vertical 竖向
打印
(字段竖向排列适合
打印
字段内容较长的
报
表
如“会议纪录”) (2)aotureturn
打印
明细字段时,如果字段超过列的宽度是否允许自动换行 (3)colsline 设置竖线属性引用tpen类 (4)footer 设置明细尾 (5)frame 设置明细边框属性引用tpen类 (6)head 设置明细头同footer (7)rowsline 设置横线属性引用tpen类 (8)rowspace 设置明细行的高度 (9)top 明细与
标题
的距离 6、page 设置纸张的上下左右边距 7、pagefooter 设置页脚同明细尾 8、pageheader 设置页眉同页脚 9、printobject 选择要
打印
的对象 (datasource 、dbgrid、 stringgrid ) 10、
title
设置
标题
类页眉、页脚 二 、控件方法: (1) preview 预览 (2) print
打印
(3) SaveToFile() 保存为
报
表
文件 (4) SaveToStream() 保存为流(然后就可把整个
报
表
存到数据库了很方便哦! ~_~) (5) PrintFile()
打印
报
表
文件 (6) PrintStream()
打印
流(流的数据库存取就不用多说了吧) (7) PreviewFile() 预览文件 (8) PreviewStream() 预览流 (9) OptionToStream()
报
表
的属性保存为流 (10) OptionFromStream() 从流中得到
报
表
属性 三、 控件事件: AfterPrint
打印
后 BeforePrint
打印
前 (本来很多事件,但没有预览,后来加上预览以及一些方法后实现很困难就去掉了!) 四、注意事项 (1) text 属性,输入“¦;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;#¦;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;”
打印
页码值,如果想
打印
页码可输入“第¦;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;#¦;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;页” 输入“¦;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;RecordCount¦;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;”
打印
记录数 (2) 不同的
打印
机,
打印
和预览效果可能有一点点不同(保证数据
打印
完全正确一致)。本人用一台针式和一台激光
打印
机做测试,开始差别较大后经过调试基本一致,不知其他
打印
机如何。 就这些个吧基本满足了我的软件开发需要,解决了很多问题,关键是做
报
表
省了很大力气,当然了很复杂的
报
表
还是要其它
报
表
控件来解决。如果有其他问题或好的建议可与我联系。 程序设计:吴进昊
Layer弹窗入门(下)
内置方法 config全局设置 ready就绪 open核心方法 alert弹框 confirm询问 msg提示 load加载 tips吸附 close关闭层 closeAll关闭全部 style
title
重置
标题
getChildFrame getFrameIndex iframeAuto iframeSrc setTop...
C# 下的自由
打印
,不使用水晶
报
表
,实现列
表
式的
打印
。
不使用水晶
报
表
,实现列
表
式的
打印
。 刚学C# 1个月时写的,如果污染了视听,请见谅。 struct PageProperty { public int PageLeft; public int PageTop; public int PageBottom; public int PageWidth; public int PageHeight; public int RowSpace; public int ColSpace; public int AllVisibleColSpace; public int AllColWidth; public int AllVisibleColWidth; public int AllRowHeight; public int
Title
H; public int Sub
Title
H; public int FooterH; public int[] ColWidth; public int VisibleColWidth; public int PageTextHeight; public int PageTextWidth; } struct TRect { public int Left; public int Top; public int Right; public int Bottom; } class PanelImage : Panel { protected Panel panelShadow = null; public PictureBox ImgData = null; public PanelImage() { this.BackColor = Color.Gray; this.DoubleBuffered = true; ImgData = new PictureBox(); ImgData.Parent = this; ImgData.BackColor = Color.White; panelShadow = new Panel(); panelShadow.Parent = this; panelShadow.BackColor = Color.Black; ResizeControl(); } void ResizeControl() { panelShadow.Left = 8; panelShadow.Top = 8; panelShadow.Width = this.Width - 12; panelShadow.Height = this.Height - 12; ImgData.Left = 4; ImgData.Top = 4; ImgData.Width = this.Width - 12; ImgData.Height = this.Height - 12; } protected override void OnResize(EventArgs eventargs) { ResizeControl(); base.OnResize(eventargs); } protected override void Dispose(bool disposing) { panelShadow.Dispose(); ImgData.Dispose(); base.Dispose(disposing); } } public partial class PrintGrid { [DllImport("gdi32.dll", EntryPoint = "GetDeviceCaps", CallingConvention = CallingConvention.StdCall)] public static extern int GetDeviceCaps(int Handle, int nIndex); private float _leftMargin = 0; private float _topMargin = 0; private float _rightMargin = 0; private float _bottomMargin = 0; const short HORZSIZE = 4; const short VERTSIZE = 6; const short HORZRES = 8; const short VERTRES = 10; const short PHYSICALOFFSETX = 112; const short PHYSICALOFFSETY = 113; int ixLogPixPerInch; int iyLogPixPerInch; int xLogPixPerInch; int yLogPixPerInch; int FPageIndex; int FPageCount; string FLeftPageFooter; string FRightPageFooter; string F
Title
; Font FFont; Font F
Title
Font; Font FTextFont; Font FFooterFont; Font FSub
Title
Font; int FSub
Title
Off; int FLeftPageFooterOff; int FPrintCount; string FSub
Title
; bool FHLine; bool FVLine; int FPageTop; int FPageLeft; int FPageRight; int FPageBottom; int FToPage; int FFromPage; bool FPrintPageCount; string FRightSub
Title
; bool FExistPrinter; bool FCenterShow; Color FHeaderColor; bool FUseHeaderColor; private int iDX; //水平缩放比例 private int iDY; //垂直缩放比例 private int ColCount; //总列数 private int RowCount; //总行数 private int[] ColWidth; //记录每一列的宽度 private int AllColWidth; //所有列的宽度 private int AllVisibleColWidth; //所有可视列的宽度 private int RowSpace; //行间距 private int ColSpace; //所有可视列间距 private int AllVisibleColSpace; //所有行的间距 private int AllColSpace; //所有列的间距 private int AllRowSpace; //所有行的间距 private int RowsOfPage; //每页打的行数 private int PageWidth; //页的宽度 private int PageHeight; //页的高度 private int PageTextHeight; //页正文高度 private int PageTextWidth; //页正文宽度 private int TextTop; //正文上边距 private int TextLeft; //正文左边距 private int
Title
H; //
标题
高度 private int Sub
Title
H; //子
标题
高度 private int FooterH; //页脚高度 private int FooterTop; //页脚顶部 private int TextH; //正文高度 private int VisibleColWidth; private int DX; private int DY; private string StrTest; private ListView ListViewData = null; //数据 private PrintDocument PD = null;
RePrint
表
格
打印
控件(
打印
datasource,dbgrid,stringgrid)
功能更加强劲,增加多行
表
头的功能,新增更多事件,加强了
打印
期间对
报
表
样式 的控制,可随意改变
打印
内容。 reprint 使用说明 本控件可
打印
datasource,dbgrid,stringgrid. 一 、控件属性: 1、cols
title
设置
报
表
的列
标题
属性 (1) Print:boolean;;是否
打印
(2) Font:tfont;;字体 (3) Rowsline:tpen;;横线样式 (4) Colsline:tpen;;竖线样式 (5) Alignment:talignment;;对齐方式 (6) Rowspace:integer;;行间距 (7) EveryPage:boolean;;是否每页
打印
(8) EveryRow:boolean;;是否每行
打印
(9)
title
array:tstrings;;怎加
标题
组 (使用方法见附带demo) (10) rows:integer;;设置默认列
标题
打印
行数 2、datasource 绑定 datasource 3、dbgrid 绑定 dbgrid 4、stringgrid 绑定 stringgrid PrintObject 选择
打印
的对象(datasource 、dbgrid、 stringgrid ) 5、pagefooter 页脚 pageheader 页眉 (1) Text:string;;内容 (2) Font:tfont;;字体 (3) Print:boolean;;是否
打印
(4) Alignment:talignment;;对齐方式 6、detail 设置要
打印
的明细数据属性 (1)arrange 设置明细字段排列方向 Horizontal 横向
打印
(默认的一般
打印
) Vertical 竖向
打印
(字段竖向排列适合
打印
字段内容较长的
报
表
如“会议纪录”) (2)aotureturn
打印
明细字段时,如果字段超过列的宽度是否允许自动换行 (3)colsline 设置竖线属性引用tpen类 (4)footer 设置明细尾 (设置同pagefooter 页脚 pageheader 页眉) (5)frame 设置明细边框属性引用tpen类 (6)head 设置明细头(设置同pagefooter 页脚 pageheader 页眉) (7)rowsline 设置横线属性引用tpen类 (8)rowspace 设置明细行的高度 (9)top 明细与
标题
的距离 (10)Alignment对齐方式 7、page 设置纸张 (1) leftmargin:real;;左边距 (2) rightmargin:real;;右边距 (3) topmargin:real;;顶边距 (4) bottommargin:real;;底边距 (5) pagesize:TPageSize;;纸张类型 (6) Height:real;;高度 (7) width:real;;宽度 (8) Orientation:TPrinterOrientation;;
打印
方向 注意:设置纸张的宽度和高度需把pagesize设为Custom 8、
title
设置
标题
(1) Print:boolean;; 是否
打印
(2) Text:tstrings;; 内容可设置多行 (3) Font:tfont;;字体 (4) Alignment:talignment;;对齐方式 (5) top:integer;; 距纸张顶部距离 (6) Rowspace:integer;;行距 (7) EveryPage:boolean;;是否每页
打印
二 、控件方法: (1) preview 预览 (2) print
打印
(3) SaveToFile() 保存为
报
表
文件 (4) SaveToStream() 保存为流(然后就可把整个
报
表
存到数据库了很方便哦! ~_~) (5) PrintFile()
打印
报
表
文件 (6) PrintStream()
打印
流(流的数据库存取就不用多说了吧) (7) PreviewFile() 预览文件 (8) PreviewStream() 预览流 (9) OptionToStream()
报
表
的属性保存为流 (10) OptionFromStream() 从流中得到
报
表
属性 (11) OptionPost()在
打印
期间改变了
报
表
属性,要想立即生效调用此方法。 (12) PaintText(Text:string) 覆盖原有
打印
的字符,一般在能返回当前
打印
的内容的事件中使用。(见控件事件) 三、 控件事件: (1) AfterPrint
打印
后 (2) BeforePrint
打印
前 (3) OnPrintDetail(RecordNumber: Integer)在
打印
每一栏明细前触发此事件, 返回参数:RecordNumber返回当前
打印
行数。 (4) OnPrintDetailField(RecordNumber,FieldIndex: Integer;; FieldText: String);; 在
打印
明细的每个字段都会触发此事件。 返回参数:RecordNumber返回当前
打印
行数。 FieldIndex 字段索引 FieldText字段内容 (5) OnPrint
Title
(Row: Integer;; Text: String)
打印
每行
标题
都会触发此事件。 返回参数:row当前
打印
的行 Text当前
打印
的内容 (6) OnPrintCols
Title
Field(Row, FieldIndex: Integer;; FieldName: String);;
打印
列
标题
字段时触发此事件 返回参数:row当前
打印
的行 FieldIndex当前
打印
的字段索引 FieldName当前
打印
的字段名称 (7) OnPrintCols
Title
(Row: Integer)
打印
每行列
标题
时触发此事件 返回参数:row当前
打印
的行 四、注意事项 (1) text 属性,输入“¦#¦”
打印
页码值,如果想
打印
页码可输入“第¦#¦页” 输入“¦RecordCount¦”
打印
记录数 (2) 不同的
打印
机,
打印
和预览效果可能有一点点不同(保证数据
打印
完全正确一致)。本人用一台针式和一台激光
打印
机做测试, 开始差别较大后经过调试基本一致,不知其他
打印
机如何。 (3) 纸张大小以及横向、竖向自动适应系统默认也可设置。 (4) 各列的宽度按比例,适应纸张宽度
打印
。 程序设计:吴进昊 E-mail :jinhaowu@hotmail.com qq :54254770 2003.01.03
Delphi
5,391
社区成员
262,738
社区内容
发帖
与我相关
我的任务
Delphi
Delphi 开发及应用
复制链接
扫一扫
分享
社区描述
Delphi 开发及应用
社区管理员
加入社区
获取链接或二维码
近7日
近30日
至今
加载中
查看更多榜单
社区公告
暂无公告
试试用AI创作助手写篇文章吧
+ 用AI写文章