FastReport,如何分组分页打印? 我需要根据某个字段将数据分组分页打印,如,将字段内容为A的数据全部打印,然后强制分页,然后打印字段内容为B的数据,再分页,再打印,直至所有数据打印完毕.请问如何实现?谢谢. 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 分组: Fastreport的band有分组这样的功能。分页:在主项数据的(OnBeforePrint)中写代码了。newpage 就可以产生一个新的页。 // 报表分页 frReport1.Pages[0].FindObject('GroupHeader1').Prop['Condition'] := 'DmSQL.QrySynth."' + strColumn + '"'; if BeforeSynthQuery.cbxGroupNewPage.ItemIndex=2 then frReport1.Pages[0].FindObject('GroupHeader1').Prop['FORMNEWPAGE'] := true; end; 修改数据的问题!不够分再补 chart控件问题(取出seriors[i]曲线对应的x,y值)? 一个dbgrideh问题 对比文件除了文件名和大小之外,还有什么是可以做对比的!时间除外! 怎样动态删除一个ACCESS文件? delphi报表问题 关于groupbox的独立问题,简单,来者有份 关于数据库的操作问题。 string如何转换成array of byte? 俺不知为啥paintbox组件会这样,please help me 问个显示字符串的问题 在局域网中如何配置SQLSERVER2000的客户端网络实用工具
分页:在主项数据的(OnBeforePrint)中写代码了。newpage 就可以产生一个新的页。
frReport1.Pages[0].FindObject('GroupHeader1').Prop['Condition'] := 'DmSQL.QrySynth."' + strColumn + '"';
if BeforeSynthQuery.cbxGroupNewPage.ItemIndex=2 then
frReport1.Pages[0].FindObject('GroupHeader1').Prop['FORMNEWPAGE'] := true;
end;