From eaf489ce444f655069d63f6419bfd4cfb248c4fd Mon Sep 17 00:00:00 2001 From: wp_xxyyzz Date: Mon, 14 May 2018 08:12:31 +0000 Subject: [PATCH] fpspreadsheet: Multiple-sheet 3d references (Sheet1:Sheet3!A1:B3) working for xls, xlsx and ods readers and writers git-svn-id: https://svn.code.sf.net/p/lazarus-ccr/svn@6410 8e941d3f-bd1b-0410-a28a-d453659cc2b4 --- .../tests/singleformulatests.pas | 24 +++++++++++++++++++ 1 file changed, 24 insertions(+) diff --git a/components/fpspreadsheet/tests/singleformulatests.pas b/components/fpspreadsheet/tests/singleformulatests.pas index 28d71b273..e18d29757 100644 --- a/components/fpspreadsheet/tests/singleformulatests.pas +++ b/components/fpspreadsheet/tests/singleformulatests.pas @@ -49,6 +49,11 @@ type procedure SumSheetRange_OOXML; procedure SumSheetRange_ODS; + procedure SumMultiSheetRange_BIFF5; + procedure SumMultiSheetRange_BIFF8; + procedure SumMultiSheetRange_OOXML; + procedure SumMultiSheetRange_ODS; + end; implementation @@ -261,6 +266,25 @@ end; { ---- } +procedure TSpreadSingleFormulaTests.SumMultiSheetRange_BIFF5; +begin + TestFloatFormula('SUM(Sheet2:Sheet3!C3:C5)', 55.0, ftkCellRangeSheetRange, sfExcel5); +end; + +procedure TSpreadSingleFormulaTests.SumMultiSheetRange_BIFF8; +begin + TestFloatFormula('SUM(Sheet2:Sheet3!C3:C5)', 55.0, ftkCellRangeSheetRange, sfExcel8); +end; + +procedure TSpreadSingleFormulaTests.SumMultiSheetRange_OOXML; +begin + TestFloatFormula('SUM(Sheet2:Sheet3!C3:C5)', 55.0, ftkCellRangeSheetRange, sfOOXML); +end; + +procedure TSpreadSingleFormulaTests.SumMultiSheetRange_ODS; +begin + TestFloatFormula('SUM(Sheet2:Sheet3!C3:C5)', 55.0, ftkCellRangeSheetRange, sfOpenDocument); +end; initialization // Register to include these tests in a full run