Имеем
MasterData1
Добавляем еще один MasterData (MasterData2), в диспетчере свойств, устанавливаем свойство Visible в False, на случай если строк в MasterData1 и так будет достаточно.
Получаем
MasterData1
MasterData2
В MasterData2 делаем пустую строку нашего MasterData.
В обработчике события OnBeforePrint MasterData2 вставляем код:
MasterData1
Добавляем еще один MasterData (MasterData2), в диспетчере свойств, устанавливаем свойство Visible в False, на случай если строк в MasterData1 и так будет достаточно.
Получаем
MasterData1
MasterData2
В MasterData2 делаем пустую строку нашего MasterData.
В обработчике события OnBeforePrint MasterData2 вставляем код:
procedure MasterData2OnBeforePrint(Sender: TfrxComponent);
var
EmptyCount: integer;
begin
EmptyCount := 10-MasterData1.RowCount; //имеется в виду, что будет 10 строк постоянно
if EmptyCount > 0 then
begin
MasterData2.Visible:=True;
MasterData2.RowCount := EmptyCount;
end;
end;
Комментариев нет:
Отправить комментарий