Insertion forme par dessus une image dans une picturebox

Bonjour,

Je cherche à dessiner par dessus une image existante un rectangle dont les coordonnées sont stockées dans une structure type rectangle.
Malheureusement le résultat obtenu se retrouve masqué derrière ma picture box.:cry:
Pourriez vous s'il vous plait m'aider ?

Merci

Bonjour

Utiliser la bibliothèque GDI+ et utiliser comme support la picturebox en question pour dessiner dessus.

Un truc du genre :

Code:

---

1 2 3 4 5 6 7

Imports System.Drawing   Dim g = PictureBox1.CreateGraphics 'définit le support pour dessiner g.DrawRectangle(Pens.Red, Tonrect) 'dessine un rectangle vide (contour)   'ou g.FillRectangle(Brushes.Red, Tonrect) 'dessine un rectangle plein

---

Merci pour la réponse.

J'ai effectivement essayé cette option mais les objets dessinés semblent se trouver relegués en arrière plan donc masqué par l'image du picturebox. Si je tente sur un autre controle ça fonctionne.

Euh ça ce n'est pas normal, car ça marche très bien.

Es-tu sûr que tu ne redéfinis pas une de tes propriétés :

Code:

---

1 2	PictureBox1.Image PictureBox1.BackgroundImage

---

après avoir dessiné tes formes ? Dessines-tu sur le bon support (bonne picturebox) ?

Hum ou sinon j'ai mon idée sur la question.

En fait en dessinant sur l'image, il suffit d'un rafraichissement, et ton dessin disparaît. Il faut en fait dessiner directement sur l'image elle-même.

Voilà qui devrait fonctionner, et garder une image même si tu rafraîchis ta form, ou met uen autre fenêtre par-dessus :

Code:

---

1 2 3 4 5 6 7 8

Dim img As New Bitmap(PictureBox3.BackgroundImage.Width, PictureBox3.BackgroundImage.Height) Dim g As Graphics = Graphics.FromImage(img) g.DrawImage(PictureBox3.BackgroundImage, New Rectangle(0, 0, PictureBox3.BackgroundImage.Width, PictureBox3.BackgroundImage.Height), New Rectangle(0, 0, PictureBox3.BackgroundImage.Width, PictureBox3.BackgroundImage.Height), GraphicsUnit.Pixel)   g.DrawRectangle(Pens.Red, Tonrect) g.FillRectangle(Brushes.Red, Tonrect)   PictureBox3.BackgroundImage = img

---

Tu noteras que j'ai mis l'image en BackgroundImage.
Si tu met ton image sur Image, il faut que tu remplaces dans le bout de code.

Super, ça fonctionne. Merci beaucoup :ccool:

sinon plus couramment on dessine dans l'évènement paint, comme ca on peut mettre ce qu'on veut dans image et/ou backgroundimage

Code:

---

1 2 3 4

private sub dessine(sender as object, e as painteventargs) handles monpicturebox.paint e.graphics.Drawrectangle(...) end sub

---

à voir selon l'utilité de figer la chose ou non