paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-09-21 18:49:23 +02:00
Code Issues Packages Projects Releases Wiki Activity

* added twoyearsomethingwindow

Browse Source
This commit is contained in:
marco 2000-07-08 18:50:21 +00:00
parent 5ecf9b9cd0
commit 3316d7c423
1 changed files with 7 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

8
rtl/objpas/datih.inc
View File

@ -28,6 +28,9 @@ const
DateDelta = 693594; // Days between 1/1/0001 and 12/31/1899 DateDelta = 693594; // Days between 1/1/0001 and 12/31/1899
TwoDigitYearCenturyWindow : word=0;
{ Threshold to be subtracted from year before
age-detection.}
{ date time formatting characters: { date time formatting characters:
c : shortdateformat + ' ' + shorttimeformat c : shortdateformat + ' ' + shorttimeformat
@ -103,7 +106,10 @@ Function FileDateToDateTime (Filedate : Longint) : TDateTime;
{ {
$Log$ $Log$
Revision 1.7 2000-04-24 11:09:05 peter Revision 1.8 2000-07-08 18:50:21 marco
* added twoyearsomethingwindow
Revision 1.7 2000/04/24 11:09:05 peter
* removed eoln * removed eoln
Revision 1.6 2000/02/09 16:59:32 peter Revision 1.6 2000/02/09 16:59:32 peter