Ver Mensaje Individual
  #2  
Antiguo 23-06-2004
Avatar de marcoszorrilla
marcoszorrilla marcoszorrilla is offline
Capo
 
Registrado: may 2003
Ubicación: Cantabria - España
Posts: 11.221
Reputación: 10
marcoszorrilla Va por buen camino
Suponiendo que tengas indexado el campo como es lógico, puedes poner un Tedit y en su evento OnChange el código sería:

MiTabla.FindNearest(Edit1.text);

Con esto lograrías un búsqueda incremental.

Lo más lógico sería poner un par de RadioButtons, que preguntarán si vamos a buscar palabras en español o en inglés, en este caso antes de lanzar la búsqueda habría que activar el índice correspondiente.
Código Delphi [-]
If lo_Que_Sea then
MiTabla.IndexName:='Ingles'
else
MiTabla.IndexName:='Espanol';
MiTabla.FindNearest(Edit1.text);

La tabla podría mostrarse en una rejilla con la porpiedad ReadOnly a True.

Un Saludo.
__________________
Guía de Estilo de los Foros
Cita:
- Ça c'est la caisse. Le mouton que tu veux est dedans.
Responder Con Cita