急!急!急!DBGrid中的数据导入到XML中后格式是怎样的? DBGrid数据的XML格式是怎样的? 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 放一个TXMLDocument在form上。procedure TForm1.Button1Click(Sender: TObject);var aNode, aValueNode: IXMLNode; wStr: widestring;begin//+++++++++++++++++++++++++++++++++++++//用TXmlDocument实现创建一个Xml文档 with XMLDocument1.XML do begin Add('<?xml version="1.0" standalone="yes"?>'); Add('<DFW>'); Add('<savenight>'); Add('<name>savenight</name>'); Add('<sex>man</sex>'); Add('</savenight>'); Add('</DFW>'); end; XMLDocument1.Active := true; XMLDocument1.SaveToFile('d:\tmp\test.xml');end;但是有一个问题,不知汉字如何转化字符集 这样子是错误的,请哪位高手指点一下Add('<sex>男</sex>'); 直接用ADOQUERY或ADOTABLE直接导出为XML delphi 实现vista效果 控件 fastreport能合并相同列并居中吗 socket问题,很简单,有懂的帮忙解决下. 100分+一万分感激求助,请进。。。 各位,这样的贪污应该去哪里投诉 如何删除IE历史记录 客户端用ADOConnection连接服务器,如何可以不在网上邻居先登录????? 帮帮忙呀,关于SQL语句的问题! Delphi自带这种控件吗?(哪里可以找到) 高手来看看啊~~~ 手机管理软件外包信息 SQL删除表出现问题,请大虾门帮忙
var
aNode, aValueNode: IXMLNode;
wStr: widestring;
begin
//+++++++++++++++++++++++++++++++++++++
//用TXmlDocument实现创建一个Xml文档
with XMLDocument1.XML do
begin
Add('<?xml version="1.0" standalone="yes"?>');
Add('<DFW>');
Add('<savenight>');
Add('<name>savenight</name>');
Add('<sex>man</sex>');
Add('</savenight>');
Add('</DFW>');
end;
XMLDocument1.Active := true;
XMLDocument1.SaveToFile('d:\tmp\test.xml');
end;
但是有一个问题,不知汉字如何转化字符集
Add('<sex>男</sex>');