//--------------------------------------------------------------------------- #ifndef Unit1H #define Unit1H //--------------------------------------------------------------------------- #include <Classes.hpp> #include <Controls.hpp> #include <StdCtrls.hpp> #include <Forms.hpp> #include <msxmldom.hpp> #include <XMLDoc.hpp> #include <xmldom.hpp> #include <XMLIntf.hpp> //--------------------------------------------------------------------------- class TForm1 : public TForm { __published: // IDE-managed Components TXMLDocument *XMLDocument1; TButton *Button1; void __fastcall FormCreate(TObject *Sender); void __fastcall Button1Click(TObject *Sender); private: // User declarations public: // User declarations __fastcall TForm1(TComponent* Owner); }; //--------------------------------------------------------------------------- extern PACKAGE TForm1 *Form1; //--------------------------------------------------------------------------- #endif
//--------------------------------------------------------------------------- #include <vcl.h> #pragma hdrstop #include "Unit1.h" //--------------------------------------------------------------------------- #pragma package(smart_init) #pragma resource "*.dfm" TForm1 *Form1; //--------------------------------------------------------------------------- __fastcall TForm1::TForm1(TComponent* Owner) : TForm(Owner) { } //--------------------------------------------------------------------------- void __fastcall TForm1::FormCreate(TObject *Sender) { XMLDocument1->LoadFromFile("D:\\code\\B_C_B\\XMLDocument\\test.xml"); } //--------------------------------------------------------------------------- void __fastcall TForm1::Button1Click(TObject *Sender) { // _di_IXMLNodeList nodeList; _di_IXMLNode node,nodeX; node=XMLDocument1->DocumentElement; node=node->ChildNodes->Nodes[1]; node=node->ChildNodes->Nodes[1]; // 现在node结点指向了我们的例子中第二个人员"李四" ShowMessage(node->NodeValue);//女 //获取该节点的上一个节点,它上一个结点应该是李四的姓名 nodeX=node->PreviousSibling(); ShowMessage(nodeX->NodeValue); //get the next node,maybe is LISI'age nodeX=node->NextSibling(); ShowMessage(nodeX->NodeValue);//43 //get this node'parent node nodeX=node->ParentNode; ShowMessage(nodeX->NodeName);//ren yuan } //---------------------------------------------------------------------------