DateTimeToStr: 2958466,00 is not a valid TDatetime encoding, maximum value is 2958466,00
Original Reporter info from Mantis: silvioprog
-
Reporter name: silvioprog
Original Reporter info from Mantis: silvioprog
- Reporter name: silvioprog
Description:
Hello,
This code works fine in Delphi 7 / XE 7:
var
D: TDateTime;
S: string;
begin
D := MaxDateTime;
S := DateTimeToStr(D);
end;
Return: 12/31/9999 11:59:59 PM.
But, in FPC (from trunk), I got a EConvertError:
2958466,00 is not a valid TDatetime encoding, maximum value is 2958466,00
The attached patch can fix this issue.
Thank you!
Mantis conversion info:
- Mantis ID: 28195
- Version: 3.1.1
- Fixed in version: 3.1.1
- Target version: 3.0.2