FoxPro/Visual FoxPro - Ver lista del Combobox

   
Vista:

Ver lista del Combobox

Publicado por coello carlos daniel (9 intervenciones) el 09/04/2008 15:08:38
Hola a todos... escribo por que esty haciendo una bsuqueda en un combobox en el que tengo los valores de un campo de una tabla y quisiera que en la lista del combobox me valla filtrando y mostrando los valores que coincidan con lo que escribo.
HELDER MARTINEZ facilito este codigo en otro post :

LOCAL lnUltimaTecla, lcMostrarValor,lcUltimoValorMostrado, ;
lnUltimaSeleccion, lnSeleccionados
lnUltimaTecla = LASTKEY()
lcUltimoValorMostrado = ""
lnUltimaSeleccion = 0
lnSeleccionados = 0
IF (lnUltimaTecla >= 32 AND lnUltimaTecla <= 126)
IF THIS.SELSTART >= 1
lcMostrarValor = SUBSTR(THIS.DISPLAYVALUE,1,THIS.SELSTART-1)+(CHR(lnUltimaTecla))
ELSE
lcMostrarValor = (CHR(lnUltimaTecla))+ALLT(THIS.DISPLAYVALUE)
ENDIF
IF EMPTY(lcMostrarValor)
lcMostrarValor = ALLT(CHR(lnUltimaTecla))
ENDIF
FOR i = 1 TO THIS.LISTCOUNT
IF UPPER(lcMostrarValor) = UPPER(SUBSTR(THIS.LIST(i),1,LEN(lcMostrarValor)))
THIS.DISPLAYVALUE = THIS.LIST(i)
IF LEN(ALLT(THIS.DISPLAYVALUE)) > LEN(lcMostrarValor)
THIS.SELSTART = LEN(lcMostrarValor)
THIS.SELLENGTH = LEN(ALLT(THIS.DISPLAYVALUE))-LEN(lcMostrarValor)
ENDIF
lcUltimoValorMostrado = THIS.DISPLAYVALUE
lnUltimaSeleccion = THIS.SELSTART
lnSeleccionados = THIS.SELLENGTH
RETURN
ENDIF
ENDFOR
THIS.DISPLAYVALUE = lcUltimoValorMostrado
THIS.SELSTART = lnUltimaSeleccion
THIS.SELLENGTH = lnSeleccionados
ENDIF

"este codigo va en el interactive change"
me funciona de maravilla pero lo que pasa es que quisiera ver la lista de las cosas que coinciden con lo que escribo, no que solo autocomplete con el 1º que encuentre que coincida, porque hay muchos productos que empiezan igual pero son diferentes o cambian las medidas y es dificil encontrarlos... muchas gracias... espero que puedan ayudarme...
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:Ver lista del Combobox

Publicado por jose camilo (688 intervenciones) el 10/04/2008 04:26:53
lo k yo hago es untilizar un list donde cargo la lista de coincidencia y combino ambas alternativa
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:Ver lista del Combobox

Publicado por coello carlos daniel (9 intervenciones) el 10/04/2008 15:13:38
ok amigo gracias... pero como filtro los datos del campo a solo los que que empiezen por las letras que introdusco?
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