Connected Event
Fired immediately after a connection completes.
Syntax
type TConnectedEvent = procedure ( Sender: TObject ) of Object;
property OnConnected: TConnectedEvent read FOnConnected write FOnConnected;
Remarks
When the connection is successfully established this event will fire.