How to create report runtime using pattern? TfrCom

rastislav

How to create report runtime using pattern? TfrCompositeReport?


For example
I do:

frComposite1.Reports.Clear;
For K:=1 to 3 do begin
frVariables:=inttostr(k);
frComposite1.Reports.Add(frReport1);
end;
For K:=1 to 3 do begin
frVariables:=inttostr(k);
frComposite1.Reports.Add(frReport2);
end;

frComposite1.ShowReport;

Result :
first page 3 // frVariables[memo]=3;

second page 3 // frVariables[memo]=3;

third page 3 // frVariables[memo]=3;

4 page 3 // frVariables[memo1]=3;

5 page 3 // frVariables[memo1]=3;

6 page 3 // frVariables[memo1]=3;

But I want :

first page 1 // frVariables[memo]=1;

second page 2 // frVariables[memo]=2;

third page 3 // frVariables[memo]=3;

4 page 1 // frVariables[memo1]=1;

5 page 2 // frVariables[memo1]=2;

6 page 3 // frVariables[memo1]=3;