社区
Delphi
帖子详情
FastReport 固定行
wn520
2009-10-13 05:02:29
如何用fastreport 打印固定行数呢.现要求每张纸上打印20条数据,如果数据表中有12条数据,则自动补8条空白行;如数据表中有11条数据,则自动补9条空白行.我增加了一个band 指定一虚拟数据集和记录数,但是记录数只能固定设制,如何指定记录数=20-数据表记录数呢??
...全文
95
2
打赏
收藏
FastReport 固定行
如何用fastreport 打印固定行数呢.现要求每张纸上打印20条数据,如果数据表中有12条数据,则自动补8条空白行;如数据表中有11条数据,则自动补9条空白行.我增加了一个band 指定一虚拟数据集和记录数,但是记录数只能固定设制,如何指定记录数=20-数据表记录数呢??
复制链接
扫一扫
分享
转发到动态
举报
写回复
配置赞助广告
用AI写文章
2 条
回复
切换为时间正序
请发表友善的回复…
发表回复
打赏红包
wn520
2009-10-13
打赏
举报
回复
这段代码试过了,好像不行。
还有,请问 高度設為0 这个Footer1是哪种啊?
bdmh
2009-10-13
打赏
举报
回复
17.FastReport如何打印表格式的空行?
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
fast
report
固定
行
数分页不足补空白
行
fast
report
固定
行
数分页不足补空白
行
,完整的demo,下载就可以用
fast
report
打印
固定
行
数报表实例
用
fast
report
打印
固定
行
数报表实例,在DELPHI7,
fast
report
3.0中运
行
成功,没用到其它第三方控件。内有EXE,下载只可运
行
查看效果。
fast
report
动态分页
fast
report
动态分页 按查询的结果集其中的一个字段分页
Fast
report
报表设计指南
帮您解决
fast
report
的关于应用的问题。
Fast
Report
问题集
Fast
Report
问题集 Q: 我怎样添加我的自定义函数? A: 使用 Tfr
Report
.OnUserFunction 事件. 这里有一个简单的例子: procedure TForm1.fr
Report
1UserFunction(const Name: String; p1, p2, p3: Variant; var val: ...
Delphi
5,387
社区成员
262,729
社区内容
发帖
与我相关
我的任务
Delphi
Delphi 开发及应用
复制链接
扫一扫
分享
社区描述
Delphi 开发及应用
社区管理员
加入社区
获取链接或二维码
近7日
近30日
至今
加载中
查看更多榜单
社区公告
暂无公告
试试用AI创作助手写篇文章吧
+ 用AI写文章