Comment faire un Drag&Drop vers Windows ?

Version imprimable

19/12/2002, 14h45
Lung

Comment faire un Drag&Drop vers Windows ?

Comment faire un Drag&Drop, à partir de mon application (un ListBox) vers Windows (Bureau ou explorateur) ? :roll:

J'ai trouvé comment faire l'inverse, mais dans ce sens, je ne vois pas comment faire. :cry:
Si quelqu'un a une idée ... :hola:
Merci.

:wink:
19/12/2002, 14h59
joebarthib

Je crois qu'il faut regarder du côté de DoDragDrop (API Windows), mais je n'ai pas eu l'occasion de le faire, et impossible de faire une recherche sur le forum en ce moment !
Bonne chance
19/12/2002, 15h01
Lung

Citation:

Envoyé par joebarthib

Je crois qu'il faut regarder du côté de DoDragDrop (API Windows)

Merci, je cherche dans cette direction. :wink:

Citation:

Envoyé par joebarthib

impossible de faire une recherche sur le forum en ce moment !

C'est de plus en plus souvent ! :?
19/12/2002, 15h10
delphi-fan

J'ai trouvé ce lien :
http://delphi.about.com/gi/dynamic/offsite.htm?site=http://atlas.csd.net/%7Ecgadd/knowbase/DELPHI0213.HTM

A+
19/12/2002, 15h43
Lung

Bin, c'est bien la même question que moi, mais la réponse ne porte que sur le drag&drop Windows-->Application. :?
Moi, c'est l'inverse que je cherche. :roll:
Merci quand même. Je continu de chercher ...

:wink:
19/12/2002, 15h57
delphi-fan

Au fait, j'ai du mal à imaginer ce que peux donner un Drag'n Drop d'un Listbox vers le Bureau Windows.
Au pire, tu ferais une copie de fichier que tu mettrais directement sur le Desktop (au lieu de mettre un raccourci) je comprendrais.
Quand tu auras le temps, tu pourrais nous en expliquer l'utilité ?

A+ et bonne recherche...
19/12/2002, 16h11
Lung

Bin, dans ma ListBox, j'ai une liste de fichiers, affichée.
Ces fichiers sont stockés sur un serveur.
Je voudrais que quand l'utilisateur fait un drag-drop sur un des fichiers de la liste, ca copie le fichier là où il fait le drop : le bureau, un répertoire dans une fenêtre de l'explorateur, ...
Je ne peux pas savoir d'avance, dans quel répertoire copier le fichier. Donc, par la méthode du drag-drop, je pensais que se serais possible. :roll:
On m'a donné une piste, ici : http://www.phidels.com/php/forum/for...t&postid=15858

Mais, je ne trouve aucun exemple, ni explications ... :cry:

Je cherche toujours ...
19/12/2002, 16h44
delphi-fan

Par le ClipBoard, ça doit être plus facile.
Mais il n'est pas dit que ça marche dans tous les cas.
Maintenant que j'y pense, il me semble que j'ai déjà vu un sujet traitant de la copie (via le Clipboard) sur le Desktop : peut-être même sur le forum !?

A+
19/12/2002, 16h48
Lung

Je ne vois pas le rapport avec le presse-papier !? :roll: :roll:

Tu ne pourais pas m'en dire un peu plus ...

:roll: :wink:

Ce que je voulais dire, c'est que tu peux coller le nom des fichiers à copier dans le clipboard et les récupérer plus tard pour faire une simple copie de fichiers, sans drag'n drop.

Le code suivant peut sans doute expliciter cette idée :

Code:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
 
 Get Filenames from Clipboard 
{
"If I use the windows Explorer to copy a file,
how can I use a paste function in my app?"
 
This code retrieves the filenames from the
clipboard to a memo component.
Drop a memo and a button on a form and set
the OnClick of a button to:
} 
 
uses 
  clipbrd, shellapi; 
 
procedure TForm1.Button1Click(Sender: TObject); 
var 
  f: THandle; 
  buffer: Array [0..MAX_PATH] of Char; 
  i, numFiles: Integer; 
begin 
  Clipboard.Open; 
  try 
    f:= Clipboard.GetAsHandle( CF_HDROP ); 
    If f <> 0 Then Begin 
      numFiles := DragQueryFile( f, $FFFFFFFF, nil, 0 ); 
      memo1.Clear; 
      for i:= 0 to numfiles - 1 do begin 
        buffer[0] := #0; 
        DragQueryFile( f, i, buffer, sizeof(buffer)); 
        memo1.lines.add( buffer ); 
      end; 
    end; 
  finally 
    Clipboard.close; 
  end; 
end;

A+

19/12/2002, 17h19
Lung

Hmm ! :roll:

En attendant de trouver une solution (si j'en trouve une :? ), je vais utiliser une boîte de dialogue pour demander à l'utilisateur où il veut enregistrer ses fichiers. Et comme ca, je saurais où faire ma copie.

Mais, un Drag&drop aurait été mieux ... ! Je suis toujours preneur de toutes idées ...

:roll: :wink:
19/12/2002, 17h26
Lung

Une nouvelle piste (qui rejoint les précédentes) :

Citation:

Envoyé par gatorette

La réponse Microsoft est ici : http://msdn.microsoft.com/library/de...g/transfer.asp

En gros il faut utiliser des objets COM et appeler une fonction ("DoDragDrop").

Après, le faire en Delphi, je sais pas...

:roll:
19/12/2002, 19h49
Pierre Castelain

J'ai trouvé une série d'articles assez complète sur le sujet sur http://www.undu.com (chercher les articles intitulés "COM Interface-Based Drag and Drop").
20/12/2002, 09h17
Lung

Merci. Je regarde ...

:roll: :wink:
20/12/2002, 13h36
Lung

Bin, c'est intéressant, mais je ne comprend pas tout. :?
Ce qui est dommage, c'est que tous les exemples de démo que j'ai testé pour comprendre, ont des violations d'accès parce qu'il manque des fichiers. :cry:
A quoi ca sert de donner des moitiés de projet ? :? :cry: :?:

:roll:
13/01/2003, 11h41
Lung

Ca y est : il y a 4 super composants sur http://www.phidels.com qui ont l'air de marcher pas mal ! :bravo: :yaisse:

Voir : http://www.phidels.com/php/forum/for...t&postid=15858

:wink:
21/06/2004, 12h07
remixtech

Sniff

Citation:

Fonctionne en WinXP et Win2000. Ne fonctionne pas actuellement en Win98 mais c'est par manque de temps. Si quelqu'un se penche sur la question, on est preneur.

:cry: :cry: :cry: :cry:
21/06/2004, 13h10
cpdump

Regarde la: http://wideman-one.com/gw/tech/Delphi/dragdrop/