JCL Help:DecodeDate@TDateTime@Integer@Integer@Integer
JCL Help: DecodeDate Function
Search in JCL Help
Search in all projects
Summary
Works like DecodeDate in SysUtils, but can do negative years and years > 9999.
Pascal
procedure DecodeDate(Date: TDateTime; out Year: Word; out Month: Word; out Day: Word); overload;
procedure DecodeDate(Date: TDateTime; out Year: Integer; out Month: Word; out Day: Word); overload;
procedure DecodeDate(Date: TDateTime; out Year: Integer; out Month: Integer; out Day: Integer); overload;
Parameters
| Parameters | Description |
| Date: TDateTime | date to be converted. |
| out Year: Word | Year of the converted date. |
| out Month: Word | Month of the converted date. |
| out Day: Word | Day of the converted date. |
Description
Works like DecodeDate in SysUtils, but can do negative years and years > 9999.
See Also
About
Unit
Donator
Michael Schnell
Notes
With JCLDate negative years and dates > year 9999 are valid in nearly all functions handling TDateTime. As people did not use 12 Months before year 0001, and supposedly will not after 9999, we just use the solar year and a month = 1/12 of a solar year in such years. Year 0 does not exist. To activate this function JCLDateTime must appear after SysUtils in the uses clause or it must be explicitly denoted as JCLDateTime.DecodeDate.
Contribute to this help topic
This documentation wiki is based on the collaborative effort of Project JEDI users. Your edits are welcome in order to improve documentation quality: edit this page
