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

fpspreadsheet: Fix ODS reader's incorrect usage of cell borders in files written by Excel.

Browse Source 
git-svn-id: https://svn.code.sf.net/p/lazarus-ccr/svn@3589 8e941d3f-bd1b-0410-a28a-d453659cc2b4
This commit is contained in:
wp_xxyyzz
2014-09-22 11:15:55 +00:00
parent 094bb314fc
commit 04beab04d1
1 changed files with 1 additions and 1 deletions
Download Patch File Download Diff File Expand all files Collapse all files

2
components/fpspreadsheet/fpsopendocument.pas
View File

@ -2185,7 +2185,7 @@ begin
bkClr := HTMLColorStrToColor(s); bkClr := HTMLColorStrToColor(s);
// Borders // Borders
s := GetAttrValue(styleChildNode, 'fo:border'); s := GetAttrValue(styleChildNode, 'fo:border');
if (s <>'') then begin if (s <>'') and (s <> 'none') then begin
borders := borders + [cbNorth, cbSouth, cbEast, cbWest]; borders := borders + [cbNorth, cbSouth, cbEast, cbWest];
SetBorderStyle(cbNorth, s); SetBorderStyle(cbNorth, s);
SetBorderStyle(cbSouth, s); SetBorderStyle(cbSouth, s);