2
0
Эх сурвалжийг харах

* 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 жил өмнө
parent
commit
272417e602

+ 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