I think somewhere in Your form (that w/ grid) You fire DO FORM findrec..., You must change that commmand like that:

DO FORM FindRec WITH thisform ... && Ofcourse must place that parameter in last position (if you have other parameters)

In FindRec form
must add a property frmWithGrid
In init method:

  LPARAMETERS frmWithGrid
  IF TYPE("m.frmWithGrid") # "O"
     thisform.frmWithGrid = NULL
  ELSE
     thisform.frmWithGrid = m.frmWithGrid
  ENDIF

In that method where you do actual search

 LOCATE... (SEEK...) ...
 IF .NOT. ISNULL(thisform.frmWithGrid)
    thisform.frmWithGrid.Grid1.Refresh()
 ENDIF