[Overview][Constants][Procedures and functions] Reference for unit 'dateutils' (#rtl)

RecodeDay

Replace day part of a TDateTimevalue with another day.

Declaration

Source position: dateutil.inc line 337

function RecodeDay(

  const AValue: TDateTime;

  const ADay: Word

):TDateTime;

Arguments

AValue

  

Date to recode

ADay

  

Day to replace in AValue

Function result

AValuewith replaced day.

Description

RecodeDayreplaces the Day part of the timestamp AValuewith ADay. All other parts of the date/time stamp are left untouched.

Errors

If the ADayvalue is not within a valid range (1..12) then an EConvertErrorexception is raised.

See also

RecodeYear

  

Replace year part of a TDateTimevalue with another year.

RecodeMonth

  

Replace month part of a TDateTimevalue with another month.

RecodeHour

  

Replace hours part of a TDateTimevalue with another hour.

RecodeMinute

  

Replace minutse part of a TDateTimevalue with another minute.

RecodeSecond

  

Replace seconds part of a TDateTimevalue with another second.

RecodeMilliSecond

  

Replace milliseconds part of a TDateTimevalue with another millisecond.

RecodeDate

  

Replace date part of a TDateTimevalue with another date.

RecodeTime

  

Replace time part of a TDateTimevalue with another time.

RecodeDateTime

  

Replace selected parts of a TDateTimevalue with other values

Example

Program Example89;

{ This program demonstrates the RecodeDay function }

Uses SysUtils,DateUtils;

Const
  Fmt = 'dddd dd mmmm yyyy hh:nn:ss';

Var
  S : AnsiString;

Begin
  S:=FormatDateTime(Fmt,RecodeDay(Now,1));
  Writeln('This moment on the first of the month : ',S);
End.