Подписи к документу не отрывать?

xvv

Есть печатная форма документа. в конце подписи уполномоченых лиц. Как сделать так чтоб они не перелазили на последнюю страницу, а если нужно вместе сними перетаскивалось туда несколько строчек отчёта?

Есть одно решение - добавить подвал страницы высоту которого позволить задовать пользователю, но оно не сильно красивое.

Andrew_Sh

xvv написал:

Есть печатная форма документа. в конце подписи уполномоченых лиц. Как сделать так чтоб они не перелазили на последнюю страницу, а если нужно вместе сними перетаскивалось туда несколько строчек отчёта?

Есть одно решение - добавить подвал страницы высоту которого позволить задовать пользователю, но оно не сильно красивое.

Зависит от структуры отчета. В простейшем случае, если есть бэнд MasterData1 и ReportSummary1, на котором выодятся подписи, то:
1) делаете отчет двухпроходным;
2) в первом проходе считаете количество строк для MasterData1 и запоминате в переменной MasterLineCount;
3) во втором проходе в обработчике OnBeforePrint для MasterData перед печатью нужной строки анализиируете свободное место на листе и если оно меньше необходимого, то перенонсите на новый лист.

var
  MasterLineCount: integer;
const
  RowCountKeepWithSummary = 2;

procedure MasterData1OnBeforePrint(Sender: TfrxComponent);
begin
  if Engine.FinalPass
     and (<line#>=(MasterLineCount-RowCountKeepWithSummary+1))
     and (Engine.FreeSpace < (MasterData1.Height*RowCountKeepWithSummary + ReportSummary1.Height {+PageFooter1.Height}) )
    then Engine.NewPage;
end;

Здесь, константа RowCountKeepWithSummary должна содержать число строк, которое будет переноситься вместе с ReportSummary на новый лист. Допишите код для подсчета строк в MasterData1.