🚀 go-pugleaf

Could someone explain to me how to handle an exception when trying to open a
connection from a TClientSocket.

Heres what is happening;

I issued the following.

        try
        {
                       Form1->ClientSocket1->Open()
;
           ;
        }
            catch (...)
            {
            ShowMessage("Error");

            }

Now I have purposly placed an invalid host into the Form1->ClientSocket1 so
that an exception will occur, and it does.

I also have the Error Event returning 0 if I get an error.

So what happens is this.

The first time I issue the open command, the Disconnect event is fired, and
then the Exception displays a message. No error even is fired.

If I issue the open command again, no Disconnect event is fired, an Error
event is fired, No Exception is fired.

If I repeat the open again, the first condition occurs again.


So I don't understand how to catch the exception, or why the actions are
different between the first open and the second open.

Can someone help me with this.

Thanks for any information.

Mike