paweld/lazarus-ccr
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

fpspreadsheet: Fix incorrect right-to-left alignment of xlsx files introduced by prev commit.

Browse Source 
git-svn-id: https://svn.code.sf.net/p/lazarus-ccr/svn@6586 8e941d3f-bd1b-0410-a28a-d453659cc2b4
This commit is contained in:
wp_xxyyzz 2018-08-10 15:04:13 +00:00
parent 1c7bd8d915
commit 9a3ee0016f
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
components/fpspreadsheet/source/common/xlsxooxml.pas
View File

@ -2269,7 +2269,7 @@ begin
s := Lowercase(GetAttrValue(sheetViewNode, 'rightToLeft')); s := Lowercase(GetAttrValue(sheetViewNode, 'rightToLeft'));
if (s = '0') or (s = 'false') then if (s = '0') or (s = 'false') then
sheet.BiDiMode := bdLTR sheet.BiDiMode := bdLTR
else if (s = '1') = (s = 'true') then else if (s = '1') or (s = 'true') then
sheet.BiDiMode := bdRTL; sheet.BiDiMode := bdRTL;
childNode := sheetViewNode.FirstChild; childNode := sheetViewNode.FirstChild;