Change Starting Page No of system variable

rbuser

Hi,

I place a system variable on a report footer and set the vartype to
vtPageNoDesc to display the page number for each page of the report. I want
to be able to set the value of this system variable to another number (eg,
5) instead of the default value of 1 so that the report will start with Page
5, Page 6 on next page and so on. How do I do it? Using D7E and RB E7.03.

Thanks,
Peter Tan

nicocizik

Hi Peter,

The TppSystemVariable component value is not customizable. My suggestion
would be to place a TppVariable in your footer and in its OnCalc event, set
its value equal to Report.PageNo + 4. Something like the following.

var
liPageNo: Integer;
liPageCount: Integer;
begin

liPageNo := Report.PageNo + 4;
liPageCount := Report.PageCount;

Value := 'Page ' + IntToStr(liPageNo) + ' of ' + IntToStr(liPageCount);

end;

--

rbuser

Thanks. This settles it. Happy new year from Singapore!

Peter Tan