maximize local preview form

rbuser

How do I maximize the local preview form when I ppReport1.print.
Thanks in advance

digitalmetaphors

In RB 7 you can simply set the Report.PreviewFormSettings property.

In RB 6.03 and earlier, you have to code an event handler after you load
each template:

------------------------------------------------
Tech Tip: Controlling the Built-in Previewer
------------------------------------------------

You can control the built-in preview form via the
Report.OnPreviewFormCreate event.

For example the following code sets the Print Preview form to
maximized and sets the Viewer ZoomSetting to 100%:

procedure TForm1.ppReport1PreviewFormCreate(Sender: TObject);
begin


ppReport1.PreviewForm.WindowState := wsMaximized;
TppViewer(ppReport1.PreviewForm.Viewer).ZoomSetting := zs100Percent;


end;



Note: You will need to add ppViewr to the uses clause of your unit,
so that the ZoomSetting enumerated type is recognized by the
compiler.


--
Tech Support mailto:support@digital-metaphors.com
Digital Metaphors http://www.digital-metaphors.com
Cheers,

Jim Bennett
Digital Metaphors