fastreport打印空白行的方法

转载 2006年04月06日 11:25:00
FastReport 3.X


var
  PageLine: integer;       //在現在頁列印到第幾行
  PageMaxRow: integer=15;  //設定每頁列數

procedure MasterData1OnBeforePrint(Sender: TfrxComponent);
begin
  PageLine := <line> mod PageMaxRow;
  if (PageLine = 1) and (<line> > 1) then
    Engine.newpage;
end;

//Footer1高度設為0

procedure Footer1OnBeforePrint(Sender: TfrxComponent);
var
  i: integer;
begin
  i := iif(PageLine=0, PageMaxRow, PageLine);
  while i < PageMaxRow do begin
    i := i + 1;
    Engine.ShowBand(Child1);  //印空白表格
  end;
end;

begin
end.


FastReport 2.X

在資料字典設定變數
PageMaxRow 設定每頁列數。
PageLine 在現在頁列印到第幾行。
每 PageMaxRow 筆新自動跳頁(在Band的OnBeforePrint)



  PageLine := [line#] mod PageMaxRow;
  if (PageLine = 1) and ([line#] > 1) then
    newpage;


一頁列印15筆,不足筆數的列印空白表格列的方法
Master1
detail1----固定印PageMaxRow筆,有表格
detailFooter1---在OnBeforePrint輸入下列程式碼,高度設為 0
child1---空白表格

**detailFooter1.OnBeforePrint



  i := PageLine;
  if i = 0 then
    i := PageMaxRow;
  while i < PageMaxRow do begin
    i:=i+1;
    ShowBand(Child1);
  end;

修改fastreport实现页尾补空白行或打印固定行数

刚刚实现成功,“页尾剩余补空白行”和“打印固定行数”两种模式 代码: frxClass加:   //在DataBand末尾加空白行 //abcNone不启用,abcByReco...
  • nhconch
  • nhconch
  • 2014年12月02日 16:52
  • 9119

fastreport打印空白行的方法

FastReport 3.Xvar  PageLine: integer;       //在現在頁列印到第幾行  PageMaxRow: integer=15;  //設定每頁列數procedure...
  • xiaomaoxia
  • xiaomaoxia
  • 2006年04月06日 11:25
  • 3290

fastreport打印固定行数报表实例

  • 2010年03月19日 15:38
  • 712KB
  • 下载

FastReport.net 打印空行

1.不分页打印固定空行 在数据区下插入子报表,设置子报表的“最少数据行”。 2.隔行打印空行 在数据区下插入子报表,在页脚添加下面的事件代码。  private void PageFoot...
  • wilsonke
  • wilsonke
  • 2012年07月02日 14:04
  • 2338

FastReport如何打印表格式的空行?

var    PageLine: integer;       //在現在頁列印到第幾行    PageMaxRow: integer=15;  //設定每頁列數procedure MasterDat...
  • johnny_83
  • johnny_83
  • 2007年07月22日 10:01
  • 1057

FastReport通过sql语句为数据源补空行

生成报表时,有时记录较少,甚至没有,最终生成的报表会显得非常空,fastreport本身没有提供使用空行补满页的功能。搜索到的实现方案比较复杂。 这里研究了另一个方案,对数据源的selectcomm...
  • ffhhcclya
  • ffhhcclya
  • 2017年05月24日 21:16
  • 320

fastreport5.23解决中文空格转行XE7\XE8

  • 2015年09月16日 20:18
  • 3.87MB
  • 下载

FastReport设置0值打印时为空白

在FastReport中设置要显示为指定值的列,在这列有个HideZeros设置为true,当此列值为0时,打印出来后为空白,避免因大量的0看起来晕,...
  • huqiqi1234
  • huqiqi1234
  • 2016年02月16日 18:12
  • 1484

fastreport报表中如何增加空行

【方法一】 原文 :http://blog.hexun.com/i/blogclosed.aspx?m=1 var   i:integer; procedure MasterData1O...
  • chelen_jak
  • chelen_jak
  • 2012年06月19日 11:32
  • 3769

FastReport 中如何实现正反面打印

FastReport 中如何实现正反面打印呢?请各位高手指点。。。谢谢。。。。
  • pantanwan
  • pantanwan
  • 2010年07月05日 12:37
  • 199
内容举报
返回顶部
收藏助手
不良信息举报
您举报文章: fastreport打印空白行的方法
举报原因:
原因补充:

(最多只允许输入30个字)