Как изменить порядок печати отчёта?

EDIsaev · February 2022

Доброго времени суток.

У меня отчёт формуруется в следующей форме:

В зависимости от данных формируется N-ое количество столбцов и строк.

Вертикально расположен основной набор данных (masterdata), горизонтально его свойства из других таблиц (subdata).

Оранжевым выделена область того, что попадает на лист.

При этом листы по-умолчанию распечатываются в следующей последовательности:

А хотелось бы получить в такой:

Возможно ли это как-то задать, чтобы не сортировать постоянно вручную?

Заранее благодарен!

gpi · June 2022

Вы можете пересортировать страницы после формирования отчёта по аналогии с

var i, j: integer;

page : TfrxReportPage;

begin

frxReport1.PrepareReport();

j := frxReport1.PreviewPages.Count div 2;

page := TfrxReportPage.Create(nil);

for i := 0 to j - 2 do

begin

page.AssignAll(frxReport1.PreviewPages.Page[j + i]);

frxReport1.PreviewPages.AddEmptyPage(i * 2 + 1);

frxReport1.PreviewPages.ModifyPage(i * 2 + 1, page);

frxReport1.PreviewPages.DeletePage(j + i + 1);

end;

page.Free;

frxReport1.ShowPreparedReport;

end;

Комментарии