procedure TForm2.Button1Click(Sender: TObject);
var
data,postdata:String;
begin
postdata:='proxys=127.0.0.1:8080%0D%0A200.55.44.1.3:80%0D%0A150.200.0.6:8000&time=5';
data:='POST /check_jhsdfk12498lk9284kjf8.php HTTP/1.1'+CRLF+
      'Host: www.2proxylife.net'+CRLF+
		  'Content-type: application/x-www-form-urlencoded'+CRLF+
		  'Content-Length: '+inttostr(length(postdata))+CRLF+
		  'User-Agent: PHP Script'+CRLF+
		  'Connection: Keep-alive'+CRLF+CRLF+
		  postdata;
    
    TcpClient1.Open;
    TcpClient1.Sendln(data);
    Memo1.Text:=TcpClient1.Receiveln(CRLF+CRLF);
    Memo2.Text:=Utf8ToAnsi(TcpClient1.Receiveln(''));
    TcpClient1.Close;
end;