Disconnected Event
Fired when a connection is closed.
Syntax
type TDisconnectedEvent = procedure Disconnected(Sender: TObject; StatusCode: Integer; const Description: String) of object;property OnDisconnected: TDisconnectedEvent read FOnDisconnected write FOnDisconnected;
Remarks
If the connection is broken normally, StatusCode is 0 and Description is 'OK'.
If the connection is broken for any other reason, StatusCode has the error code returned by the TCP/IP subsystem. Description contains a description of this code. The value of StatusCode is equal to the value of the TCP/IP error.
Please refer to the Error Messages section for more information.