TryEncodeDateTime

Encode a Year, Month, Day, Hour, minute, seconds, milliseconds tuplet to a TDateTime value

Declaration

Source position: dateutil.inc line 306

  function TryEncodeDateTime(const AYear: Word; const AMonth: Word; 
                            const ADay: Word; const AHour: Word; 
                            const AMinute: Word; const ASecond: Word; 
                            const AMilliSecond: Word; 
                            out AValue: TDateTime) : Boolean;

Description

EncodeDateTime encodes the values AYearAMonth, ADay,AHour, AMinute,ASecond and AMilliSecond to a date/time value and returns this value in AValue.

If the date was encoded successfully, True is returned, False is returned if one of the arguments is not valid.

See also

Name	Description
EncodeDateDay	Encodes a year and day of year to a TDateTime value
EncodeDateMonthWeek	Encodes a year, month, week of month and day of week to a TDateTime value
EncodeDateTime	Encodes a TDateTime value from all its parts
EncodeDateWeek	Encode a TDateTime value from a year, week and day of week triplet
TryEncodeDateDay	Encode a year and day of year to a TDateTime value
TryEncodeDateMonthWeek	Encode a year, month, week of month and day of week to a TDateTime value
TryEncodeDateWeek	Encode a year, week and day of week triplet to a TDateTime value

Example

Program Example79;
{ This program demonstrates the TryEncodeDateTime function }
Uses SysUtils,DateUtils;
Var
  Y,Mo,D,H,Mi,S,MS : Word;
  TS : TDateTime;
Begin
  DecodeDateTime(Now,Y,Mo,D,H,Mi,S,MS);
  If TryEncodeDateTime(Y,Mo,D,H,Mi,S,MS,TS) then
    Writeln('Now is : ',DateTimeToStr(TS))
  else
    Writeln('Wrong date/time indication');
End.