Merge branch 'master' of https://github.com/andremussche/DelphiWebsockets
This commit is contained in:
commit
491206d8fb
1 changed files with 1 additions and 0 deletions
|
@ -542,6 +542,7 @@ begin
|
||||||
sURL := Format('http://%s:%d/socket.io/1/', [Host, Port]);
|
sURL := Format('http://%s:%d/socket.io/1/', [Host, Port]);
|
||||||
strmResponse.Clear;
|
strmResponse.Clear;
|
||||||
|
|
||||||
|
ReadTimeout := 5 * 1000;
|
||||||
//get initial handshake
|
//get initial handshake
|
||||||
Post(sURL, strmResponse, strmResponse);
|
Post(sURL, strmResponse, strmResponse);
|
||||||
if ResponseCode = 200 {OK} then
|
if ResponseCode = 200 {OK} then
|
||||||
|
|
Loading…
Reference in a new issue