Filtrar tabla y mostrar resultado en grilla

Tengo que hacer un formulario en donde tengo un textbox y una grilla, cuando ingreso el nombre de un cliente en el text tengo que filtrar una tabla y mostrar todos los registros coincidentes en la grilla.

1 respuesta

Respuesta
1
Tienes varias opciones:
En el procedimiento LostFocus, o InteractiveChange del textbox puedes poner algo así:
if empty(thisform.text1.value)=.t.
nodefault
return
endif
select mitabla
SET ORDER TO APELLIDO
set filter to
set filter to apellido=upper(alltrim(thisform.text1.value))
if.not.found()
wait window nowait 'Apellido no encontrado'
thisform.text1.value=' '
nodefault
return
endif
thisform.refresh
Puedes probar tambien con este codigo, en los mismos procedimientos:
if empty(thisform.text1.value)=.t.
nodefault
return
endif
select mitabla
SET ORDER TO APELLIDO
set filter to
SET filter to UPPER(TRIM(thisform.text1.value)) $ UPPER(TRIM(apellido))
if.not.found()
wait window nowait 'Apellido no encontrado'
thisform.text1.value=' '
nodefault
return
Endif
Thisform. Refresh


Hola experto, probé tu respuesta y solo pasa a la parte del código del if.not.found().
Te agradezco si tienes algún ejemplo de filtrado de tablas y grilla que me puedas enviar, mi correo es [email protected].
Gracias.
En este link te subi un ejemplo que se llama probar.zip
http://www.mediafire.com/?sharekey=d2b055a60c66dd6b312dbd5f2bdc5062e9d112ec649a1aaa292b492bd5edc68e
No olvides de cerrar tu pregunta.
Suerte

Añade tu respuesta

Haz clic para o

Más respuestas relacionadas

Usar set filter

Molestándote una vez más, y si quiero usar set filter, ¿Cómo debo hacer las cosas?, porque en el order me acuerdo que era así, pero en VFp 6.0 no me acepta el additive después del filter, ni antes del set filter, ni en medio, lo que quiero hacer es...
1 respuesta

Cuadro de textos

Espero que estés bien, mi pregunta es como trabajar con los cuadro de texto de visual foxpro para asignarle valores o algoritmos; por ejemplo en un formulario que contiene un valor como cuota inicial y otro cuota final como hago para que en el campo...
1 respuesta

Realizar búsqueda mediante textbox y mostrar en grid

Estoy realizando una búsqueda en la tabla cliente.dbf la cual tiene apellido, nombre, dirección, teléfono... La búsqueda la realiza ingresando el apellido en textbox, y luego presionando el botón buscar, una vez hecho esto se muestra los datos en...
1 respuesta

Búsqueda incremental en grid!..

Veraz tengo este código WITH thisform IF NOT EMPTY(THIS.Value) var1=ALLTRIM(UPPER(.text1.value)) SELECT grill SET FILTER TO LIKE("*"+var1+"*",UPPER(ALLTRIM(nombre))) GO top .grid1.refresh ELSE .text1.Value="" .text1.setfocus SET FILTER TO GO BOTTOM...
1 respuesta

Problemas con el botón guardar en visual foxpro 9.0

Tengo un problema con el botón guardar, tengo la siguiente codificación, 1ero en el Init del form SELECT agregarymodificar SET ORDER to CÓDIGO && CÓDIGO GO bott thisform.txtCodigo.value=agregarymodificar.código+1 thisform.refresh y luego en el click...
1 respuesta

Como filtrar un list o un grid en tiempo de ejecución

Estoy trabajando con VFP 7 y quisiera saber como filtrar en tiempo de ejecución. Por ejemplo: tengo una tabla clientes con los campos dni, apellido y nombre. Estos datos se muestran en un grid o en un list. Yo quiero ir escribiendo en un textbox el...
1 respuesta

Ayuda con datos en listbox

1.- Estoy realizando una búsqueda en una tabla atra vez de un textbox y los resultados se deben visualizar en un listbox... Por ejemplo tengo una tabla con los sig. Campos: id, fecha, remite, destino. Con los sig. Registros en el campo id: 01,012,...
1 respuesta

Trabajar con cursores

Colabórenme por favor, ¿Se puede realizar un append from a un cursor? Como lo hago Ejm, Select Campo1, campo2, campo3 from tabla1 where condiciones, condiciones2 into cursor a1 Use tabla2 ¿Append from? Necesito adicionar el cursor a1
1 respuesta