idhttp with listview

[bulldog5293]

В google и яндексе не нашёл вот и решил спросить, если данные сайт+логин+пас заносятся в Listview, в режиме репорт по калонкам, то как тогда передать их idhttp?

[bulldog5293]

Или с таким ещё не кто не работал?

[bulldog5293]

Задам вопрос по другому, как в idhttp передать данныеи из item(i) Listview'a, начиная со второго значения, потому что первое значение это номер строки

[bulldog5293]

Или с Listview такое не провернуть?

[bulldog5293]

В чём косяк?
procedure TForm2.Модальное=окноClick(Sender: TObject);
begin
with TForm5.Create(nil) do
Form5.ShowModal;
if Form5.ModalResult=mrOk then
if Form5.ModalResult=mrCancel then
try
Form2.idhttp1.Assign(ListView1.Item s);
finally
free;
end;
end;

procedure TForm2.ВойтиClick(Sender: TObject);
var
s:TStringStream;
data:TStringList;
i: integer;
begin
s:=TStringStream.Create;
data:=TStringList.Create;
IdHTTP1.get('Adress : ' + Form2.Listview1.Items[0].SubItems.Strings[1]);
IdHTTP1.get('http://Сайт.ru/login.php?r=');
Data.Add('Login' +Form2.Listview1.Items[0].SubItems.Strings[2]);
Data.Add('Pass: ' + Form2.Listview1.Items[0].SubItems.Strings[3]);
IdHTTP1.Post('http://Сайт.ru/login.php',data,s);
IdHTTP1.get('http://Сайт.ru/privatecab.php',s);
s.position:=0;
if (Pos('privatecab.php',s.DataString) <> 0) or (Pos('Name',s.DataString) <> 0) then
ShowMessage('Авторизация прошла успешно')
else
ShowMessage('Авторизация провалилась');
end;

[bulldog5293]

вопрос снят я разобрался