[fpc-pascal] Explicit encoding of LF in XML

[Reinier Olislagers]

All,

Looking at multiline support of text/string cells for export to Excel
XML format.

My code, such as:
    TDOMElement(FieldNode).SetAttribute('ss:Type', 'String');
    FNode :=
Foutputdoc.CreateTextNode(LeftStr(UTF8Decode(EF.Field.AsString), 32767));
writes out a cell like:

<Cell><Data ss:Type="String">First line.
Second line</Data></Cell>
(Separated by CR LF - changing it to only LF with a hex editor doesn't help)

Excel needs an encoded LF:
<Cell><Data ss:Type="String">First line.
Second line</Data></Cell>

How can I produce that?

Thanks,
Reinier