Browse Source

* while on windows the max. possible year should be 1980+127=2127, 2104 causes an error (seems to be limited to 2099), so stay with 2096

florian 1 year ago
parent
commit
272417e602
1 changed files with 1 additions and 1 deletions
  1. 1 1
      tests/test/units/sysutils/tfile1.pp

+ 1 - 1
tests/test/units/sysutils/tfile1.pp

@@ -45,7 +45,7 @@ BEGIN
     do_error(1004);
   Close(f);
 
-  dateTime := EncodeDate(2104,2,29);
+  dateTime := EncodeDate(2096,2,29);
   Assign(f,'datetest.dat');
   Rewrite(f);
   if FileSetDate(filerec(f).handle, DateTimeToFileDate(dateTime))<>0 then