Question

delphi fasterreport 分组 分页怎么计算

Answer 1

分组： 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;