...
Node := ParentNode.AddChild(TreeNode.Text);
...
Name := Copy(TreeNode[i].Text, 1, Pos('=', TreeNode[i].Text) - 1);
Value := Copy(TreeNode[i].Text, Pos('=', TreeNode[i].Text) + 1,
Length(TreeNode[i].Text) - Pos('=', TreeNode[i].Text));
Node.SetAttributeNS(Name, '=', Value);
//这里的Value是个汉字 ... XMLDocument1.SaveToFile('E:\tmp\test2.xml');
谁知生成的XML文件中的属性值是乱码?如果换成英文就可以,为什么?难道TXMLDocument不支持中文?
Node := ParentNode.AddChild(TreeNode.Text);
...
Name := Copy(TreeNode[i].Text, 1, Pos('=', TreeNode[i].Text) - 1);
Value := Copy(TreeNode[i].Text, Pos('=', TreeNode[i].Text) + 1,
Length(TreeNode[i].Text) - Pos('=', TreeNode[i].Text));
Node.SetAttributeNS(Name, '=', Value);
//这里的Value是个汉字 ... XMLDocument1.SaveToFile('E:\tmp\test2.xml');
谁知生成的XML文件中的属性值是乱码?如果换成英文就可以,为什么?难道TXMLDocument不支持中文?
解决方案 »
- DELPHI7 TWordApplication控件CommandBars 提示Cannot assign to a read-only proper
- 两个 dbgrid ,和一个button,两个datetimepicker
- 紧急!
- 帮我一个忙?谢谢!
- fastreport如何作出象excel那样的表格来?在线等!解决马上揭贴!
- 在delphi中如何将一个auto-create的窗体转换到available窗体?(急)
- dbgrid中,下拉条拖动的时候,为什么会出现重复记录!!!
- delphi里怎么调用GetObjectContext()函数
- adoquery中如何用locate来进行模糊查询
- 请问如何将象素转换成毫米?
- 怎么获得网络上计算机的名称
- 怎样在程序中控制切换到某个应用程序窗口
我就是忘了:
XMLDocument1.Encoding := 'GB2312';