学步园

Borland C++ Builder 6.0 XML处理总结
1、安装
C++ Builder对于XML处理主要封装在TXMLDocument组件中，该组件是Internet组件的一部分。
如果在安装包有已经有Borland Internet Components组件，那表示已经可以使用
TXMLDocument控件了。该控件在Internet控制卡中，笔者的在最后一个，图标为标识有XML
的文档式样。如果没有该控件的话，你需要安装。
TXMLDocument不是C++ Builder缺省安装的包，需要自己添加安装包。如果在C++ Builder
目录的Bin目录下存在dclnet60.bpl文件，就直接安装就是，否则需要修改安装，以安装该
组件包。

2、使用
2.1 基本操作
2.1.1 使用控件方式加载XML文件示例:
//加载XML文件<br /> OpenDialog1->Filter = "XML(程序配置文件)|*.xml";<br /> if (!OpenDialog1->Execute()){<br /> return;<br /> }</p> <p> XMLDoc->LoadFromFile(OpenDialog1->FileName);<br /> _di_IXMLNode node = XMLDoc->DocumentElement;<br /> if (node == NULL){<br /> ShowMessage("不是合法的程序配置文件XML文件格式。");<br /> return;<br /> }<br />
2.1.2 使用控件方式保存XML文件示例：

SaveDialog1->FileName = FDevTypeName + ".xml";<br /> SaveDialog1->Filter = "XML(程序配置文件)|*.xml";<br /> if (SaveDialog1->Execute()){<br /> XMLDoc->Active=true;<br /> XMLDoc->Version = "1.0";<br /> XMLDoc->Encoding = "GB2312";<br /> XMLDoc->Options << doNodeAutoIndent;<br /> //建立文档主元素<br /> XMLDoc->DocumentElement = XMLDoc->CreateElement("Config", "");<br /> XMLDoc->DocumentElement->SetAttribute("DevType", FDevTypeName);<br /> //从UI更新XML数据<br /> UpdateXMLDataFromUI(XMLDoc->DocumentElement);<br /> //格式化XML<br /> XMLDoc->LoadFromXML(formatXMLDoc(XMLDoc, 1));<br /> //保存XML文件<br /> XMLDoc->SaveToFile(SaveDialog1->FileName);<br /> ShowMessage("保存配置"+ SaveDialog1->FileName + "文件成功");<br /> }<br />      
2.2 读
2.2.1 读取节点数据

AnsiString GetNodeData(_di_IXMLNode panode,<br /> AnsiString nodename, AnsiString defaultvalue)<br /> {<br /> //取得子节点列表<br /> _di_IXMLNodeList nodes = panode->ChildNodes;<br /> //从子节点列表查找节点<br /> _di_IXMLNode node = nodes->FindNode(nodename);<br /> if (node == NULL){<br /> return defaultvalue;<br /> }<br /> //从节点取得数据<br /> return node->GetText();<br /> }
2.2.1 读取节点属性
//在格式描述XML文件中定位列描述<br /> nodename = "grid";<br /> _di_IXMLNode uinode = XMLUI->DocumentElement;<br /> _di_IXMLNodeList uinodelst = uinode->ChildNodes;<br /> uinode = uinodelst->FindNode(nodename);<br /> uinodelst = uinode->ChildNodes;</p> <p> for (jdx = 0; jdx < uinodelst->Count; jdx++){<br /> //取得当前列在表格中的位置<br /> colname = uinodelst->Nodes[jdx]->GetText();<br /> //设置列头<br /> colheader = colname + "(" + uinodelst->Nodes[jdx]->GetAttribute("length") ;</p> <p> //根据类型设置表格列类型，用于编辑<br /> //取得节点属性示例<br /> if (AnsiString(uinodelst->Nodes[jdx]->GetAttribute("type")) == AnsiString("Hex")){<br /> colheader += ", Hex";<br /> }else if (AnsiString(uinodelst->Nodes[jdx]->GetAttribute("type")) == AnsiString("DevType")){<br /> }else if (AnsiString(uinodelst->Nodes[jdx]->GetAttribute("type")) == AnsiString("Baud")){<br /> }else if (AnsiString(uinodelst->Nodes[jdx]->GetAttribute("type")) == AnsiString("Integer")){<br /> colheader += ", Dec";<br /> }else{<br /> colheader += ", Dec";<br /> }<br /> colheader += ")";</p> <p> //...(省略)<br /> }//~for(jdx...<br />
2.3 写
以下代码演示了如果添加子节点，以及设置属性，写XML文件在第1节点有所描述。
void UpdateNodeData(_di_IXMLNode panode,<br /> AnsiString nodename, AnsiString value, AnsiString friendlyname)<br /> {<br /> _di_IXMLNodeList nodes = panode->ChildNodes;<br /> _di_IXMLNode node = nodes->FindNode(nodename);<br /> if (node == NULL){<br /> //添加子节点<br /> node = panode->AddChild(nodename);<br /> //设置属性<br /> node->SetAttribute("FriendlyName", friendlyname);<br /> }<br /> //改变节点数据<br /> node->SetText(value);<br /> }
2.4 格式化XML
以上代码为格式化XML，调用方式在写XML在2.1.2节中有描述。使用该组件的缩进方式直接
通过写入节点方式并不能得到格式化文档，当加载一个文件时可以自动格式化。一种简单的
格式化方式就是先保存好文件再读取一次，再保存就可以得到格式化的文档。

//声明：该代码源于网络，并做了些修改<br /> //---------------------------------------------------------------------------<br /> //格式化XML文档<br /> //---------------------------------------------------------------------------<br /> AnsiString formatXMLDoc(TXMLDocument* doc, int indent)<br /> {</p> <p> AnsiString sRes;<br /> int i;<br /> sRes = "<?xml version=/"" + doc->Version + "/" encoding=/"" + doc->Encoding + "/"?>/r/n";<br /> sRes += "<" + doc->DocumentElement->NodeName;<br /> for (i = 0; i < doc->DocumentElement->AttributeNodes->Count; i++)<br /> {<br /> sRes += " " + doc->DocumentElement->AttributeNodes->Nodes[i]->NodeName<br /> + "=/"" + doc->DocumentElement->AttributeNodes->Nodes[i]->NodeValue + "/"";<br /> }<br /> sRes += ">/r/n";</p> <p> for (i = 0; i < doc->DocumentElement->ChildNodes->Count; ++i){<br /> sRes += formatXMLNode(doc->DocumentElement->ChildNodes->Nodes[i], indent);<br /> }<br /> sRes += "</" + doc->DocumentElement->NodeName + ">/r/n";<br /> return sRes;<br /> }</p> <p>AnsiString formatXMLNode(_di_IXMLNode element, int indent)<br /> {</p> <p> AnsiString sBlank = "";<br /> AnsiString sRes = "";<br /> int i;<br /> for (i = 0; i < indent; ++i){<br /> sBlank += " ";<br /> }</p> <p> if (element->NodeType == ELEMENT_NODE<br /> && element->ChildNodes && element->ChildNodes->Count > 0<br /> && element->ChildNodes->Nodes[0]->NodeType != TEXT_NODE)<br /> {<br /> sRes = sBlank + '<'+element->NodeName;<br /> for (i = 0; i < element->AttributeNodes->Count; i++)<br /> {<br /> sRes += " " + element->AttributeNodes->Nodes[i]->NodeName<br /> + "=/"" + element->AttributeNodes->Nodes[i]->NodeValue + "/"";<br /> }<br /> sRes += ">/r/n";<br /> indent++;<br /> for (i = 0; i < element->ChildNodes->Count; i++)<br /> {<br /> sRes += formatXMLNode(element->ChildNodes->Nodes[i], indent);<br /> }<br /> sRes += sBlank + "</" + element->NodeName + ">/r/n";<br /> }<br /> else if (element->NodeType != PROCESSING_INSTRUCTION_NODE)<br /> {<br /> sRes += sBlank + element->XML + "/r/n";<br /> }<br /> return sRes;<br /> }</p> <p>

3、注意事项
以上描述的方式是通过XML控件方式来操作XML文档。在使用对象方式操作XML文件时，需要注意一些问题。
在加载一个文件时，不需要创建一个TXMLDocument对象（TXMLDocument *myxml = new TXMLDocument()），
而是使用_di_IXMLDocument接口。从文件加载XML文件是使用LoadXMLDocument来获得该接口的实例。操作
一个空的XML文档并开始写时也是使用该接口NewXMLDocument获得该接口。