La Web del Programador: Comunidad de Programadores
 
    Pregunta:  10522 - BUSQUEDA POR COINCIDENCIA
Autor:  Gabriel Canseco
ESTOY APRENDIENDO APROGRAMAR EN CLIPPER 5.3 Y NECESITO QUE MI SISTEMA HAGA UNA BUSQUEDA EN UNA BASE DE DATOS, PERO QUE CONFORME VAYA PONIENDO EL NOMBRE VAYA ENCONTRANDO COINCIDENCIAS EN LA BASE.

TENGO ENTENDIDO QUE HAY UNA LIBRERIA O FUNCION PARA HACER ESTO PERO DESCONOSCO CUAL SEA.

TRABAJO EN WINDOWS 98 CON CLIPPER 5.3

GRACIAS POR A TODOS

  Respuesta:  Fernando Reyes
#include "getExit.ch"

cls
cVar:=space( 30 )
@ 10,10 say "Escriba aquí su Consulta:" get cVar pict "@K"

oGet:=atail( getList )
oGet:setFocus():exitState:=GE_NOEXIT

while oGet:exitState == GE_NOEXIT

getApplyKey( oGet, inkey(0), GetList )

// en este punto, en atail( getList ):buffer
// tienes el valor para que hagas con él lo que quieras
// por ejemplo un Seek( atail( getList ):buffer )
// el display de abajo es por si has escrito algo en
// pantalla o si has echo un refresh para un browse,
// con lo que el cursor queda sabe Dios donde.

oGet:display()

endDo