[fpc-pascal] Explicit date from double format

[Michalis Kamburelis]

Anton Tichawa wrote:
> Michael Van Canneyt wrote:
> 
>> On Wed, 29 Sep 2004, Jilani Khaldi wrote:
>>
>>  
>>
>>> Hi All,
>>> Does somebody kown the algorithm to convert a date from the double
>>> format  to an explicit format?
>>> Example: the function "now" givers me: 3.825956615197917E+004
>>> I want to transform it in: year-month-day....
>>>   
>>
>>
>>
>> Why not use DateToStr() or FormatDateTime() from sysutils ?
>>
>> Michael.
>>
>> _______________________________________________
>> fpc-pascal maillist  -  fpc-pascal at lists.freepascal.org
>> http://lists.freepascal.org/mailman/listinfo/fpc-pascal
>>
>>  
>>
> Or, if you need the values for some sort of calculation, you have to
> 
> - find out the reference date, i. e. DateToStr(0)
> - and the scale, (I think 1.0 = 1 day)
> - consider the month lengths, with february changing in leap years
> - for historic dates, consider calendar switches
> 
> There's a conversion function somewhere on my hard disk. If I find it, 
> I'll post it later.
> 
> Or you might scan the strings created by DateToStr. That'd be 
> quick-n-dirty, though :-)
> 
> Anton.
> 

Or, simpler, use DecodeDateTime function from DateUtils unit. It's even 
Delphi-compatible. I'm not sure whether it exists in FPC 1.0.x (even if 
not, it's probably possible to just compile DateUtils unit sources from 
FPC 1.9.4 using FPC 1.0.10), but it exists in FPC 1.9.x for sure.

-- 
Michalis