fonction pour redimensionner une image

Rédigé par spheris Aucun commentaire
Classé dans : Tutoriels, picturebox, gambas 3 Mots clés : aucun

J 'ai découvert une fonction super pratique pour redimensionner n 'importe quelle image.

il vous suffit d 'écrire ce code :


Private Function Iresize($file As String, s As Integer) As Picture
Dim i As Image
i = Picture[$pic &amp $file].Image.Stretch(s, s)
Return i.Picture
End


et d 'appeler cette fonction simplement comme ceci :

Dim monimage as picture
monimage = iresize(monfichierimage, tailleenpixel)


exemple :

monimage = iresize( icone.png , 32)


Voilà pour aujourd 'hui.
wink