Búsqueda incremental en Foxpro

Hola Jerry, necesito ver si tienes alguna idea para hacer búsquedas, tengo un formulario en el cual tengo un grid con muchas columnas, y muchos registros, hice un modo de buscar de acuerdo a lo que el usuario necesite de la siguiente forma, en el form tengo un combo y un text en el interactive change del text tengo el siguiente código y funciona bien, pero busca el texto del text en cualquier parte del código o la descripción por ejemplo selecciono en el combo que quiero buscar por nombre y excribo carlos en el grid me aparecen todos los carlos o los luis carlos o los jose carlos, funciona bastante bien pero ahora tengo usuarios preguntando si es factible que solo busque los carlos
IF
NOT EMPTY(ThisForm.combo1.Value)
IF NOT EMPTY(This.Value)
LOCAL sCampo, sFiltro, sCad
sCampo =ALLTRIM(ThisForm.Combo1.Value)
sFiltro =ALLTRIM(This.Value)
DO CASE
CASE TYPE
("&sCampo") == "C"
sCad = "UPPER(ALLTRIM('" + sFiltro + "')) $ UPPER(ALLTRIM(" + sCampo + "))"
CASE TYPE("&sCampo") == "N"
sCad =ALLTRIM(STR(VAL(sFiltro), LEN(ALLTRIM(This.Value)), 2)) + " == " + sCampo
ENDCASE
SET FILTER TO &sCad INTO teminvdeta
ELSE
SET FILTER TO .t. INTO teminvdeta
ENDIF
ThisForm.grid1.Refresh
Endif
Respuesta
1
Claro que es factible buscar solo pero solo los nombre que comiencen con "carlos"... Utiliza "Like" si no sabes como, proporcióname tu correo y te envío un ejemplo.
Muchas Gracias por tu respuesta Jerry, claro Jerry mi correo es [email protected]
Ya te lo envíe amigo... Cualquier duda preguntas.
***Suerte***

Añade tu respuesta

Haz clic para o

Más respuestas relacionadas