From dde6e12a856a3348985070a5f915d3d684efec3f Mon Sep 17 00:00:00 2001 From: wp_xxyyzz Date: Thu, 22 May 2014 12:37:34 +0000 Subject: [PATCH] fpspreadsheet: Restore excel2write demo forgotten in previous commit git-svn-id: https://svn.code.sf.net/p/lazarus-ccr/svn@3079 8e941d3f-bd1b-0410-a28a-d453659cc2b4 --- components/fpspreadsheet/examples/excel2demo/excel2write.lpr | 4 +--- 1 file changed, 1 insertion(+), 3 deletions(-) diff --git a/components/fpspreadsheet/examples/excel2demo/excel2write.lpr b/components/fpspreadsheet/examples/excel2demo/excel2write.lpr index 430a811ed..d23f4a5b9 100644 --- a/components/fpspreadsheet/examples/excel2demo/excel2write.lpr +++ b/components/fpspreadsheet/examples/excel2demo/excel2write.lpr @@ -45,8 +45,6 @@ begin } // Write some number cells - MyWorksheet.WriteDateTime(0, 0, EncodeDate(2012,1,12)+EncodeTime(13,14,15,0), nfShortTimeAM); - (* MyWorksheet.WriteNumber(0, 0, 1.0); MyWorksheet.WriteUsedFormatting(0, 0, [uffBold, uffNumberFormat]); MyWorksheet.WriteNumber(0, 1, 2.0); @@ -380,7 +378,7 @@ begin MyWorksheet.WriteRowInfo(5, lRow); lRow.Height := 5; MyWorksheet.WriteRowInfo(6, lRow); -*) + // Save the spreadsheet to a file MyWorkbook.WriteToFile(MyDir + 'test' + STR_EXCEL_EXTENSION, sfExcel2, true); MyWorkbook.Free;