FoxPro/Visual FoxPro - busqueda en grid

   
Vista:

busqueda en grid

Publicado por eduardo (139 intervenciones) el 13/04/2008 01:32:55
hola:

tengo un formulario con un grid y un textbox
en el record source del mismo tengo una tabla de alumnos,la cual ordeno
por apellido en el load del form con este codigo:
----------------------
close data all
set defa to d:prueba
use alumnos excl
sele alumnos
inde on apel tag indape
set order to indape
-------------------------
en el evento interactive change del text que tengo en el form tengo el siguiente
codigo:
------------------
sele alumnos

seek upper(this.value) &los apellidos en la base estan en mayuscula
thisform.grid1.refresh
----------------------------------
lo que quiero lograr es que a medida que voy tipeando letras en el text me vaya
aproximando el cursor al apellido buscado en el grid ,y no lo puedo hacer.necesitaria que por favor alguien me diga donde esta la falla.
desde ya gracias por la ayuda
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 grid

Publicado por alberto (399 intervenciones) el 13/04/2008 03:48:23
que tal amigo lo que falta en tu codigo es despues del seek
agregar thisform.grid1.setfocus y despues refrescas
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:busqueda en grid

Publicado por alberto (399 intervenciones) el 13/04/2008 03:52:14
te mando un ej de un form mio en el interactivechange

*--- InteractiveChange ---
LOCAL lc, lnRecno
SELECT Articulo
SET ORDER TO DESARTIC
lc = ALLT(THIS.VALUE)
IF NOT EMPTY(ORDER()) && busqueda con indice
if ISDIGIT(lc)
set order to codart && con esto puede buscar por descripcion o por codigo de articulo
endif
set near on
SEEK lc
ENDIF
THISFORM.grdarticulo.SETFOCUS && el nombre del TextBox
THISFORM.text1.SETFOCUS && el nombre del Grid
RETURN
*--- END InteractiveChange ---
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

gracias amigos!!!!

Publicado por eduardo (139 intervenciones) el 13/04/2008 15:28:35
anduvo ok lo que me pasaron!
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