FoxPro/Visual FoxPro - PROPIEDAD AUTO COMPLETE

HOLA AMIGOS
HACE ALGUN TIEMPO, AQUI ME ENSEÑARON
ACERCA DE LA PROPIEDAD DE AUTO COMPLETE
PARA UN TEXT

AHORA PREGUNTO ¿SI EXISTE ALGUNA FORMA DE
APLICAR ESTO EN UN COMBO BOX PARA QUE HAGA
LO MISMO?

GRACIAS POR SU ATENCION
SALUDOS A TODOS

Huguito, porque no lo pruebas y lo cuentas????????????????

hola triple equis-cito

Hola Kong-cito

Amigo Hugo :

Te dire que existen por lo menos 3 formas de hacer lo que mencionas.

A continuacion te muestro un codigo que no es de mi autoria que data del año 99 pero que para mis propositos ha sido muy funcional y practico claro que le he tenido que añadir algunas lineas mas como cuando deseo agregar un nuevo item en el ComboBox cuando dicho item sea nuevo, por ahora te muestro el codigo principal.

IF Between(nKeyCode, 32, 122)
For x = 1 to this.ListCount
IF upper(subs(this.list(x), 1, this.selstart+ 1)) = ;
upper(subs(this.text, 1, this.selstart)+chr(nKeyCode))
nCurPos = this.selstart + 1
this.Value = this.list(x)
this.SelStart = nCurPos
this.SelLength = len(allt(this.list(x))) - nCurPos
nodefault
exit
Endif
Next x
Endif

Comparto este codigo como una forma de retribuir cuando necesite un apoyo a una consulta en este foro..

Saludos,

Gabriel
(Lima-Perú)