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

RecodeDate

Replace date part of a TDateTime value with another date.

Declaration

Source position: dateutil.inc line 352

function RecodeDate(

  const AValue: TDateTime;

  const AYear: Word;

  const AMonth: Word;

  const ADay: Word

):TDateTime;

Arguments

AValue

  

Date/time to recode

AYear

  

Year to replace in AValue

AMonth

  

Month to replace in AValue

ADay

  

Day to replace in AValue

Function result

AValue with replaced date.

Description

RecodeDate replaces the date part of the timestamp AValue with the date specified in AYear, AMonth, ADay. All other parts (the time part) of the date/time stamp are left untouched.

Errors

If one of the AYear, AMonth, ADay values is not within a valid range then an EConvertError exception is raised.

See also

RecodeYear

  

Replace year part of a TDateTime value with another year.

RecodeMonth

  

Replace month part of a TDateTime value with another month.

RecodeDay

  

Replace day part of a TDateTime value with another day.

RecodeHour

  

Replace hours part of a TDateTime value with another hour.

RecodeMinute

  

Replace minutes part of a TDateTime value with another minute.

RecodeSecond

  

Replace seconds part of a TDateTime value with another second.

RecodeDate

  

Replace date part of a TDateTime value with another date.

RecodeTime

  

Replace time part of a TDateTime value with another time.

RecodeDateTime

  

Replace selected parts of a TDateTime value with other values

Example

Program Example94;

{ This program demonstrates the RecodeDate function }

Uses SysUtils,DateUtils;

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

Var
  S : AnsiString;

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

Documentation generated on: Jun 23 2021