response := TStringStream.Create('');
http := THTTPSend.Create;
http.UserAgent := 'Mozilla/5.0 (compatible; MSIE 10.0; Windows NT 6.2; WOW64; Trident/7.0';
http.MimeType := 'application/x-www-form-urlencoded; charset=UTF-8';
http.Sock.SocksIP := 'IP'; //
http.Sock.SocksPort := '1080';
http.Sock.SocksType := ST_Socks5;
http.Sock.SocksUsername := 'UserName'; //
http.Sock.SocksPassword := 'Password'; //
http.Sock.ConnectionTimeout := 6000;
jsontext := EncodeURL('Some JSON Data');
WriteStrToStream(HTTP.Document, jsontext);
http.HTTPMethod('POST', 'http://.....'); // HTTP site
reulstcode := http.resultcode;