社区
Delphi
帖子详情
fastreport能否合并重复单元格?
kotorcjw
2007-07-27 05:11:56
fastreport能不能合并重复单元格?就是报表有很多条记录,这些记录有一个字段是一样的,能不能像reportmachine那样,将重复的单元格合并成一个?虽然可以设置不打印重复值,但是还是会显示空白的单元格……
...全文
786
2
打赏
收藏
fastreport能否合并重复单元格?
fastreport能不能合并重复单元格?就是报表有很多条记录,这些记录有一个字段是一样的,能不能像reportmachine那样,将重复的单元格合并成一个?虽然可以设置不打印重复值,但是还是会显示空白的单元格……
复制链接
扫一扫
分享
转发到动态
举报
写回复
配置赞助广告
用AI写文章
2 条
回复
切换为时间正序
请发表友善的回复…
发表回复
打赏红包
cuiyue4420
2007-11-29
打赏
举报
回复
将重复的删除,格式设置为没有边框就行了
kotorcjw
2007-07-30
打赏
举报
回复
顶上去,难道用fastreport的人不多么?怎么没人回答啊
Fast
Report
数据
单元格
格纵向横向
合并
功能实现
支持记录集多记录纵向
单元格
同内容
合并
以及列
合并
;修改单元frxEngine.pas,frxClass.pas , Xe3验证可用,内附样式文档
Fast
Report
合并
相应行代码.rar
:首先是要分组,因为如果不分组,想
合并
的列与其它列会自动打印。这样,只能使用FR自带的隐藏
重复
数据的功能,但很多类似报表都是要求
合并
行居中的,这点FR就不能自动实现了。 2:要全并的列放在分组脚中,其它放在分组数据BAND中,这样,打印完分组数据BAND后,动态改变分组脚中要
合并
列的TOP和HEIGHT就可以了。而且这样打印,因为要
合并
的行实际上只打印了一遍,因此应该效率更高。所以这就需要在打印分组数据BAND后有一个可记录此分组已打印高度的功能。 3:代码解释 procedure MCOnAfterData(Sender: TfrxComponent); begin if =1 then MC.Tag:=Int(MC.Height) else MC.Tag:=MC.Tag+Int(MC.Height); end; 因为FR的在每次分组后重新计数,使用MC.Tag保存现在数据BAND上的所有不
合并
行的总高度。当然也可以使用一个变量,但放着这么多TAG不用,多浪费呀。况且使用TAG的语法也比使用变量简单,使用变量使程序看上去很难懂。 if >=1 then 这样的写法看起来多痛苦呀。 procedure MBBOnAfterData(Sender: TfrxComponent); begin MBB.Tag:=GetStandHeight(MBB.CalcHeight); //这一句是为了保持行高的一致性,如果不需要直接 MBB.Tag:=MBB.CalcHeight; //这样可能计算的行高不是标准行高的整数倍。 MBB.Visible:=False; end; procedure MD1OnBeforePrint(Sender: TfrxComponent); begin if =1 then MBB.Visible:=True; end; 上二句只是为了不多次统计CalcHeight,但不能直接设可视性为假,否则不会触发MBBOnAfterData事件。 计算此例中可能会很高的列的计算高度,这是在宽度已经确定的情况下计算的。 因为此例中的第二列单行高度可能大于其它列的总高度。如果没有此例中的特殊情况,可以省略。 4:如果此例中没有第二列单行高度可能大于其它列的总高度的话,MBB是不需要的。 5:如果不是要求空行为多行多列显示的话,GFOnBeforePrint也是不需要的,只需要在GF上放二个MEMOVIEW,宽高和左边距分别与上方的二个相同,调用我例子中注释掉的代码改变它们的TOP和HEIGHT即可。 6:TAG是所有Tcomponent的属性呀,这是我最常使用的一个属性。
Fast
Report
单元格
合并
之横向
合并
Fast
Report
纵向
合并
请点击这里
Fast
Report
单元格
合并
Fast
Report
具有
单元格
合并
功能,其菜单
fast
report
自动
合并
内容相同
单元格
Duplicates=dmMerge
Delphi
5,388
社区成员
262,730
社区内容
发帖
与我相关
我的任务
Delphi
Delphi 开发及应用
复制链接
扫一扫
分享
社区描述
Delphi 开发及应用
社区管理员
加入社区
获取链接或二维码
近7日
近30日
至今
加载中
查看更多榜单
社区公告
暂无公告
试试用AI创作助手写篇文章吧
+ 用AI写文章