Drag&Drop Bureau -> Appli VB6

cs_smellycat Messages postés 6 Date d'inscription jeudi 10 avril 2003 Statut Membre Dernière intervention 19 juillet 2004 - 27 juin 2004 à 01:55
cs_smellycat Messages postés 6 Date d'inscription jeudi 10 avril 2003 Statut Membre Dernière intervention 19 juillet 2004 - 28 juin 2004 à 14:07
Je cherche le moyen de récupérer les infos d'un drag&drop d'un raccourcis bureau ou icone programme sur un listview ou autre control d'un appli VB6 (récupérer le chemin d'accès, icone, ...)

Merci d'avance ;-)
fabh59

2 réponses

Renfield Messages postés 17287 Date d'inscription mercredi 2 janvier 2002 Statut Modérateur Dernière intervention 27 septembre 2021 74
27 juin 2004 à 11:05
Met la propriété OleDropMode de ton controle à "1 - Manual"

ici pour une Form :

Private Sub Form_OLEDragDrop(Data As DataObject, Effect As Long, Button As Integer, Shift As Integer, X As Single, Y As Single)
Dim i As Integer
If Data.GetFormat(vbCFFiles) Then
For i = 1 To Data.Files.Count
MsgBox i & " : " & Data.Files(1)
Next i
End If
End Sub
0
cs_smellycat Messages postés 6 Date d'inscription jeudi 10 avril 2003 Statut Membre Dernière intervention 19 juillet 2004
28 juin 2004 à 14:07
Merci bcp de ta réponse ;-)
0
Rejoignez-nous