pascal/lazarus-ccr
1
0
Fork 0
Code Issues Releases Activity

fpspreadsheet: Fix reading error in ods related to rich-text fonts

Browse Source 
git-svn-id: https://svn.code.sf.net/p/lazarus-ccr/svn@4309 8e941d3f-bd1b-0410-a28a-d453659cc2b4
This commit is contained in:
wp_xxyyzz
2015-08-31 21:32:59 +00:00
parent 9720221878
commit 9bcaed5b25
8 changed files with 315 additions and 31 deletions
Download Patch File Download Diff File Expand all files Collapse all files

2
components/fpspreadsheet/fpshtmlutils.pas
View File

@ -994,7 +994,7 @@ begin
begin
Result := Result + '<font';
if cfFontName in FChangedParams[i] then
Result := Result + ' face="' + FFonts[i].FontName + '"';
Result := Result + ' face="' + UnquoteStr(FFonts[i].FontName) + '"';
if cfFontSize in FChangedParams[i] then
Result := Result + ' size="' + Format('%.gpt', [FFonts[i].Size], FPointSeparatorSettings) + '"';
if cfFontColor in FChangedParams[i] then