🚀 go-pugleaf

Greetings,

I have a small problem with client socket. If I set its Host property to an
unknown host and activate it (either by Open() method or by setting it's
Active property to true), application throws an exception which is handled
inside my handler:
...
Application->OnException = AppException;
...
void __fastcall TForm1::AppException(TObject *Sender, Exception *E)
{
TClientWinSocket *sckt1 = dynamic_cast< TClientWinSocket * >(Sender);
if (sckt1) { ...log error... check if active... }
...
}

When reading socket's Active property inside the exception handler above, it
reads false, which means socket is closed or in process of being closed.

Now, the problem is when I now set socket's Host property to existing,
running host, and open the connection, instead of connecting it throws an
error via OnError event. Error is, of course, related to prior connection
failure to unknown host. OnError event simply does not occur after exception
being thrown. Exception message is: "Windows socket error: No such host is
known (11001), on API 'ASync Lookup'" and ErrorCode inside OnError event is
#10049.

Is there any way of resetting ErrorCode inside exception handler, and if so,
would it prevent socket from triggering an OnError event? My current
solution involves setting socket's Active property back to true inside
exception handler what causes OnError event to occur for given unknown host
connection (I moved error logging inside OnError event), but this just
doesn't seem to be the right way to solve this problem.

Thank you.