Fonction Optimiser(NulAbsorbant) Retailler(L : Entier, H : Entier, P : Nul Ou Point, CouleurTrou : Nul Ou Couleur, C : Booleen=Faux) Retourner Nul Ou IImage;
Le contenu de l'image n'est pas dilaté ou contracté en largeur et en hauteur.
En cas d'agrandissement, le contenu de l'image courante est positionnée aux coordonnées données par le paramètre P et le trou issu de l'agrandissement est rempli avec la couleur CouleurTrou.
En cas de rétrécissement, le contenu de l'image courante est tronqué.
Si le paramètre C a pour valeur Vrai, alors l'image courante est copiée avant l'opération. Ainsi l'image courante est inchangée.
Le résultat est l'image une fois la taille de l'image changée.
Si P ou CouleurTrou sont Nul, alors le résultat est Nul.
En cas d'erreur, l'exception OperationImageImpossible est envoyée.
Principal
/*******/
Variable
/******/
I : Nul Ou IImage;
Debut
...
I=I.Retailler(I.LargeurPixels*2, I.HauteurPixels*2, Point(I.LargeurPixels/2, I.HauteurPixels/2), I.Contexte.CouleurBlanc);
/* Double la taille de l'image. Le contenu est centré et le trou est rempli en blanc. */
...
Fin Principal
| - | - | - | - | - | - | - | - | - |