更改THttpClientSocket连接超时时间

更改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;