paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-04-21 11:29:24 +02:00
Code Issues Packages Projects Releases Wiki Activity

* Changed MinDateTime for FloatToDateTime and VariantToDate to 01/01/0001

Browse Source 
git-svn-id: trunk@8534 -
This commit is contained in:
joost 2007-09-17 21:25:51 +00:00
parent 3db626873b
commit f6d66e8cf5
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
rtl/objpas/sysutils/sysstrh.inc
View File

@ -39,8 +39,8 @@ type
End;
const
{ For floattodatetime }
MinDateTime: TDateTime = -657434.0; { 01/01/0100 12:00:00.000 AM }
{ For floattodatetime and VariantToDate }
MinDateTime: TDateTime = -693593.0; { 01/01/0001 12:00:00.000 AM }
MaxDateTime: TDateTime = 2958465.99999; { 12/31/9999 11:59:59.999 PM }
{$if defined(FPC_HAS_TYPE_EXTENDED) or defined(FPC_HAS_TYPE_FLOAT128)}