如何得到TreeView 中某一节点的上一节点和下一节点----在线等待

Question

各位大虾，小弟在做一个项目时，遇到了困难。请教如何得到TreeView 中某一节点的上一节点和下一节点。

Answer 1

ANode := TreeView.Selected;  ANode.GetNext;
  ANode.GetPrev;

Answer 2

procedure TForm1.Button1Click(Sender: TObject);
var
  curNode : TTreeNode;
begin
  curNode := TreeView1.Selected;
  curNode := curNode.getNextSibling;
  TreeView1.Selected := curNode;
end;

Answer 3

补充，注意，TreeView1的hideselection必须设置为false,才可以看见。
同时，如果TreeView1下的节点是分级的，请比较  
curNode := curNode.getNextSibling    和  
curNode := curNode.getNext   的不同，不详细说明，一看就知道。