Local oPreviewForm as Form

oPreviewForm = CREATEOBJ("Form")
oPreviewForm.Name = [PreviewWindow]
oPreviewForm.WindowState = 2 &&Maximized
oPreviewForm.Visible = .T.
***
use this statment Keyboard "{Ctrl+F10}"
*******
REPORT FORM YourReportFile.Frx to print preview window PreviewWindow

oPreviewForm.Release