Disconnect calls Connect

[dabielkabuto]

Thank you for your excellent component. I am not sure if it is a bug or not but when from a client app I call Disconnect(), then Connect is called again from the Queue:
TIdWebsocketQueueThread.Execute
TIdWebsocketQueueThread.ProcessQueue
TIdWebsocketMultiReadThread.PingAllChannels
TIdHTTPWebsocketClient.TryUpgradeToWebsocket
TIdHTTPWebsocketClient.InternalUpgradeToWebsocket
TIdHTTPWebsocketClient.Connect

By the way, destroying the component in the client effectively disconnect from the server.