Date2Year Function |
Unit
QESBPCSDateTime
Declaration
Function Date2Year(const DT: TDateTime): Word;
Parameters |
DT | Date/Time to Convert. |
Returns
the Year component, including Century.
Category
Date/Time Conversion Routines
Year Based Arithmetic RoutinesImplementation
function Date2Year (const DT: TDateTime): Word; var D, M: Word; begin OptDecodeDateW (DT, Result, M, D); End; |
|