[dmitry123]

Код:

  data:=Tstringlist.create;
     data.Add('user='+Login);
     data.Add('password='+Password);
     data.Add('rem=1');
     data.Add('a=2');
     data.Add('ajax=1');
     data.Add('rnd=' + IntToStr(Random(1000)));
     data.Add('_tp_=xml');
     HTTP:=TIdHTTP.create;
     HTTP.HandleRedirects:=false;
     try
      HTTP.Post('tyt link', data);
      Rez:=-1;
     except
      if Pos('Set-Cookie: ', HTTP.Response.RawHeaders.Text)<>0 then
       Rez:=1
      else
       Rez:=0;
     end;
     HTTP.Free;
     data.Free;

Нужно чтобы пост запрос был через прокси, помогите пожалуйста правильно реализовать правильно. Как разделить прокси в листбоксе на iport?