Duracelle
Messages postés28Date d'inscriptiondimanche 26 janvier 2003StatutMembreDernière intervention16 août 2009
-
30 juin 2006 à 04:22
Duracelle
Messages postés28Date d'inscriptiondimanche 26 janvier 2003StatutMembreDernière intervention16 août 2009
-
30 juin 2006 à 19:07
Bonjour a tous,
J'utilise se code pour débuter le drag and
drop entre 2 MsFlexgrid. Le dragMode est a
manuel.
msfListeEpicerie_MouseDown(Index As Integer, Button As Integer,
Shift As Integer, X As Single, Y As Single)
If Button = vbRightButton And
Index = 1 Then
With msfListeEpicerie(1)
.Drag
vbBeginDrag
.DragIcon = LoadPicture(App.Path &
"\DRAG2PG.ICO")
End With
Exit Sub
End
If
...
end sub
Mon problème est que la première fois que je
clique sur le msfListeEpicerie(1), au lieu de mon image comme curseur, j'ai le
contour du contrôle. Je relâche le bouton de la souris, je ré-appuis dessus et
cette fois j'ai mon image qui apparais. J'aimerais que mon image apparaisse dé
la première fois.