* proc showfrx lparam cFrxName oPrevWind=createobject('pvw') with oPrevWind .caption='Previewing report '+cFrxName * set other properties of the window here if needed .show report form (cFrxName) preview window (.name) .release endwith Define class pvw as form windowstate= 2 && or whatever you like <b>showwindow=2</b> && had to be TopWindow to be always on top. alwaysontop=.t. enddefineEven looks better now, IMO.