[alyamus]

hi friends , listbox I'm doing search , There are two of the same name , but finds only one

Код:

 search:= 'happy';// There are two of the same name 
 if SendMessage(ListBox1.Handle, lb_selectstring, - 1, Longint(PChar(search))) <> LB_ERR then

with ListView1.Items.Add do begin
Caption:=IntToStr(ListBox1.ItemIndex); //but finds only one :(
lst.free;
end;

What is the problem ? There are two happy , but shows one

help me pls

[Admin]

Сообщение от alyamus

hi friends , listbox I'm doing search , There are two of the same name , but finds only one

Код:

 search:= 'happy';// There are two of the same name 
 if SendMessage(ListBox1.Handle, lb_selectstring, - 1, Longint(PChar(search))) <> LB_ERR then

with ListView1.Items.Add do begin
Caption:=IntToStr(ListBox1.ItemIndex); //but finds only one :(
lst.free;
end;

What is the problem ? There are two happy , but shows one

help me pls

http://www.delphisources.ru/pages/so...n-listbox.html