Как осуществить быстрый поиск в Listbox?

Previous  Top  Next

    
 

 

Очень просто, смотри пример....

считаем, сто есть поле Edit1, в котором набираем текст, и ListBox, в котором ищем нужную строку, (как в Нelp).

Code:

procedure TForm1.Edit1Change(Sender: TObject);

begin

ListBox1.Perform(LB_SELECTSTRING,-1,longint(Pchar(Edit1.text)));

end;

 

 

©Drkb::00655

Взято из http://forum.sources.ru