FTP | CCD | Buscar | Trucos | Trabajo | Foros |
|
Registrarse | FAQ | Miembros | Calendario | Guía de estilo | Temas de Hoy |
|
Herramientas | Buscar en Tema | Desplegado |
#1
|
|||
|
|||
Autocompletar un TEdit (solución, no consulta)
Buenas
Alguna vez he necesitado autocompletar un TEdit en base al texto de una tabla y la recomendación fue usar otro componente como dblookupcombobox, lo cual me vino bárbaro. Pero, en estos días realicé una aplicación en el cual logré hacer un tedit que se autocompleta y quería poner un ejemplo a disposición del foro por si les interesa. Aclaro que no soy programador experto, este código es simple y totalmente mejorable. Componentes a usar: -un TQuery apuntando a la base de datos -un TEdit (en el cual se realizará la búsqueda) Procedimiento:- En el evento OnChange del TEdit (Filtra la consulta con el texto que se escriba en el edit)
En el evento OnKeyUp del Edit:
La variable "contador" la ponemos como public En el evento OnCreate del form:
Yo he puesto algunos eventos de teclado para evitar ciertas teclas (tab, enter, etc.) , pero eso ya va a gusto del consumidor, como dije antes, es totalemente mejorable. (Lo hice en Delphi 4 con una base de datos Paradox). Un abrazo y espero le sirva a alguien. Walter Última edición por Walterdf fecha: 04-10-2004 a las 22:12:52. Razón: Equivoqué la posición de una etiqueta |
|
|
|