Hi David, Here's what you wanted to look at. Thanks!

The form is called from a command button on the main form and it is simply:
DO FORM search

the search form is set to modeless,in screen and code below for methods.

********************
ACTIVATE METHOD CODE
********************
DO search.mpr
IF USED('lcSearch')
IF RECCOUNT('lcSearch') = 0
STORE 0 TO lnnumrec
search.cmglnbutton2.command2.enabled = .F.
search.cmglnbutton2.command3.enabled = .F.
ELSE
LnNumrec = RECCOUNT('lcSearch')
search.cmglnbutton2.command2.enabled = .T.
search.cmglnbutton2.command3.enabled = .T.
ENDIF
ELSE
STORE 0 TO lnNumrec
search.cmglnbutton2.command2.enabled = .F.
search.cmglnbutton2.command3.enabled = .F.
ENDIF
search.txtLcstnumb.setfocus

STORE '' TO lcfilter, lcwork, lcstnumb, lcstdir, lcstname, ;
lcparcel, lcownername, lclegaldes1
search.refresh()



*******************
INIT METHOD CODE
*******************

PRIVATE lnvalue, lcwork, ;
lcstnumb, lcstdir, lcstname,lcownername, ;
lclegaldes1, msg, lctemptable

PUBLIC lnnumrec,lcfilter,lcparcel

STORE '' TO lcfilter, lcwork, lcstnumb, lcstdir, lcstname, ;
lcparcel, lcownername, lclegaldes1

LcThorough = 0

ON KEY LABEL f3 search.cmglnbutton1.command1.click() && <> command
ON KEY LABEL f4 search.cmglnbutton1.command2.click() && <> command


*********************
REFRESH METHOD CODE
*********************

IF USED('lcSearch')
IF RECCOUNT('LcSearch') = 0
search.cmglnbutton2.command2.enabled = .F.
search.cmglnbutton2.command3.enabled = .F.
ELSE
search.cmglnbutton2.command2.enabled = .T.
search.cmglnbutton2.command3.enabled = .T.
ENDIF
ENDIF
THISFORM.grdsrchresults.recordsource = ""
THISFORM.grdsrchresults.recordsource = "LcSearch"
THISFORM.grdsrchresults.recordsourceType = 1