fpspreadsheet: Fix utf8 converion error in boff2 (formulas with string results)

git-svn-id: https://svn.code.sf.net/p/lazarus-ccr/svn@3959 8e941d3f-bd1b-0410-a28a-d453659cc2b4
This commit is contained in:
wp_xxyyzz
2015-02-24 11:04:19 +00:00
parent e0ba07f38b
commit 97ddec5e62

View File

@ -1732,7 +1732,7 @@ var
s: ansistring; s: ansistring;
len: Integer; len: Integer;
begin begin
s := UTF8ToAnsi(AString); s := ConvertEncoding(AString, encodingUTF8, FCodePage);
len := Length(s); len := Length(s);
{ BIFF Record header } { BIFF Record header }