🚀 go-pugleaf

> Where did you get 1110 from?  Socket errors are always 5 digits.  That
looks
> more like a Win32 API error code (1110 = ERROR_MEDIA_CHANGED)

Good observation, the code I have been using is...

void __fastcall TMyfrm::ClientSocketError(TObject *Sender,
      TCustomWinSocket *Socket, TErrorEvent ErrorEvent, int &ErrorCode)
{
  AnsiString ErrorString = GetSockError(ErrorCode);
  StatusBar->Panels->Items[1]->Text = ErrorString;
  ErrorCode = 0;   //stop exception from being thrown
}

//ClientSocket is a TClientSocket component

AnsiString __fastcall TMyfrm::GetSockError(int code)
{
  switch (code)
  {
    case 10004: return "A blocking operation was interrupted by a call to
WSACancelBlockingCall.";
    case 10009: return "The file handle supplied is not valid.";
    //case values 1010 to 11028 removed due to space
    case 11029: return "An invalid shape discard mode object was found in
the QOS provider specific buffer.";
    case 11030: return "An invalid shaping rate object was found in the QOS
provider-specific buffer.";
    case 11031: return "A reserved policy element was found in the QOS
provider-specific buffer.";
    default :
      return "!! Unknown Socket Error " + AnsiString(code);
  }
}

The exact text of the return value from the call to GetSockError is "!!
Unknown Socket Error 1110" which indicates the socket is returning a 4 digit
value.