loPreview = null do (_ReportPreview) with loPreview loPreview.Width = _screen.Width - 30 loPreview.topform = .T. loListener = createobject("reportlistener") loListener.OutputType = 1 loListener.ListenerType = 1 loListener.PreviewContainer = loPreview report form (_SAMPLES + "\Solution\Reports\invoice.frx") object loListenerThis seemed to work for me. Can you describe what you are seeing that does not seem correct to you?