Auf welchen Treenode wird gedropt?

[Grolle]

Hallo,

wie bekomme ich den TTreenode, auf den ein Item gezogen wird? Getestet habe ich

Delphi-Quellcode:

procedure Tmain.assignmentsTreeDragDrop(Sender, Source: TObject; X, Y: Integer);
var
  sti : TTreenode;
begin
  sti := (Sender as THTMLTreeView).Selected;
  assignmentsTree.Items.AddChild(sti, (Source as TAdvListView).Selected.Caption);
end;

aber der Knoten ist ja nicht automatisch ausgewählt?!

Viele Grüße ....

[Aurelius]

Bei einer Listbox wäre das durch ItemAtPos zu erreichen, bei der Treeview war ich mir nicht sicher. Kurzes googlen ergab

Delphi-Quellcode:

Treeview.GetNodeAt(...)

http://delphi.about.com/cs/adptips20...ltip0901_3.htm

Da ich im Augenblick kein Delphi zur Hand habe kann ich das leider nicht testen :)

[Grolle]

That's it! :-D