PUBLIC oForm AS Form lcReport = "t0.frx" && Put your report name here oForm = CREATEOBJECT("Form") oForm.WindowState = 2 oForm.Show() DEFINE WINDOW rd AT 0,0 SIZE 10,10 IN WINDOW (oForm.Name) NAME oRd oRd.Width = oForm.Width - 6 oRd.Height = oForm.Height - oRd.Top - 3 Modify Report (lcReport) IN rd NOWAIT ZOOM WINDOW ("Report Designer - ") + lcReport MIN ZOOM WINDOW ("Report Designer - ") + lcReport MAX oRd.Visible = .T.>I want to give my Users the ability to re-arrange the report format that comes a finish app., and it must be shown inside a form..currently im using this small code to do a report customization within my App..
PUBLIC gcReports >gcReports = GETFILE('FRX', 'Get Report File .FRX:', 'Customized', 1, 'Report Customization') >DO CASE > CASE 'Untitled' $ gcReports > MODIFY REPORT (gcReports) > CASE EMPTY(gcReports) > RETURN > OTHERWISE > MODIFY REPORT (gcReports) SAVE >ENDCASE>