Una volta impostate tutte le configurazioni necessarie del server, ci sono 2 utili eventi per sapere quando il server è avviato e quando si è fermato.
Questo evento viene generato quando il server è stato avviato e può elaborare nuove connessioni.
procedure OnStartup(Sender: TObject);
begin
WriteLn('#server started');
end;
Questo evento viene attivato dopo che il server si è fermato e non vengono più accettate connessioni.
procedure OnShutdown(Sender: TObject);
begin
WriteLn('#server stopped');
end;