listbox'dan Listview'e aktarma sorunu ?

[spectermun]

arkadaşlar merhaba listbox içinde örneğin 10 tane items var listbox içerisinde ilk harflerine göre arama yaptırıyorum mesela ara:='hediye'; bu kelime ile başlayanları sıra ile listviewe aktarmak istiyorum hediyenin biri 4 diğeri 5 ci item deyse o gidip sadece en baştakini yani 4 .item de ki hediyeyi aktarıyor 5 .item dekini alamıyorum kullandığım kod

Kod: Tümünü seç

  ara:= 'hediyen';
 if SendMessage(ListBox1.Handle, lb_selectstring, - 1, Longint(PChar(ara))) <> LB_ERR then

with ListView1.Items.Add do begin
Caption:='Kategori'; 
Subitems.Add('1.Sayfa'); 
Subitems.add(IntToStr(ListBox1.ItemIndex+1) + '.Sıra');  // burada sadece ilk bulduğunu listviewe gönderiyor  
lst.free;
end;

Bu kısmı nasıl aşabilirim ?

[mrmarman]

iki şekilde çözüm üretebilirsin.
(1) Şu an kullandığın şekilde her bulduğunda aktarma yaptıktan sonra bulduğun itemi silip yeniden arama yapmak. Taa ki arama sonucu olumsuz olana kadar.
(2) Böyle bir arama yerine basit bir 0 to ListView.Items.Count-1 kadarlık FOR döngüsü kurup, bulduğunu aktarıp bir defada basitçe hallederek.