Drag & Drop im TreeView

[DBZSonGoku]

Hallo, ich bräuchte mal etwas Hilfe!!!
Ich programmiere gerade einen Explorer und das verschieben von Dateien soll natürlich über Drag & Drop möglich sein. Doch bevor das Drag-Ereignis der Treeview gesendet wird, wird ein MouseDown und MouseUp Ereignis geschickt, wodurch das Programm in den eigentlich zu verschiebenden Ordner wechselt!
Ich hoffe irgendwer kann mir da helfen, wär' echt total OK!!!;-)

 

[derGugi]

wo ist genau dein Problem? Hier mal ein Beispiel-script für den Drag-Start.

var
  HT : THItTests;
begin
if Button = mbLeft then begin
  HT := Treeview1.getHitTestInfoAt(x,y);
  if htOnItem in HT then
    (Sender as TTreeView).BeginDrag(False);
end;

vielleicht bringts dir ja was. Aber stell mal deine Frage deutlicher, bzw. stell mal ne Frage