LOCAL; loActiveControl THISFORM.LOCKSCREEN = .T. *Check if a Control is focused and if it could receive focus again IF TYPE('THISFORM.ACTIVECONTROL')='O'; AND !ISNULL(THISFORM.ACTIVECONTROL); AND PEMSTATUS(THISFORM.ACTIVECONTROL,'SETFOCUS',5) THEN loActiveControl = THISFORM.ACTIVECONTROL ELSE &&TYPE('.ACTIVECONTROL' ... loActiveControl = NULL ENDIF &&TYPE('.ACTIVECONTROL' ... *YourGrid.SETFOCUS() *Get your properties *Re - Focus last Object IF !ISNULL(loActiveControl) THEN loActiveControl.SETFOCUS() ENDIF &&!ISNULL(loActiveControl) THISFORM.LOCKSCREEN = .F.HTH