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