Problemas con grid al pasar a textbox

Hola experto tenga buen día, mi problema es el siguiente tengo un form con un textbox, que me permite buscar datos de una tabla y muestra algunos datos en la grid a través de un cursor, ahora quiero seleccionar un fila y mostrar otros datos de la tabla pero solo me marca uno, selecciono otro y no pasa nada, que estoy haciendo mal...

para ello mi cursor esta en un botón :

thisform.grdConsulta.RecordSource= "select id_caso,caso,fecha_ini,monto,monto1 from caso where cliente=ALLTRIM(thisform.txtCodigo.Value) into cursor XLX"

thisform.Refresh

en el evento AfterRowColChange del grid:

thisform.txtMonto.Value=caso.monto

ah quiero indicarte que en el init del form le he colocado:

thisform.grdConsulta.RecordSourceType= 4
IF !EOF() THEN
thisform.grdConsulta.RecordSource="select id_caso,caso,fecha_ini,monto,monto1 into cursor XLX"
ELSE
thisform.grdConsulta.RecordSource=""
ENDIF

espero que me pueda ayudar con este problemita, le agradezco su tiempo.