[fpc-pascal] DateTimeToStr: 2958466, 00 is not a valid TDatetime encoding, maximum value is 2958466, 00

[silvioprog]

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

Is this a bug?

PS: same problem using DateTimeToString directly.

-- 
Silvio Clécio
My public projects - github.com/silvioprog
-------------- next part --------------
An HTML attachment was scrubbed...
URL: <http://lists.freepascal.org/pipermail/fpc-pascal/attachments/20150527/da19473f/attachment.html>