Fórum Ma formatação no Xml #333274

Olá Grupo
Estou construindo um XML com Tstringlist, mas quando gravo em disco
e vou validar verifico que a formatação fica errado devido aos caracteres com assentos, onde está o problema?


var
xmldoc : TStringList;
begin
xmldoc := TStringList.Create;
xmldoc.Add(´<?xml version=´1.0´ encoding=´UTF-8´?>´);
xmldoc.Add(´<Nome>João</Nome>´);
xmldoc.add(´<Morada>Fundão</Morada>´);
xmldoc.SaveToFile(´c:\a.xml´);
xmldoc.Free;

end;
<?xml version=´1.0´ encoding=´UTF-8´?>

<Nome>Jo⭼/Nome>

<Morada>Fund&11132;/Morada>