Скачать: CL | DM;

Как организовать поиск   Найти похожие ветки 

← →
nevalex ©   (2003-05-11 19:47) [0]

Как организовать поиск по ListBox1 ,но чтоб по всему,т.е посреди строки без привязки к её началу (короче как в winAmp`e при нажатии F3 на playlist`e)
СПАСИБО

---

← →
noname   (2003-05-11 22:20) [1]

я не знаю - это слишком трудно :(

---

← →
Vasiliy   (2003-05-11 23:07) [2]

Function Search(S:String):Integer;
Var I:Integer;
begin
Result:=0;
With ListBox.Items do
For I:=0 to Count-1 do
If Pos(S,Strings[I])>0 then Result:=I;
end;

---

← →
nevalex ©   (2003-05-11 23:35) [3]

Большое СпАсибО!!!!!!
только вместо Function Search(S:String):Integer;
надо
Function Search(S:String;listbox:tlistbox):Integer;

---

← →
Vasiliy   (2003-05-12 18:11) [4]

Ну это мелочи, главное идея :)

---

Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.45 MB
Время: 0.009 c