Fonction Optimiser(NulAbsorbant) CreerMasqueDessin(I : Nul Ou IImage) Retourner Nul Ou MasqueDessin;
Quand un pixel de I est allumé i.e. noir alors le masque laisse passer le dessin.
Si l'image n'est pas en noir et blanc, alors l'exception GraphismeImpossible est envoyée.
Principal
/*******/
Variable
/******/
M : Nul Ou MasqueDessin;
I : Nul Ou IImage;
Debut
...
M=CreerMasqueDessin(I);
/* Crée le masque de dessin. */
...
Fin Principal
- | - | - | - | - | - | - | - | - |