Discussion :

[XioN]

Bonjour,

Je n'arrive pas à rendre un ListView "DragDropABLE"

Je voudrais que lorsque je glisse des fichiers depuis explorer vers mon ListView, que le message soit traité.

En faisant :

Code :

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

DragDropAcceptFiles(ListView1.Handle, True);

ça ne Fonctionne pas.

Je sais que si je fait

Code :

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

DragDropAcceptFiles(Form1.Handle, True);

Cela peut fonctionner, mais ce n'est pas ce que je souhaite.

Je veux que seulement que mon ListView soit "DragDropABLE"

Voici un exemple

Merci

[sfpx]

Normal, tu interceptes le message de la forme et non de la listview.

Crée toi un composant du genre

Code :

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

1
2
3
4
Tmylistview= class(tlistview)
private
Procedure DragDrop(var Msg :TMessage); Message WM_DROPFILES;
end;

etc...

[Bill14]

Merci.

Je m'en doutais un peu mais je n'etais pas sur.

ça marche super.

[Benjamin GAGNEUX]

Sujet résolu ? alors un petit clique sur le bouton en bas à droite

[XioN]

[delphichem]

Tu peux aussi utiliser JvDragDrop de la Jvcl sans créeer de composant.

[XioN]

J'ai créer le compo dynamiquement et ajouté le type
Merci