пробывал переделать так
Код:
procedure TForm1.But_Pay_Button2Click(Sender: TObject);
var
i : integer;
URL_Pay : String;
begin
for i:=0 to Listview1.Items.count-1 do begin
PayThread1.Create(false, Listview1.Items[i]
end;
не помогает
, ругается на ошибку в listview1