Как организовать поиск

← →
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]

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

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