Delphi TNativeXML Node节点乱码的一种解决方法

Node1.WriteString(HomologousFieldItem.cXMLNodeCode, AnsiToUtf8(FieldByName(HomologousFieldItem.cMappingFieldCode).AsString));

还有一种，就是定义成WideString，保存成这种类型的数据， 然后用 Node1.WriteWideString()的方法，也可以避免。