Discussion :

[V_inSe]

Bonjour à tous,

Comme il est précisé dans le titre, je cherche à désactiver le mode Drag dans une listView afin que l'utilisateur ne puisse pas déplacer les icônes. Pour se faire, voici comment je procède :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
 
Private Sub ListViewOptions_MouseDown(Button As Integer, Shift As Integer, x As Single, y As Single)
 
        ListViewOptions.Drag vbBeginDrag
        ListViewOptions.Drag vbEndDrag
End Sub

Cela marche très bien. En conséquence, le clic n'a plus d'effet sur mes icônes. Je souhaiterais savoir si il existe un autre moyen pour annuler le mode Drag?

Merci pour vos futures réponses.

[l_autodidacte]

Essaie avec :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
 
Private Sub ListViewOptions_MouseDown(Button As Integer, Shift As Integer, x As Single, y As Single)
 
        ListViewOptions.Drag vbCancel
 
End Sub

[V_inSe]

Bonjour,

Merci pour ta réponse.

J'ai essayé avec le code fourni mais le résultat reste malheureusement le même... Je débute en VB et malgré mes recherches j'ai du mal à trouver une alternative à mon problème .