void __fastcall TForm1::parasexml(void)
{
IXMLNode *root; //指向XML根结点
IXMLNode *Parent_Node; //父结点
IXMLNode *Child_Node; //子结点
XMLDocument1->LoadFromFile("d://111.xml"); //文件名字,可以用参数传进
XMLDocument1->Active=true;
ListBox1->Items->Clear();
root=XMLDocument1->DocumentElement;
Parent_Node=root->ChildNodes->First(); //获取第一个父结点
while(Parent_Node != NULL)
{
// ListBox1->Items->Add(Parent_Node->NodeName);
Child_Node=Parent_Node->ChildNodes->First(); //获取本父结点的第一个子结点
while(Child_Node != NULL)
{
// ListBox1->Items->Add(Child_Node->NodeName); //取姓结点的名
ListBox1->Items->Add(Child_Node->Text); //取姓结点的值
Child_Node = Child_Node->NextSibling(); //顺序取下一个子结点信息
}
Parent_Node = Parent_Node->NextSibling(); //顺序取下一个父结点信息
}
}