Hi ,

I have problem with comparing negative datetime values in fcl-db test suite (accessed as variants). It is related to VariantToDate function (in cvarutil.inc), where result is tested against MinDateTime.

For example:
 v1 :=strtodatetime('01.01.0001 12:00:00');
 v2 :=strtodatetime('01.01.0001 13:00:00');
 if v2>v1 then ... //<--exception here

Exception is raised because v2<MinDateTime { 01/01/0001 12:00:00.000 AM }.
But logicaly on timeline is "v2" after "v1".

What do you think, can we change MinDateTime from -693593.0 to -693594.0;
(to accept 01/01/0001 23:59:59.999)
...

-Laco.
_______________________________________________
fpc-devel maillist  -  [email protected]
http://lists.freepascal.org/mailman/listinfo/fpc-devel

Reply via email to