Problème avec Graphics
Résolu
Kronakoria
Messages postés
7
Date d'inscription
jeudi 30 novembre 2000
Statut
Membre
Dernière intervention
31 janvier 2008
-
9 juin 2006 à 23:55
cs_Willi Messages postés 2375 Date d'inscription jeudi 12 juillet 2001 Statut Modérateur Dernière intervention 15 décembre 2018 - 10 juin 2006 à 11:54
cs_Willi Messages postés 2375 Date d'inscription jeudi 12 juillet 2001 Statut Modérateur Dernière intervention 15 décembre 2018 - 10 juin 2006 à 11:54
3 réponses
cs_Willi
Messages postés
2375
Date d'inscription
jeudi 12 juillet 2001
Statut
Modérateur
Dernière intervention
15 décembre 2018
22
10 juin 2006 à 08:41
10 juin 2006 à 08:41
Ces instructions sont à mettre dans l'événement paint d'un container.
Private
Sub Form1_Paint(
ByVal sender
As
Object,
ByVal e
As System.Windows.Forms.PaintEventArgs)
Handles
Me.Paint
Dim g
As Graphics
g =
Me.CreateGraphics
g.DrawLine(Pens.Blue, 50, 50, 200, 200)
End
Sub
Private
Sub Form1_Paint(
ByVal sender
As
Object,
ByVal e
As System.Windows.Forms.PaintEventArgs)
Handles
Me.Paint
Dim g
As Graphics
g =
Me.CreateGraphics
g.DrawLine(Pens.Blue, 50, 50, 200, 200)
End
Sub
Kronakoria
Messages postés
7
Date d'inscription
jeudi 30 novembre 2000
Statut
Membre
Dernière intervention
31 janvier 2008
10 juin 2006 à 11:40
10 juin 2006 à 11:40
Merci !
Ca marche enfin ! :)
Petite remarque, il ne connait pas le Handles Me.Paint, j'ai remplacé par Handles MyBase.Paint, là il connait mieux !
Ca marche enfin ! :)
Petite remarque, il ne connait pas le Handles Me.Paint, j'ai remplacé par Handles MyBase.Paint, là il connait mieux !
cs_Willi
Messages postés
2375
Date d'inscription
jeudi 12 juillet 2001
Statut
Modérateur
Dernière intervention
15 décembre 2018
22
10 juin 2006 à 11:54
10 juin 2006 à 11:54
J'ai copier/coller sous vb2005, il se peut que certaines choses mineures diffères.
