From c429d42414af30bc40bb4512a984bf2ee8467a11 Mon Sep 17 00:00:00 2001 From: Joshy Date: Mon, 16 Nov 2009 12:46:31 +0000 Subject: [PATCH] Opendocument XML.Widestring->UTF8String conversion. Bug: 2897793 by Luiz Camara. git-svn-id: https://svn.code.sf.net/p/lazarus-ccr/svn@1013 8e941d3f-bd1b-0410-a28a-d453659cc2b4 --- components/fpspreadsheet/fpsopendocument.pas | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/components/fpspreadsheet/fpsopendocument.pas b/components/fpspreadsheet/fpsopendocument.pas index ce05befb0..ec8618f9c 100755 --- a/components/fpspreadsheet/fpsopendocument.pas +++ b/components/fpspreadsheet/fpsopendocument.pas @@ -231,7 +231,7 @@ end; procedure TsSpreadOpenDocReader.ReadLabel(ARow: Word; ACol : Word; ACellNode : TDOMNode); begin - FWorkSheet.WriteUTF8Text(ARow,ACol,ACellNode.TextContent); + FWorkSheet.WriteUTF8Text(ARow,ACol,UTF8Encode(ACellNode.TextContent)); end; procedure TsSpreadOpenDocReader.ReadNumber(ARow: Word; ACol : Word; ACellNode : TDOMNode);