孤独的猫

  博客园 :: 首页 :: 博问 :: 闪存 :: 新随笔 :: 联系 :: 订阅 订阅 :: 管理 ::

2010年8月27日

FastReport分组打印并且指定每页行数(不足填空行)
摘要： var GPage,GIndex,FGIndex:integer; PageList:array of integer; PageLine: integer; PageMaxRow: integer=28; procedure PageFooter1OnBeforePrint(Sender: TfrxComponent);begin GPage := GPage + 1;end;procedure Page1OnBeforePrint(Sender: TfrxComponent);begin GPage :=1; end;procedure GroupFooter1OnBeforePrint( 阅读全文
posted @ 2010-08-27 17:07 孤独的猫 阅读(3566) 评论(0) 推荐(0)