default readtimeout for connect

2014-03-28 12:47:25 +01:00 · 2014-03-28 12:47:25 +01:00 · f6f958fb74
parent 72711f0f27
commit f6f958fb74
1 changed files with 1 additions and 0 deletions
--- a/IdHTTPWebsocketClient.pas
+++ b/IdHTTPWebsocketClient.pas
@ -527,6 +527,7 @@ begin
      sURL := Format('http://%s:%d/socket.io/1/', [Host, Port]);
      strmResponse.Clear;

+      ReadTimeout := 5 * 1000;
      //get initial handshake
      Post(sURL, strmResponse, strmResponse);
      if ResponseCode = 200 {OK} then