[Noooob]

а можно пример по потоку, а то у меня не получилось.

Код:

for s:=0 to Form1.ListView1.Items.Count-1 do
 begin
  Form1.ClientSocket1.Socket.SendText(Form1.ListView1.Items.Item[s].SubItems[3]);
{тут должна быть пауза пока не придет ответ}
 end;