Re: Redimensionner une image |
Sujet: Re: Redimensionner une image par Machou43 sur 10/12/2008 15:51:07 J'ai essayer votre solution, mais je n'arrive pas a faire ce que je veux, en effet mon code me fait une sorte de zoom alors que ce n'est pas ce que je voudrais. voici le code que j'utilise et qui donne les résultats visibles avec les 2 images jointes : DEPART ARRIVEE //** Déclaration des Variables ** Ent_LargeurFinale est un entier Ent_HauteurFinale est un entier //** On calcule la valeur en largeur ** Ent_LargeurFinale = PtitLogo1..Largeur * 1.5 Ent_HauteurFinale = PtitLogo1..Largeur * 0.5 TANTQUE Ent_LargeurFinale > Image2..Largeur _OU_ Ent_HauteurFinale > Image2..Hauteur Ent_LargeurFinale = Arrondi(Ent_LargeurFinale * 0.98,0) Ent_HauteurFinale = Arrondi(Ent_HauteurFinale * 0.98,0) FIN dCopieImage(PtitLogo1, Image2, copieSrcCopie, 0, 0, Ent_HauteurFinale, Ent_LargeurFinale) Merci d'avance. |