FastReport报表制作方法

来源:互联网 发布:w7怎样建立网络共享 编辑:程序博客网 时间:2024/04/28 03:18

1.FastReport报表设计中,如果数据库表中有为空的记录存在,那报表中在相应的栏就会显示空记录。如果想在为空的记录中添加一个'/',除了可以在程序中写一个添加斜线的函数外,还可以在报表设计器中相应的Memo中添加如下代码,例如:

 Memo1.lines.clear;
 if ( isNull([CDSDetail."AccepterDate"]) )  then
   memo1.lines.add(' ')
 else
   memo1.lines.add([CDSDetail."AccepterDate"])

上面的代码是在begin .............end之间写的,也可以在上面空白的栏中如下面方法所示写:

  [IF([CDSMaster."SampleCorp"]='', '/', [CDSMaster."SampleCorp"])]

这种方法有个不方便之处就是字段的值不一定为空,也有可能为0。如果预览时还是为空,则换成0就可以了。

2.如果一页没满,想在末满的地方补以空行的方法:首先添加一个主项脚和子项,然后在主项脚的OnBeforePrint属性中添加下列代码。
begin
  if [TOTALPAGES] <=2 then        //这行是打印多少面的,可以不要
  while FreeSpace > MasterFooter1.Height + Child1.Height do
    ShowBand(Child1)
end

添加完以上代码后,打印时为空的地方就会补以空行了。

 

原创粉丝点击