void __fastcall TForm1::GetRootNodes(TTreeView *DestTreeView)//得到所有根节点
{
        TTreeNode *vNode = NULL;
        vNode = DestTreeView->Items->GetFirstNode();
        while(vNode)
        {
                ShowMessage(vNode->Text);//处理查找到的根节点
                vNode = vNode->getNextSibling();
        }
}

//---------------------------------------------------------------------------
void __fastcall TForm1::GetChildNodes(TTreeNode *ANode) //根据某个节点得到所有的子节点
{
        TTreeNode *vNode;
        vNode=ANode->getFirstChild();
        while(vNode)
        {
                ShowMessage(vNode->Text);//处理查找到的子节点
                vNode=ANode->GetNextChild(vNode);
        }
}

void __fastcall TForm1::GetAllChildNodes(TTreeNode *ANode)//根据某个节点得到所有的子节点的递归处理过程
{
        TTreeNode *vNode;
        vNode=ANode->getFirstChild();
        while(vNode)
        {
                ShowMessage(vNode->Text);//处理查找到的子节点//先序访问
                GetAllChildNodes(vNode);//递归调用
                vNode=ANode->GetNextChild(vNode);
        }
}
void __fastcall TForm1::VisitAllNodes(TTreeView *ATreeView)//递归访问所有节点
{
        TTreeNode *vNode = NULL;
        vNode=ATreeView->Items->GetFirstNode();
        while(vNode)
        {
                ShowMessage(vNode->Text);//处理查找到的根节点
                GetAllChildNodes(vNode);
                vNode=vNode->getNextSibling();
        }
}