如何 触发Button
打印 DBgrid 里面 内容
打印 DBgrid 里面 内容
解决方案 »
- 急!delphi用ADO存取文件时数据丢失
- 请问如何将jpeg图像缩小保存(包括尺寸和质量)
- 连Sqlserver数据库,为什么会出现其他程序更新了的数据,没在开着的程序中反应出?
- 关于TDateTime
- 大虾进来看,不算复杂的问题。
- 客户端出现Exception EIntfCastError错误
- 字符串数组赋值的出现非法字符的问题
- DirectX3D,怎么看起来,与OpenGl那么相似?有没人开发过,知道其中差别?指点一下?
- Windows开始菜单右边多出来的那一条怎么做???
- 关于LISTVIEW控件中数据的定位问题!!!!(奇怪的现象,只有在vsReport下,才管用。其他的模式就不行了,为什么?请高手指教!!)
- 三个问题,有分的
- 高难!急!!WIN2K的输入法出错!!!!!用DELPHI的CPU调试器怎么调??!!真解决了送300分!
的控制,可随意改变打印内容。下载地址:http://www.csdn.net/cnshare/soft/15/15471.shtm
reprint
使用说明
本控件可打印 datasource,dbgrid,stringgrid.
一 、控件属性:1、colstitle 设置报表的列标题属性 (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) titlearray: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设为Custom8、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) OnPrintTitle(Row: Integer; Text: String)打印每行标题都会触发此事件。
返回参数:row当前打印的行
Text当前打印的内容
(6) OnPrintColsTitleField(Row, FieldIndex: Integer; FieldName: String);
打印列标题字段时触发此事件
返回参数:row当前打印的行
FieldIndex当前打印的字段索引
FieldName当前打印的字段名称
(7) OnPrintColsTitle(Row: Integer)
打印每行列标题时触发此事件
返回参数:row当前打印的行