Discussion :

[jlm57]

Bonjour,

Je sais....
Cà fait 2 semaines que je galère, que je cherche avec mon moteur de recherche préféré, etc, etc,...

Entre des morceaux de codes hyper-balèze, du C+ et du VB6, je ne trouve pas ce dont j'ai besoin.

Bref, si je m'adresse à la communauté, c'est que j'ai besoin de votre aide.

Dans une form, j'ai un panel (panel0) qui contient 2 picturebox (Picturebox0 et picturebox1) qui contiennent chacun une image différente mais qui se chevauche.

Je souhaiterai assembler (ou fusionner) ces 2 images.

Voilà où j'en suis:

Picturebox0 est fixe dans le panel. Picturebox se déplace grâce à un glisser-déposer.

Une fois que les 2 images sont en place et ajustée, c'est là que commence les difficultés.

Je cherche à les assembler avec ZoneGraphique.DrawImage(...
puis de mettre le résultat de la fusion dans picturebox0 puis pouvoir assembler une autre image qui serait chargée dans picturebox1 et ainsi de suite.

Voilà ce que j'ai déjà écrit avec l'aide d'un bout de code mais çà ne marche pas

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
Dim LongueurRectangle As Integer = PictureBox0.Width + PictureBox1.Width
Dim LargeurRectangle As Integer = PictureBox0.Height
 
Dim MonBitmap As Bitmap = New Bitmap(LongueurRectangle, LargeurRectangle)
Dim ZoneGraphique As Graphics = Graphics.FromImage(MonBitmap)
Dim Rectangle As RectangleF = New RectangleF(0, 0, LongueurRectangle, LargeurRectangle)
 
ZoneGraphique.DrawImage(PictureBox0.Image, Rectangle)
ZoneGraphique.DrawImage(PictureBox1.Image, Rectangle)
 
PictureBox0.Width = LongueurRectangle
PictureBox0.Height = LargeurRectangle
PictureBox0.Image = MonBitmap

Ce bout de code a été trouvé sur le net, mais je n'arrive pas à l'adapter à mon besoin. Il ne se comporte pas que je le souhaiterai.

Merci pour votre aide. Je vais avoir besoin d'un accompagnement parce que j'y perd mon latin dans bitmap, graphics et rectangle. J'ai lu le fabuleux cours de Mr Lasserre (magnifique au demeurant).

[Pol63]

http://www.developpez.net/forums/d68...es-picturebox/

[jlm57]

Merci Pol63

Le problème reste le même: encore un bout de code que je n'arrive pas à adapter.

Voilà ce que j'obtiens

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
Dim g As Graphics = Panel0.CreateGraphics
g.DrawImage(PictureBox0.Image)
g.DrawImage(PictureBox1.Image)

Erreur 1 La résolution de surcharge a échoué, car aucun 'DrawImage' accessible n'accepte ce nombre d'arguments.

Panel0 est le container
Picturebox0 mon image fixe et Picturebox1 l'image que je déplace pour l'ajuster à Picturebox0

[Pol63]

on ne peut pas donner à tous les participants de ce forum le code qu'ils attendent, mieux vaut comprendre et ensuite écrire soi meme le code

si tu ne comprends pas le message disant qu'aucune surcharge n'accepte ces paramètres et/ou que tu ne comprends pas le mécanisme de dessin en .net il est préférable de potasser un peu

http://plasserre.developpez.com/cours/vb-net/

[Sankasssss]

... il est préférable de potasser un peu

http://plasserre.developpez.com/cours/vb-net/

vs

... J'ai lu le fabuleux cours de Mr Lasserre (magnifique au demeurant).

Il doit être passé à coté de quelque chose ^^

Moi je dirais de regarder http://msdn.microsoft.com/en-us/libr...drawimage.aspx

mais il est vrais que l'erreur est plutôt parlante...

[Pol63]

au temps pour moi