没有在节点之后插入的选项，只能在节点之前插入。所以你必须找到放置目标之后的节点，并在它之前插入。
要在最后一个节点之后添加，请找到最后一个节点并将naAdd传递给MoveTo。

感谢大卫的建议。使用它们，我最终编写了以下代码来实现我所需要的。贴在这里，以防对其他人有用。（这是OnDragDrop中的相关代码）

if ( Assigned(targetnode))  //we are over a target node
    and (DraggedNode.Level = targetnode.Level  then  //we are dragging within the same sub level
         begin
         if targetnode.Index = targetnode.Parent.Count -1  then   //target is the last node so do an naAdd to drop node at the end
              TreeViewStructure.Selected.MoveTo(targetnode , naAdd )
         else
              TreeViewStructure.Selected.MoveTo(targetnode , naInsert )   //drop before target using naInsert
         end;

if (Dst <> nil)and(Src <> Dst) then
begin
 if Dst.getNextSibling <> nil then                                         
 begin
   varNode := Dst.GetNextChild(Dst);                                       
   Src.MoveTo(varNode, naInsert);                                          
 end
 else                                                                      
 begin
   varNode := Dst.Parent;                                                    
   Src.MoveTo(varNode, naAddChild);                                          
 end;
end;