Fusionner deux picturebox

Bonjour le forum,

Je développe une appli qui surveille les utilisateurs de mon pc (photo via webcam + capture écran).

Pour l'instant je n'ai que mes deux images dans des picturebox (200x200 pixels) que j'enregistre séparément. Je souhaiterais plutôt ne faire qu'un fichier (1 picturebox de 200x400) avec mes images l'une à côté de l'autre.

Faut-il fusionner les 2 picturebox avant l'enregistrement ou bien faut-il enregistrer les deux picturebox et ensuite fusionner les fichiers ? Et comment faire ?

Merci de l'aide que vous pourrez m'apporter

dim img as new bitmap(200,400)
dim g as system.drawing.graphics
= graphics.fromimage(img)
g.drawimage(imgpicturebox1, 0,0)
g.drawimage(imgpicturebox2,200,0)
img.save


ou un truc qui ressemble ^^

Merci à toi !

Ce code est excellent, en ajustant les tailles réelles des images et non pas celles des picturebox (car la 1ère picturebox affiche une image de 320*240 et la 2ème une image de 1440*900 mais ces picturebox font 320*240) ce qui me donne à l'arrivée une image de 1760*900

Code:

---

1 2 3 4 5 6 7 8 9 10 11

Dim hauteur As Long, largeur As Long 'récupère la résolution de l'écran hauteur = System.Windows.Forms.Screen.PrimaryScreen.Bounds.Height largeur = System.Windows.Forms.Screen.PrimaryScreen.Bounds.Width + 320 Dim img As New Bitmap(CInt(largeur), CInt(hauteur)) Dim g As System.Drawing.Graphics = Graphics.FromImage(img) g.DrawImage(PictureBox1.Image, 0, 0)   g.DrawImage(PictureBox2.Image, 320, 0) g.DrawImage(img, 320, 0) img.Save(Environment.CurrentDirectory & "\Capture.jpg", ImageFormat.Jpeg)

---

Je me retrouve avec l'image de 320*240 en haut à gauche de mon image et l'autre de 1440*900 à sa droite.

Un grand :bravo:

Le Djé

tu peux modifier les tailles des images aussi si tu veux (agrandir la webcam ou diminuer l'écran)
drawimage a une surcharge qui permet de définir la taille de départ et la taille au final