<syntaxhighlight lang="delphi"> type TClientEvent = procedure (Sender : TObject;
CliWSocket : TClientWSocket) of object;
property OnClientConnected : TClientEvent; </syntaxhighlight>
Occurs when a client connect to the server.
This event is triggered when a client connect to the server. It could be used to disconnect unwanted client or any other processing that must be done when a new client connect, such as updating the server user interface to show how many clients are connected.