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  -  [EMAIL PROTECTED]
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

_______________________________________________
fpc-pascal maillist  -  [EMAIL PROTECTED]
http://lists.freepascal.org/mailman/listinfo/fpc-pascal

Reply via email to