delphi 编辑XML文件，写入值，请多帮助(100)

我现在想利用 delphi 编辑XML文件，创建XML格式文件，并增加节点，写入值；注意写入的值有可能是多行的。下面列举一个XML格式文档的例子； <SMSOpenRequest ID="OPENSUB2009080401350107"> <OpenSubscriber IdentyNo="33068119810333414" CustomerName="gunag" ContactName="guang" Phone="88986531" Mobile="13588760846" AccountName="guang" BalanceAmount="1000" SubscriberName="guang" CustomerLevel="4"> <ResSubscription RsProduct="5821" ResNo="022034589211347890" RsStatus="1" RsJoinDate="20090807" RsActiveDate="20090807" RsInActiveDate="20190101" /> <ProdSubscription SevProduct="1001" SevStatus="1" SevJoinDate="20090807" SevActiveDate="20090807" SevInActiveDate="20190101" LimitAmount="0" /> <ProdSubscription SevProduct="3015" SevStatus="1" SevJoinDate="20090807" SevActiveDate="20090807" SevInActiveDate="20190101" LimitAmount="0" /> </OpenSubscriber> </SMSOpenRequest>如上所述，按照指定的格式，编辑字段，把字段对应具体的值即可； 估计这个会比较麻烦，希望高手给与帮助，谢谢；

如上所述，创建节点、创建值；希望朋友们都帮忙想想办法；

朋友们多帮忙啊； 给出点合理化意见也可以阿；

朋友们来帮忙啊， 怎么没有人回复呢？

创业团队招聘Delphi开发工程师学历大学专科以上，计算机相关专业编成工作经验一年以上要求有delphi编程经验，熟悉计算数学算法熟悉MSSQL数据库 熟练运用语法熟悉 HTML 居住地上海工资待遇3000-5000元 有意者请联系：QQ381217003

To: xs-sky大哥，谢谢阿， 我是来求教问题的，不是来应聘的；谁帮我想想 处理XML的问题啊；

var Xml:IXMLDocument; TmpNode,RootNode:IXMLNode;begin try Xml:=NewXMLDocument; RootNode:=Xml.AddChild('SMSOpenRequest'); RootNode.SetAttributeNS('ID','','OPENSUB2009080401350107'); RootNode:=RootNode.AddChild('OpenSubscriber'); RootNode.SetAttributeNS('IdentyNo','','33068119810333414'); .... TmpNode:=RootNode.AddChild('ResSubscription'); TmpNode.SetAttributeNS('RsProduct','','5821'); TmpNode:=RootNode.AddChild('ProdSubscription'); TmpNode.SetAttributeNS('SevProduct','','1001'); ......... Result:=Xml.Node.XML; finally Xml:=nil; end;end;

To:manjel，感谢上面的朋友， 做的不错，结贴， 给分了；