Код:
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 | 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;
|
Нужно чтобы пост запрос был через прокси, помогите пожалуйста правильно реализовать правильно. Как разделить прокси в листбоксе на ip

ort?