Batch Index du Forum
S’enregistrerRechercherFAQMembresGroupesConnexion
Répondre au sujet Page 1 sur 1
[Tutoriel] Capture d'image [Niveau:Simple]
Auteur Message
Répondre en citant
Message [Tutoriel] Capture d'image [Niveau:Simple] 
Salut a tous,


Dans ce tutoriel je vais vous montrer comment réalisé un logiciel qui prend des images(screenshots) de votre écran et puis les enregistre a l'endroit voulu par l'utilisateur en format (.bmp).


Requis:


- 1 PictureBox
- 2 Boutons (1 Bouton Capture & 1 Bouton Enregistrer)


Une fois fait,
Voici les codes a mettre dans les boutons.


Code bouton "Capture":


 


Code:
Opacity = 0
ShowInTaskbar = false
Dim Bounds As Rectangle
Dim Capture As System.Drawing.Bitmap
Dim Graph As Graphics
Bounds = Screen.PrimaryScreen.Bounds
Capture = New System.Drawing.Bitmap(Bounds.Width, Bounds.Height, System.Drawing.Imaging.PixelFormat.Format32bppPArgb)
Graph = Graphics.FromImage(Capture)
Graph.CopyFromScreen(Bounds.X, Bounds.Y, 0, 0, Bounds.Size, CopyPixelOperation.SourceCopy)
PictureBox1.Image = Capture
Opacity = 100
ShowInTaskbar = True 




Code bouton "Enregistrer":


 


Code:
Dim SaveFileDialog1 as SaveFileDialog = New SaveFileDialog
Dim pic As Image
SaveFileDialog1.DefaultExt = "*.bmp"
SaveFileDialog1.Filter = "Image Bmp (*.bmp)|*.bmp"
pic = PictureBox1.Image
If SaveFileDialog1.ShowDialog() = System.Windows.Forms.DialogResult.OK Then
pic.Save(SaveFileDialog1.FileName)
Else
MsgBox("Une erreur c'est produite !")
End if 






Voilà c'est terminé,plus qu'à tester !



Message Publicité 
PublicitéSupprimer les publicités ?


Montrer les messages depuis:
Répondre au sujet Page 1 sur 1
  



Index | créer un forum | Forum gratuit d’entraide | Annuaire des forums gratuits | Signaler une violation | Conditions générales d'utilisation
Copyright 2008 - 2016 // Batch