Buscar en tlistbox con tedit

[kakesoft]

Muchos en este foros han utilizado pienso yo el Trucomanía y lo que quiero hacer pienso que sea sencillo. Me gustaría saber si alguien tiene una idea de como hacer lo mismo que hace el trucomanía en la ficha LISTADO de su explorador de trucos. O sea tengo un edit y un listbox con varias items en mi form y me gustaría hacer un sistema de búsqueda tal que a medida que vaya insertando caracteres en el edit se vayan que dando los items del listbox que coinciden con lo que está escrito en el edit, y si el edit no tiene nada escrito que se muestren todas las items del listox. Espero me ayuden.

graciassssss saludos a todos ......

[roman]

El explorador de trucos de trucomanía realmente usa un dbgrid así que posiblemente lo que haga sea lanzar un Locate del DataSet que use en el evento OnChange del Edit; algo como:

Código Delphi [-]
procedure Edit1Change(Sender: TObject);
begin
  Table1.Locate('titulo_truco', Edit1.Text, [loCaseInsensitive, loPartialKey]);
end;

Desconozco qué base de datos o cuáles componentes use para mantener la base de trucos. Pero aún si no usas propiamente una base de datos, puedes hacer uso de un ClientDataSet en el que almacenes los elementos que guardarías en el ListBox y en lugar de éste usar un DBGrid.

// Saludos

[[Héctor Randolph]]

Hace tiempo elaboré un componente que hace algo similar pero con un Edit y un ComboBox, no es exactamente lo que buscas pero tal vez puedas obtener algunas ideas del código.

AutoCompleteEdit

Instala el componente, agrega una instancia en un Form y modifica la propiedad SearchList para agregar las cadenas, después lo que escribes en el Edit se buscará en esta lista al estilo AutoCompletar.

Por otra parte, me parece mejor idea implementarlo con un DBGrid porque mi código utiliza búsqueda binaria y no es la forma óptima de hacerlo.

Un saludo.

[roman]

Empezado por HECTOR RANDOLPH

no es exactamente lo que buscas pero tal vez puedas obtener algunas ideas del código.

Y ¡vaya que se obtienen algunas ideas!

Tu componente me ha parecido magnífica. Gracias por compartirla.

// Saludos

[kakesoft]

Hector te diré que eso no es lo que busco pero bueno muchas gracias y te digo lo mismo que Roman tu componente está buenísimo me servirá para otras muchas cosas de importancia que tengo que hacer

[kakesoft]

Roman la idea que me diste no la he puesto en práctica todavía, o sea en estos momentos lo haré y te diré el resultado ok saludo a ti y a Hector en especial y en general a todos los que visitan esta importántísima página en INTERNET