[Electronic_Arts]

Я сделал вот что но не помогает

Код:

for i:=0 to ListView1.Items.Count-1  do
begin
If pos(Edit1.text, ListView1.Items[i].Caption)>0 then
ListView1.Selected:=ListView1.Items[i];
ListView1.Scroll(0, i);

прокручивает до конца листа и все!