Intercepter une fin de drop

Question

Alors que je suis en plein Drag, lorsque le lache le bouton de souris
sur une zone ayant un evenement _DragDrop, j'ai la main dans le code
pour effectuer un certain travail.

Lorsque je lache le bouton sur une zone qui n'a pas cet evenement, je n'ai pas la main.



J'ai essaye de prendre la main sur le _MouseUp de l'objet en Drag, mais cet evenement ne reagit pas.



Dois-je mettre des evenement _DragDrop sur toutes les objets de ma Form pour pouvoir etre s&#251;r d'intercepter la fin d'un Drop ?



Merci de vos r&#233;ponses.

codea · Answer

Cr&#233;e toi un objet De type Drag and drop dans un module:
Public Type tDragnDrop
    DragColor As OLE_COLOR
    DragText As String
    DragCmdId As Integer
    OnDrag As Boolean
    RowStart As Integer
    ColStart As Integer
End Type

ensuite dans ton code
dim MyDrag as tDragnDrop
Quand tu d&#233;bute ton drag tu met la valeur OnDrag a True, comme ca tu sais que tu es en train de draguer. 

Il te reste maintenant a trouver un &#233;v&#233;nement pour savoir quand terminer le drag....Faudrait savoir sur quel objet tu veux faire ca....  je peux pas aider plus ... 

  Rien ne sert de courir, il faut partir &#224; point.

                        &

madustbin · Answer

Merci de ta reponse, mais ca ne resoud pas le probleme d'intercepte la fin du drag.



Je repose la question donc : 



Faut-il mettre un evenement sur chaque objet de la Form our etre sur d'intercepter la fin d'un DragDrop ?

Intercepter une fin de drop

2 réponses

Discussions similaires