Træk og Slip

ved ikke helt om det er det du hentyder til, men hvis du fx har en treeview og et edit felt, så kan du gøre følgende

i edit1.ondragover

  if Source is TTreeView then Accept := True else Accept := False;


i treeview1.onmousedown

  with Sender as TTreeview do
    begin
          BeginDrag(False);
    end;

og i edit.ondragdrop

edit1.text := treeview1.selected.Text;

håber det hjælper dig godt på vej

Kigger på det!