更改THttpClientSocket连接超时时间

THttpClientSocket连接超时时间默认是30秒，如果要设大点，可用下面的代码：

procedure TForm1.FormCreate(Sender: TObject);

begin

 //fhttp := OpenHttp('127.0.0.1', '5566');

 fhttp := THttpClientSocket.Create(50000);

 fhttp.Open('127.0.0.1', '5566',cslTCP, 50000);

end;