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

fpspreadsheet: Fix ooxml writer for conditional formatting broken in one of previous commits.

Browse Source 
git-svn-id: https://svn.code.sf.net/p/lazarus-ccr/svn@7513 8e941d3f-bd1b-0410-a28a-d453659cc2b4
This commit is contained in:
wp_xxyyzz
2020-07-01 16:26:01 +00:00
parent fba35bacb4
commit f1421b2b80
1 changed files with 3 additions and 1 deletions
Download Patch File Download Diff File Expand all files Collapse all files

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

@ -391,6 +391,8 @@ const
); );
function CFOperandToStr(v: Variant): String; function CFOperandToStr(v: Variant): String;
const
ERR = cardinal(-1);
var var
r, c: Cardinal; r, c: Cardinal;
begin begin
@ -401,7 +403,7 @@ begin
if Result[1] = '=' then if Result[1] = '=' then
Delete(Result, 1, 1) Delete(Result, 1, 1)
else else
if ParseCellString(Result, r, c) then if ParseCellString(Result, r, c) and (r <> ERR) and (c <> ERR) then
Result := GetCellString(r, c, []) Result := GetCellString(r, c, [])
else else
if VarIsStr(v) then if VarIsStr(v) then