VB.Net Dessiner Ligne dans un pictureBox

cs_JeffC1977 Messages postés 928 Date d'inscription vendredi 10 novembre 2000 Statut Membre Dernière intervention 23 septembre 2023 - 27 sept. 2007 à 16:04
cs_JeffC1977 Messages postés 928 Date d'inscription vendredi 10 novembre 2000 Statut Membre Dernière intervention 23 septembre 2023 - 27 sept. 2007 à 20:02
Salut...

Je ne trouve pas pourquoi... mais je suis incapable de dessiner une ligne dans un picturebox...

Pouvez-vous me dire qu'est ce qu'il me manque

merci d'avance

Private
Sub cmdTracer_Click(
ByVal sender
As System.Object,
ByVal e
As System.EventArgs)
Handles cmdTracer.Click

Dim i
As
Integer
Dim CoordY1
As
Double, CoordX1
As
Double, CoordY2
As
Double, CoordX2
As
Double

For i = 0
To UBound(Tableau)
   LigneSplit = Tableau(i).Split(Separateur)

   If LigneSplit(0) = txtPoint1Tracer.Text
Then
      CoordY1 = LigneSplit(1) + 20000
      CoordX1 = LigneSplit(2) + 20000

   End
If
   If LigneSplit(0) = txtPoint2Tracer.Text
Then
      CoordY2 = LigneSplit(1) + 20000
      CoordX2 = LigneSplit(2) + 20000

   End
If
Next iobjGraphics = Graphics.FromImage(objBitMap)
objGraphics.DrawLine(MyPen, CoordX1, CoordY1, CoordX2, CoordY2)

Me.PictureBox1.Image = objBitMap
objGraphics.Dispose()
objGraphics =
Nothing
frmTracerLigne.Visible =
False
End
Sub

2 réponses

cs_JeffC1977 Messages postés 928 Date d'inscription vendredi 10 novembre 2000 Statut Membre Dernière intervention 23 septembre 2023 4
27 sept. 2007 à 17:04
ou bref.. comment dessiner une ligne quand j'ai deja des élément de dessiner dans le même picturebox.. ????

merci
0
cs_JeffC1977 Messages postés 928 Date d'inscription vendredi 10 novembre 2000 Statut Membre Dernière intervention 23 septembre 2023 4
27 sept. 2007 à 20:02
J'ai réussi à faire dessiner une ligne mais je suis obliger de faire un .Clear du picturebox et de faire redessiner l'ensemble du picturebox pour enuite faire dessiner ma ligne...

Ca marche mais je suis certain qu'il y a une meilleur facon....
0
Rejoignez-nous