DateOf¶

Extract the date part from a TDateTime indication.

Declaration¶

Source position: dateutil.inc line 98

function DateOf(const AValue: TDateTime) : TDateTime;

Arguments¶

Name	Description
AValue	TDateTime with the date extracted in the routine.

Function result¶

Date part of AValue.

Description¶

DateOf extracts the date part from AValue and returns the result.

Since the TDateTime is actually a double with the date part encoded in the integer part, this operation corresponds to a call to Int.

See also¶

Name	Description
TimeOf	Extract the time part from a TDateTime indication.
YearOf	Extract the year from a given date.
MonthOf	Extract the month from a given date.
DayOf	Extract the day (of month) part from a TDateTime value.
HourOf	Extract the hour part from a TDateTime value.
MinuteOf	Extract the minute part from a TDateTime value.
SecondOf	Extract the second part from a TDateTime value.
MilliSecondOf	Extract the millisecond part from a TDateTime value.

Example¶

Program Example1;

{ This program demonstrates the DateOf function }

Uses SysUtils,DateUtils;

Begin
  Writeln('Date is: ',DateTimeToStr(DateOf(Now)));
End.