[icWasya]

Код:

for I:=0 to ListView1.Items.Count-1 do 
begin  
  if ListView1.Items[i].Selected then    
     .. ListView1.Items[i].Caption ...