LOCAL llLockScreen,llInForm
dodefault()
if type("thisform")=="O"
	llLockScreen=thisform.lockscreen 
	thisform.lockscreen=.t.
        llInForm=.T.
endif
with this.list
	 .visible = .F.
	 .top=this.xIndent
         .top = .top - 9999
         .left=this.yindent
	 .height=this.height-(2*this.xIndent)
	 .width=this.width-(2*this.yIndent)
	 .top =.top + 9999
	 .visible = .T.
	 .refresh()
endwith

if llInForm
	thisform.refresh()
	thisform.lockscreen=llLockScreen
endif
nodefault