Znajdywanie w listview

Jeżeli w listview mam np.: imiona przyjaciół,to jak zrobić,aby przy pomocy TEdit znaleŹć wpisaną lokację?

POMÓŻCIE!!!

{hello}

ja bym zrobil petelke :-)

var
i, Index : integer;
begin

for i := 0 to ListView1.Items.Count-1 do
if ListView1.Items.Item[i].Caption = Edit1.Text then
begin
Index := i; *numer Itemu w ktorym jest szukany tekst
ListView1.Items.Item[i].Selected := True; *zaznacz Item
ListView1.SetFocus ;
end;

end;

jak ktos wie czy jest jakis latwiejszy sposob to niech pisze :-)

--
-=[ Delphi 3, 6 ]=-
-=-==[ LKS ]==-=-

LKS "był napisał":

LKS - znowu cos pokielbasiles :)

Primo: ListView nie ma czegos takiego jak Items.Item[x].
Nalezaloby najpierw wyjasnic jak wyglada taki ListView, otoz :
Pierwsza kolumna to ListView.Items[x].Caption (a nie jak piszesz Listview.Items.Item[x]), natomiast kolejne kolumny to
ListView.Items[x].SubItems[k], gdzie k jest numerowane od 0.

Secudno: Twoj przyklad z peteleka jest niepotrzebny, gdyz :
ListView.Items to TListItems , wiec aby sprawdzic czy element jest na liscie wystraczy:

if ListView.Items.IndexOf(szukananwartosc)&lt&gt-1 then ....

Pozdrawiam
Fojcik
GG: 19840

Primo: ListView nie ma czegos takiego jak Items.Item[x].
jak nie jak tak :-)

Secudno: Twoj przyklad z peteleka jest niepotrzebny
ja zrobilem za pomoca petelki ale skoro jest latwiejszy sposob to OK :-)---=[ Delphi 3, 6 ]=-
-=-==[ LKS ]==-=-