Date2ISOInt Function |
Unit
QESBPCSDateTime
Declaration
Function Date2ISOInt(const DT: TDateTime): LongWord;
Description
Zero Padded.
Parameters |
DT | Date to process. |
Category
Date/Time Conversion RoutinesImplementation
function Date2ISOInt (const DT: TDateTime): LongWord; var D, M, Y: Word; begin OptDecodeDateW (DT, Y, M, D); Result := Y * 10000 + M * 100 + D; End; |
|