how to maximize the preview window when it opens?

rbuser

how to maximize the preview window when it opens?
Can't find the method for that



Annar

digitalmetaphors

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.



Cheers,

Jim Bennett
Digital Metaphors