Tout cela est exact, mais c'est juste un bout de code que j'ai fais pour donner en exemple à quelqu'un, et quite à le partager avec quelqu'un, autant le partager sur le site.
Mais si j'ai un peu de temps j'ajouterai la vingtaine de picturebox pour me racheter.
Da'autant que j'ai honte, je suis le premier à faire ces critiques, haa! nul n'est infaillible.
24 févr. 2006 à 19:37
Mais si j'ai un peu de temps j'ajouterai la vingtaine de picturebox pour me racheter.
Da'autant que j'ai honte, je suis le premier à faire ces critiques, haa! nul n'est infaillible.
23 févr. 2006 à 22:57
Il faut toujours coder en Strict et en Explicit
D'où l'erreur ici:
'On récupère le contexte graphique de l'objet survolé
'Cet objet est différent selon le bouton cliqué
Dim g As Graphics = sender.CreateGraphics
'Récupère l'objet qui a envoyé l'événement
Dim PicZone As PictureBox = sender
deviendrait:
'recuper l'objet qui a envoyer l'evenement
Dim PicZone As PictureBox = CType(sender, System.Windows.Forms.PictureBox)
'on recuper le contexte graphic de l'objet survolé qui a envoyer l'evenement
Dim g As Graphics = PicZone.CreateGraphics
de même pour
Dim cmd As Button = sender
-> Dim cmd As Button = CType(sender, System.Windows.Forms.Button)
Et aussi pour
Select Case PicZone.Tag
-> Select Case CType(PicZone.Tag, Integer)
Et quand tu fais:
g = picZone01.CreateGraphics
g.Clear(Color.Beige)
un picZone01.Refresh() suffit, pas la peine de recréer un graphique
Sinon, pour l'exemple il aurait été mieux de faire par exemple la gestion de 20 picturebox crée dynamiquement. (question souvent posé dans le forum)
Voilà, désolé, y'a beaucoup de critiques
(pas noté)