* Actually use introduced cross-platform constant...

git-svn-id: trunk@39540 -

packages/fcl-net/src/ssockets.pp

@@ -1125,7 +1125,7 @@ begin
 {$IFDEF HAVENONBLOCKING}
   if (ConnectTimeOut>0) then
     begin
-    if IsError and (Err=ESysEINPROGRESS) then
+    if IsError and (Err=ErrWouldBlock) then
       begin
       TimeOutResult:=CheckSocketConnectTimeout(Handle, @FDS, @TimeV);
       IsError:=(TimeOutResult<>ctrOK);