Bonjour,
J'ai une petite question en ce qui concerne la gestion de dessins.
Je dessine environ 800 cases (qui sont des losanges), pour chaque j'ajoute dans une liste l'identifiant et des 4 point qui représentent le polygone.

Je veux que quand je passe sur un losange il change de couleur. Actuellement je parcours ma liste et pour chaque case je teste si la souris est dedans avec un truc dans ce genre :

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
 
Private Function PointIsInPolygon(ByVal polygon() As Point, _
    ByVal target_point As Point) As Boolean
 
    Dim path As New GraphicsPath()
    path.AddPolygon(polygon)
 
    Return path.IsVisible(target_point)
End Function
Ensuite je redessine par dessus les cases un polygone plein...Et quand la souris rebouge on recommence a dessiner les 800 cases.

Le problème c'est que c'est long et ça bug pas mal. Quelqu’un aurait une autre solution ?