请问,如何在程序中产生的XML文档中加入如下字符串""
在用如下代码产生的XML文档中,如何在第二行加入 <!DOCTYPE record SYSTEM "dcr4.5.dtd">这一行文字?代码:
XMLDocument1->Active =false;
XMLDocument1->XML->Text ="";
XMLDocument1->Active =true;
XMLDocument1->Encoding = AnsiString("UTF-8");
_di_IXMLNode NewStock=XMLDocument1->AddChild("stock");
NewStock->Attributes[WideString("exchange")]=WideString("NASDAQ");
NewStock->SetAttribute("type",WideString("sdgdsagds"));
_di_IXMLNode ValueNode=NewStock->AddChild(WideString("name"));
ValueNode->Text="Ciso system";
ValueNode=NewStock->AddChild("price");
ValueNode->Text="25.8";
ValueNode=NewStock->AddChild("symbol");
ValueNode->Text="中国";
ValueNode=NewStock->AddChild("shares");
ValueNode->Text ="yes";
XMLDocument1->SaveToFile("c:\\test.xml");
产生的XML文档如下:
<?xml version="1.0" encoding="UTF-8"?>
<stock exchange="NASDAQ" type="sdgdsagds"><name>Ciso system</name><price>25.8</price><symbol>涓浗</symbol><shares>yes</shares></stock>
我的最终目的:
在产生的XML文档中要添加<!DOCTYPE record SYSTEM "dcr4.5.dtd">这一行,使XML文档如下:
<?xml version="1.0" encoding="UTF-8"?>
<!DOCTYPE record SYSTEM "dcr4.5.dtd">
<stock exchange="NASDAQ" type="sdgdsagds"><name>Ciso system</name><price>25.8</price><symbol>涓浗</symbol><shares>yes</shares></stock>
请问用程序如何实现?
谢谢