Scaled output

rbuser

Hi;

it is possible to reduce the scale of a report in RB 6.03?; how?


TIA

nicocizik

Hi Arturo,

I'm a bit unclear about what you mean by reducing the "Scale" of the report,
but if you would like to view the report as a different size, you need to
adjust the TppReport.PreviewFormSettings property. From here you can change
the WindowState, ZoomPercentage, and ZoomSetting of the report before it
prints.

--

nicocizik

Hi Arturo,

Sorry, it is possible to change the paper size, but there is no built in
functionality that actually shrinks or moves the report components to fit on
a smaller paper size than the one it was created on. This however would not
be very difficult to accomplish manually. You could create a report object
loop and move each component within the boundaries of the paper sized based
on which paper type you want to use. See the article below on looping
through all objects in a report.

----------------------------------------------
Tech Tip: Loop Thru All Objects in a Report
---------------------------------------------

A ReportBuilder report is composed of a set
of components. The basic structure is

Reports.Bands[].Objects[]

The bands and objects within the report can
be accessed directly by object name or
via the Bands and Objects array properties.

Below is an example of using the Bands and
Objects array properties to change the font for
all objects on a report.


uses
ppClass;


procedure AssignFontToReport(aFont: TFont; aReport: TppCustomReport);
var
liBand: Integer;
liObject: Integer;
lObject: TppComponent;

begin

for liBand := 0 to aReport.BandCount-1 do

for liObject := 0 to aReport.Bands[liBand].ObjectCount-1 do
begin
lObject := aReport.Bands[liBand].Objects[liObject];

if lObject.HasFont then
lObject.Font := aFont;

end;

end;


--

rbuser

I mean to print the report on paper at a reduced size... it is possible to
do it from RB?