Procedure ServirDesClients(NbClientsMax : Entier);
Si NbClients n'est pas compris entre 0 et 32767, alors l'exception ChangementNbClientsMaxImpossible est envoyée.
Principal
/*******/
Variable
/******/
C1 : Nul Ou CanalTcpIp;
Debut
...
C1.ServirDesClients(100);
/* 100 clients peuvent se connecter au maximum. */
...
Fin Principal
- | - | - | - | - | - | - | - | - |