FoxPro/Visual FoxPro - Ver lista del Combobox

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...

lo k yo hago es untilizar un list donde cargo la lista de coincidencia y combino ambas alternativa

ok amigo gracias... pero como filtro los datos del campo a solo los que que empiezen por las letras que introdusco?