Sujet Précédent Sujet Suivant

Drag & Drop de TreeView vers autre applis en format "Liste Fichiers"

Résolu
cs_magicgus Messages postés 206 Date d'inscription mardi 10 février 2004 Statut Membre Dernière intervention 14 septembre 2011 - 16 sept. 2010 à 13:17
cs_magicgus Messages postés 206 Date d'inscription mardi 10 février 2004 Statut Membre Dernière intervention 14 septembre 2011 - 16 sept. 2010 à 13:29
Bonjour,

Je souhaiterais faire un drag & drop de mon applis vers une applis externe d'un chemin de fichier mais je n'arrive qu'a envoyer du data sous forme de texte, le probleme c'est que l'appli recevante le sait et me refuse le drop...

J'ai essayer : 
Private Sub Text1_OLEDragDrop(Data As DataObject, Effect As Long, Button As Integer, Shift As Integer, X As Single, Y As Single)

    If Data.GetFormat(1) Then 'vbCFText = Fichier *.txt
        MsgBox "vbCFText"
        Text1 = Data.GetData(vbCFText)
    ElseIf Data.GetFormat(2) Then 'vbCFBitmap = Fichier *.bmp
        MsgBox "vbCFBitmap"
    ElseIf Data.GetFormat(3) Then 'vbCFMetafile = Fichier *.wmf
        MsgBox "vbCFMetafile"
    ElseIf Data.GetFormat(14) Then 'vbCFEMetafile = Fichier *.emf
        MsgBox "vbCFEMetafile"
    ElseIf Data.GetFormat(8) Then 'vbCFDIB = Fichier *.dib
        MsgBox "vbCFDIB"
    ElseIf Data.GetFormat(9) Then 'vbCFPalette = Palette de couleur
        MsgBox "vbCFPalette"
    ElseIf Data.GetFormat(15) Then 'vbCFFiles = Liste de fichier
    
        Text1 = Data.Files.Item(1) 'Pour que ça marche je devrais me trouvé ici...
        
    ElseIf Data.GetFormat(-16639) Then 'vbCFRTF = Fichier *.rtf
        MsgBox "vbCFRTF"
    End If
    
End Sub


Private Sub Treeview1_OLEStartDrag(Data As MSComctlLib.DataObject, AllowedEffects As Long)
    AllowedEffects = 1
    Data.Files.Add "c:\toto.exe"
    
    'Jai aussi essayer :
    'Data.SetData "c:\toto.exe", 15
End Sub


Quoi que je fasse à la fin j'obtiend en texte le caption de mon item du treeview alors que ce n'est pas ce que j'envoie

Bref il me faut envoyer un chemin en format "liste de fichiers"...

Si quelqu'un à une idée...

Guillaume

1 réponse

Réponse 1 / 1
cs_magicgus Messages postés 206 Date d'inscription mardi 10 février 2004 Statut Membre Dernière intervention 14 septembre 2011
16 sept. 2010 à 13:29
Je vient enfin de trouver !

http://www.vbfrance.com/codes/DRAG-DROP-FICHIERS-DEPUIS-LISTVIEW_24771.aspx

Et ça marche !

Merci à jack !

Guillaume
3

Discussions similaires

treeview tkinter
mohamed2511 -
Gandalfix -

9 réponses
Listing des marques et modéle de voiture
tibine974 -
Nidalbae -

41 réponses
Conversion image [jpg, gif ou png]
grand_jeanluc -
grand_jeanluc -

10 réponses
Drag and drop dans un tableau HTML
dedeisep2 -
bizibiz17 -

6 réponses
Drag Drop de fichiers
Popolino69 -
Frederyck -

3 réponses
Rejoignez-nous