>>REPORT FORM Report1 NOCONSOLE TO PRINTER PROMPT PREVIEW >>>>but how i can use all code , I build myform before
>>i know this is error THISFORM >>------------------------------------ >>thisform = CREATEOBJECT("thisform") >>thisform.Name = "PrintPreview" >>thisform.WindowState = 2 && Maximised >>thisform.Visible = .t. >>wnd_name = thisform.Name >>REPORT FORM Report1 NOCONSOLE TO PRINTER PROMPT PREVIEW WINDOW (wnd_name) >>thisform = NULL >>RELEASE thisform, wnd_name >>>>
>>>>report form report1 preview >>>>>>>>
>>>oForm = CREATEOBJECT("Form") >>>oForm.Name = "PrintPreview" >>>oForm.WindowState = 2 && Maximised >>>oForm.Visible = .t. >>>wnd_name = oForm.Name >>>REPORT FORM Report1 NOCONSOLE TO PRINTER PROMPT PREVIEW WINDOW (wnd_name) >>>oForm = NULL >>>RELEASE oForm, wnd_name >>>