Les exceptions

Commande de compilation...
Commande d'exécution...
Fichier source...

upscmp Source=exception.upl

Revenir en haut de la page...

exception

Revenir en haut de la page...

Source Composant "Exemple d'emploi des exceptions" Version 1.0.0;

Procedure P(P1 : Entier)
/*************************/
Variable Debut
C="coucou";
Ecran.Ecrire(C);
Ecran.Ecrire(10/P1);
Fin Procedure

Principal
Variable Debut
E=1;
E=E+Nul;
Si E==0 Alors Sinon Fin Si
Si X==DivisionParZero Alors Fin Si
Si X!=OuvertureLecture Alors Fin Si
AttraperException TraiterException
Fin AttraperException
Fin Principal

Revenir en haut de la page...