FoxPro/Visual FoxPro - Es proble es ....

x=thisform.txt_cedula.value
USE result
LOCATE FOR ALLTRIM(cedula)==ALLTRIM(x)
IF FOUND() then
Thisform.text1.value=nombre
Thisform.text2.value=fecha2


*Set filter to cedula=x
Thisform.grid1.refresh
else
MESSAGEBOX("LA CEDULA INGRESADA NO EXISTE")
*wait window "La Cedula no existe, intente de nuevo" timeout .8
*Return .f.

ENDIF

cuando ejecuto el GRID1 me me trae los datos cuando habro el formulario luego cuando realizo la consulta se queda el grid en blanco

x=thisform.txt_cedula.value
USE result
SELEC * FROM result FOR ALLTRIM(cedula)==ALLTRIM(x) INTO CURSOR cCedula
IF FOUND()
Thisform.text1.value=nombre
Thisform.text2.value=fecha2
Thisform.grid1.refresh
ELSE
MESSAGEBOX("LA CEDULA INGRESADA NO EXISTE")
WAIT WIND "La Cedula no existe, intente de nuevo" TIMEOUT .8
RETURN .F.

ENDIF

Checa si esta mejor si no.. que es lo realmente quieres hacer ????


x=thisform.txt_cedula.value
USE result
SELEC * FROM result FOR ALLTRIM(cedula)==ALLTRIM(x) INTO CURSOR cCedula
IF FOUND()
Thisform.text1.value=nombre
Thisform.text2.value=fecha2
Thisform.grid1.refresh
ELSE
MESSAGEBOX("LA CEDULA INGRESADA NO EXISTE")
WAIT WIND "La Cedula no existe, intente de nuevo" TIMEOUT .8
RETURN .F.
ENDIF