报表打印每页行数的问题(很急)

supercctv 2003-03-02 11:05:16

me打印一个药品销售单,使用自定义纸张,可是无论是再预览还是在执行打印时都只能每页打印一条记录.me想每页打印5条记录,怎么办?

在beforeprint事件中使用下列代码无效.
Static int iCount=0;
iCount++;
if(iCount>5) //设每页只打印10行,可根你的情况改动
{
iCount=0;
PrintBand=false;
QuickRep1->NewPage();
}
else
{
PrintBand=true;
]

...全文

50 3 打赏收藏转发到动态举报

写回复

用AI写文章

3 条回复

切换为时间正序

请发表友善的回复…

发表回复

cyg1dm 2003-03-02

打赏
举报

我做过这样的程序要的话留下MAIL

supercctv 2003-03-02

打赏
举报

还有一个忘了,我使用的是access数据库.

WebEtCell 2003-03-02

打赏
举报

用EtCell报表控件/插件是个不错的选择！
http://www.etcell.com/

在线例子：http://www.etcell.com/Samples/

用fastreport打印固定行数报表实例，在DELPHI7，fastreport3.0中运行成功，没用到其它第三方控件。内有EXE，下载只可运行查看效果。

本想自动读取报表的纸张大小，但返回来值都是默认纸张的大小，所以用了
Selest case 词句，但这样结果是纸张的类型不齐全。没有类型对应的纸张的在大小不能正确判断（此情况下，如果提供的参数不正确，报表结果将会变乱。此时只要调整一下参数。即得到正确的报表。）。如果有谁能解决此问题，请告知一声。

以下为新的函数说明：
＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝
函数名:RepDetail_Format()
调用报表必须使用控件：（文本框）
txtRecord_NO 在主体节可见用于显示记录号，可选
txtTotGrp 在主体节不可见 =Count(*) 用于取得报表的总记录数，必须
txtCurrentPage 在主体节不可见 =[Page] 用于取得当前页数，必须

参数说明： RepName 报表名称（当前报表可用 (Me), 其它报表可用：(Reports.报表名)引用），必须
txtCurrentPage 报表主体节上的[txtCurrentPage]文本框控件 ,必须
txtRecordNum 报表定义的私人变量数据类型:Integer 用于记录数的递增，必须
（注：在报表模块顶部声明： Private txtRecordNum As Integer ）
txtTotGrp 报表主体节上的[txtTotGrp]文本框控件，必须
IntPrintLen 报表打印的行数。
-----数据类型:Integer （注：不可超过每页允许的最大记录数），可选，（默认：25 行）
DouPageLine 报表主体记录部分打印长度。
-----数据类型:Double （注：不可超过每页允许的最大记录数），可选，（默认：21 CM ）
FontSize 报表记录部分字号。
-----数据类型:Integer （注：不可超过每页允许的最大记录数），可选，（默认：0 字号不变）
txtRecord_NO 记录序号文本框名称。
-----数据类型:String （注：不可超过每页允许的最大记录数），可选，（缺省为没有使用）

使用方法：
1,先定义一私人变量：Private txtRecordNum As Integer,必须
2,报表主体节的格式化事件中调用（Detail_Format 事件）

调用方法：NextRecord=RepDetail_Format(RepName , txtCurrentPage.text , txtRecordNum , txtTotGrp.text , IntPrintLen)
使用示例：NextRecord = RepDetail_Format(Me, [txtCurrentPage], txtRecordNum, [txtTotGrp], 20)
本函数由 binuochao (许伟军) 完成。制作于2003-06-27 Email:binuochao@sina.com.cn QQ:10077241

＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝　

C#原生报表操作--设置每页打印20行实例源码

单据或报表如何每页打印表头表尾,亲测能用，需要拿走不谢，看好标题再下载哦

C#原生报表操作--设置每页打印30行实例源码(0520_).rar