xml.txt

来自「一个用C++Builder写的XML编辑器」· 文本 代码 · 共 30 行

{
  _di_IXMLDocument XMLDoc = NewXMLDocument();

  _di_IXMLNodeList ChildNodes;
    if(XMLDoc)
    {
        XMLDoc->Active = true;
        XMLDoc->Encoding = "UTF-8";

//        _di_IXMLNode XMLNode = XMLDoc->AddChild("root");

        _di_IXMLNode XMLNode = XMLDoc->CreateElement("Root0","");
        if(XMLNode)
        {   ChildNodes = XMLNode->ChildNodes;
            _di_IXMLNode XMLChild0 = XMLDoc->CreateElement("node0","");
            XMLChild0->SetAttribute("a1",String("11"));
            ChildNodes->Add(XMLChild0);
            _di_IXMLNode XMLChild = XMLNode->AddChild("node1");
            if(XMLChild)
                XMLChild->Text  = "123";

        }
//        XMLDoc->DocumentElement =   XMLDocument1->DocumentElement;
        XMLDoc->DocumentElement = XMLNode;
        XMLDoc->SaveToFile("D:\\t2.xml");
        XMLDoc->Active   = false;
    }

delete XMLDoc;
}