c++ builder 中的 XMLDocument 类详解(14) - XML的保存与创建

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30

//---------------------------------------------------------------------------   #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;      TButton *Button2;      void  __fastcall Button1Click(TObject *Sender);      void  __fastcall Button2Click(TObject *Sender); private :    // User declarations public :     // User declarations      __fastcall TForm1(TComponent* Owner); }; //--------------------------------------------------------------------------- extern  PACKAGE TForm1 *Form1; //--------------------------------------------------------------------------- #endif

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72

//---------------------------------------------------------------------------   #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::Button1Click(TObject *Sender) {      XMLDocument1->XML->Clear();      XMLDocument1->XML->Add( "" );      XMLDocument1->XML->Add( "<科室名单 备注=\"测试\">" );      XMLDocument1->XML->Add( "<人员 职务=\"科长\" 备注=\"正局级\">" );      XMLDocument1->XML->Add( "<姓名>张三" );      XMLDocument1->XML->Add( "<性别>男" );      XMLDocument1->XML->Add( "<年龄>34" );      XMLDocument1->XML->Add( "" );      XMLDocument1->XML->Add( "" );        //查看      ShowMessage(XMLDocument1->XML->Text);        //保存      XMLDocument1->Active= true ;      XMLDocument1->SaveToFile( "c:\\temp\\1.xml" ); } //--------------------------------------------------------------------------- void  __fastcall TForm1::Button2Click(TObject *Sender) {      //创建xml文件的标准方法        _di_IXMLNode pNode,cNode; //定义两个结点，父节点，子节点        XMLDocument1->XML->Clear();      XMLDocument1->Active= true ; //必须先激活      XMLDocument1->Version= "1.0" ; //设置版本      XMLDocument1->Encoding= "GB2312" ; //设置语言        pNode=XMLDocument1->AddChild( "科室名单" );       //添加第一个节点是根结点      pNode->SetAttribute( "备注" , "测试" ); //设置根结点属性        pNode=pNode->AddChild( "人员" ); //为根结点添加子结点      pNode->SetAttribute( "职务" , "科长" );      pNode->SetAttribute( "备注" , "正处级" );        cNode=pNode->AddChild( "姓名" ); //为pNode添加子节点，返回值cNode指向了新添加的节点      cNode->Text= "张三" ;        cNode=pNode->AddChild( "性别" );      cNode->Text= "男" ;        cNode=pNode->AddChild( "年龄" );      cNode->Text= "34" ;        //查看      ShowMessage(XMLDocument1->XML->Text);        //保存      XMLDocument1->SaveToFile( "c:\\temp\\1.xml" );   } //---------------------------------------------------------------------------

出处： http://www.cnblogs.com/zhangdongsheng/

作者： 张东升