如何用fastreport 打印固定行数呢.现要求每张纸上打印20条数据,如果数据表中有12条数据,则自动补8条空白行;如数据表中有11条数据,则自动补9条空白行.我增加了一个band 指定一虚拟数据集和记录数,但是记录数只能固定设制,如何指定记录数=20-数据表记录数呢??
解决方案 »
- 函数的使用问题??
- 求TDatabase连MSDE的方法及代码
- 请大家进来帮个忙!谢谢了!
- 【诚邀加盟】欢迎加入武汉最大的delphi/.NET程序员群!技术交流,资源共享!团结就是力量!
- 怎么dbgrid运行时候不能用鼠标中键控制右边的导航条呢?
- 公司开业,庆祝一下!
- 好多贴都结不了,因为没有回复。现在强制结贴,信誉分是直线下降,唉。
- SQL超长了,帮忙分一下语句~~ 在线
- 求好用的pq magic下载地址(for win2k Pro),50分
- 如何将文本文件写入数据库(算法要求尽可能快)?
- 大哥哥,大姐姐,Winform程序里输入的10进制数字转化成16进制后再变成中文如何显示到LED上面去?
- Delphi中VCL库的疑惑.
var
PageLine: integer; //在現在頁列印到第幾行
PageMaxRow: integer=15; //設定每頁行數
procedure MasterData1OnBeforePrint(Sender: TfrxComponent);
begin
PageLine := <Line> mod PageMaxRow;
if (PageLine = 1) and (<line> > 1) then
Engine.newpage;
child1.visible := False;
end;//Footer1高度設為0
procedure Footer1OnBeforePrint(Sender: TfrxComponent);var
i: integer;
begin
i := iif(PageLine=0, PageMaxRow, PageLine);
child1.visible := True;
while i < PageMaxRow do
begin
i := i + 1;
Engine.ShowBand(Child1); //印空白表格
end;
child1.visible := False;
end;
begin
end.
本文来自CSDN博客,转载请标明出处:http://blog.csdn.net/bdmh/archive/2009/05/27/4219395.aspx
还有,请问 高度設為0 这个Footer1是哪种啊?