>LOCAL loPreviewContainer, loReportListener > >*-- Create the preview container >DO (_REPORTPREVIEW) WITH loPreviewContainer > >*-- Change some of the defaults >loPreviewContainer.Caption = 'My Special Report' >loPreviewContainer.ZoomLevel = 5 && 100% >loPreviewContainer.ToolbarIsVisible = .t. > >*-- Create the Report Listener >loReportListener = CREATEOBJECT('ReportListener') >loReportListener.ListenerType = 1 && Preview > >*-- Assign the preview container to the listener >loReportListener.PreviewContainer = loPreviewContainer > >*-- Run the report (with NOWAIT) >REPORT FORM MySpecialReport OBJECT loReportListener NOWAIT > >*-- Change some more preview container properties >loPreviewContainer.oForm.Toolbar.Dock(0) && Dock toolbar at the top >loPreviewContainer.oForm.WindowState = 2 && Maximize preview >