oListener = CreateOBJECT('rlswap') oListener.strFilter = strfilter oListener.PreviewContainer = Thisformset.frmDisplay Report Form (Thisformset.strReportName) Object oListener