Variant to TDateTime bug (MinDateTime)
Original Reporter info from Mantis: s73
-
Reporter name: Vladimir K
Original Reporter info from Mantis: s73
- Reporter name: Vladimir K
Description:
Same as issue http://mantis.freepascal.org/view.php?id=30805 but with minimum value.
Steps to reproduce:
var
dt: TDateTime;
v: Variant;
begin
dt := EncodeDateTime(1, 1, 1, 23, 59, 59, 999);
v := dt;
dt := TDateTime(v); //<- error
Additional information:
MinDateTime should be at least -693593,999999988 instead of
-693593.0; { 01/01/0001 12:00:00.000 AM }
Mantis conversion info:
- Mantis ID: 30930
- OS: Windows
- OS Build: 10
- Build: Lazarus 1.7
- Platform: 64
- Version: 3.0.1
- Fixed in version: 3.1.1
- Fixed in revision: 34903 (#8e3381b4)
- Target version: 3.2.0