FoxPro/Visual FoxPro - busqueda en un grid

   
Vista:

busqueda en un grid

Publicado por Manuel M. (332 intervenciones) el 16/12/2008 15:51:39
Saludo al foro,

Este es mi problema:

tengo un grid con codigo,nombre,cantidad,precio es decir para una factura.

yo quiero que cuando me busque por el codigo y no lo encuentre poder regresar al codigo y no que salte al nombre como lo esta haciendo.

en resumen, no se como enviar el focus a una columna cuando lo desee.

en espera de ustedes:

mil gracias.
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder

RE:busqueda en un grid

Publicado por Juan Fernando (533 intervenciones) el 16/12/2008 16:05:32
trabaja el puntero con el tab Index de las columnas del Grid1

estamos en la Text1 de la columna1 del Grid1 en su evento Valid

buscamo el código=variable
If si encuentra
instrucciones verdaderas

else
* Cuadro de dialógo
* puntero retorna a Text1 de la columna1 del Grid1

Thisform.Grid1.Column1.Text1.TabIndex=1
Thisform.Grid1.Column2.Text2.TabIndex=2
etc .
Return=.t.
Endif
Thisform.Grid1.Column1.Text1.Refresh
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

Falta algo

Publicado por Manuel M. (332 intervenciones) el 16/12/2008 18:17:07
Miren lo que tengo:

Esto me busca bien pero aun no logro dominar el focus, quiero que si no tiene existo regrese a la columna 1 (text1).

SELECT articulos
LOCATE FOR articulos.codigo=detalles.codart
IF FOUND()
replace detalles.descrip with articulos.descrip
replace detalles.venta WITH articulos.venta
thisform.grid1.Refresh

ELSE

thisform.grid1.column1.text1.TabIndex =1
thisform.grid1.column1.text1.refresh
return=.t.
endif
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

RE:Falta algo

Publicado por enrique (1041 intervenciones) el 16/12/2008 18:34:48
proba poniendo

thisform.grid1.column1.text1.setfocus

o

thisform.grid1.column1.text1.gotfocus
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar
Imágen de perfil de Mauricio

Falta algo

Publicado por Mauricio (1368 intervenciones) el 18/12/2008 15:10:40
Modifica esto:
*---
SELECT articulos
LOCATE FOR articulos.codigo=detalles.codart
IF FOUND()
*--- Sentencias por encontrar
ELSE
*--- Sentencias por no encontrar
RETURN .F. && Esto hace que el focus no se desplace
endif
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar