Faire un savepicture en vb.net

Commenter

Contenu du snippet

Encore une fonction utile de Vb6 qui a disparu de VB.Net : le SavePicture sur un contrôle PictureBox. Pour reproduire cette foncitonnalité sous VB.net, il faut procéder de la manière suivante :

Source / Exemple : 


Dans le cas d'une pictureBox contenant une image, la solution est simple :

pictureBox.Image.save("c:\fichier.gif",  ImageFormat.Gif)

Dans le cas d'une pictureBox contenant un objet Graphics qui subit des modifications (dessins etc.) :

        Dim bitMap As New Bitmap(pictureBox1.width, pictureBox1.height)
        Dim g as Graphics = Graphics.FromImage(bitMap)
        Try
            g.Clear(Color.White)
            '
            '  Insérer ici les commandes de dessin sur g
            '  (si dessin effectué avant, passer g en paramètre à la sub ou             
            '   utiliser un g de classe)
            '
            bitMap.Save("C:\fichier.gif", ImageFormat.Gif)
        Finally
            g.Dispose
            bitMap.Dispose()
        End Try

Conclusion :


Pour que le code ci-dessus fonctionne, il faut naturellement un contrôle pictureBox, mais surtout il faut déclarer l'import des namespaces :

Imports System.Drawing
Imports System.Drawing.Imaging

Vous pouvez sauver l'image du pictureBox au format que vous voulez, en modifiant le bitMap.save avec la valeur ImageFormat adéquat.

Solution tirée de DrGUI.Net #3, car pas dans la doc msdn :
http://msdn.microsoft.com/library/en-us/dnguinet/html/drguinet3code.asp?frame=true#top_3

A voir également

S'inscrire maintenant

Vous n'êtes pas encore membre ?

inscrivez-vous, c'est gratuit et ça prend moins d'une minute !

Les membres obtiennent plus de réponses que les utilisateurs anonymes.

Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.

Le fait d'être membre vous permet d'avoir des options supplémentaires.

Du même auteur (LeCarto)