From 592312d0d70ede64ab7e2d2691ecedb073f84566 Mon Sep 17 00:00:00 2001 From: wp_xxyyzz Date: Thu, 1 Dec 2016 23:59:21 +0000 Subject: [PATCH] fpspreadsheet: Avoid modification of Short/LongDateFormat in the workbook's FormatSettings. (see http://forum.lazarus.freepascal.org/index.php/topic,34988.msg230513/topicseen.html) git-svn-id: https://svn.code.sf.net/p/lazarus-ccr/svn@5401 8e941d3f-bd1b-0410-a28a-d453659cc2b4 --- components/fpspreadsheet/source/common/fpspreadsheet.pas | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/components/fpspreadsheet/source/common/fpspreadsheet.pas b/components/fpspreadsheet/source/common/fpspreadsheet.pas index f8de459d4..ace38a245 100644 --- a/components/fpspreadsheet/source/common/fpspreadsheet.pas +++ b/components/fpspreadsheet/source/common/fpspreadsheet.pas @@ -7576,8 +7576,8 @@ begin FUnits := suMillimeters; // Units for column width and row height FormatSettings := UTF8FormatSettings; - FormatSettings.ShortDateFormat := MakeShortDateFormat(FormatSettings.ShortDateFormat); - FormatSettings.LongDateFormat := MakeLongDateFormat(FormatSettings.ShortDateFormat); +// FormatSettings.ShortDateFormat := MakeShortDateFormat(FormatSettings.ShortDateFormat); +// FormatSettings.LongDateFormat := MakeLongDateFormat(FormatSettings.ShortDateFormat); FFontList := TFPList.Create; SetDefaultFont(DEFAULT_FONTNAME, DEFAULT_FONTSIZE);