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

//---------------------------------------------------------------------------

#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

//---------------------------------------------------------------------------

#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");

}
//---------------------------------------------------------------------------