Как прервать построение отчета?
В шаблоне отчета есть ADOQuery1,ADOQuery2 :TfrxADOQuery
По данным ADOQuery1 заполняются поля в бэнде: ReportTitle1,
а по данным ADOQuery2 поля бэнда: MasterData1.
Бывает, что ADOQuery2.RecordCount=0, тогда вообще документ не имеет смысла.
Но команда поступила и ее надо обработать - в таком случае на принтере вылезет лист с опечатанной Шапкой, получается пустой расход бумаги.
Как прервать построение отчета так, чтоб PrepareReport стало false?
Или как в скрипте отчета очистить Page , а дальше при условии Page1.PrintIfEmpty=false отчет сам не распечатается?
var
PrepareReport:boolean;
.......
frxReport1.LoadFromFile('Stream2.fr3');
PrepareReport:=frxReport1.PrepareReport(true);
.....
if PrepareReport then
begin
frxReport1.PrintOptions.ShowDialog:=false;
frxReport1.Print;
end;
По данным ADOQuery1 заполняются поля в бэнде: ReportTitle1,
а по данным ADOQuery2 поля бэнда: MasterData1.
Бывает, что ADOQuery2.RecordCount=0, тогда вообще документ не имеет смысла.
Но команда поступила и ее надо обработать - в таком случае на принтере вылезет лист с опечатанной Шапкой, получается пустой расход бумаги.
Как прервать построение отчета так, чтоб PrepareReport стало false?
Или как в скрипте отчета очистить Page , а дальше при условии Page1.PrintIfEmpty=false отчет сам не распечатается?
var
PrepareReport:boolean;
.......
frxReport1.LoadFromFile('Stream2.fr3');
PrepareReport:=frxReport1.PrepareReport(true);
.....
if PrepareReport then
begin
frxReport1.PrintOptions.ShowDialog:=false;
frxReport1.Print;
end;
Комментарии