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

RecodeSecond

Replace seconds part of a TDateTimevalue with another second.

Declaration

Source position: dateutil.inc line 340

function RecodeSecond(

  const AValue: TDateTime;

  const ASecond: Word

):TDateTime;

Arguments

AValue

  

Date/time to recode

ASecond

  

Second to replace in AValue

Function result

AValuewith replaced second.

Description

RecodeSecondreplaces the Second part of the timestamp AValuewith ASecond. All other parts of the date/time stamp are left untouched.

Errors

If the ASecondvalue is not within a valid range (0..59) 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.

RecodeDay

  

Replace day part of a TDateTimevalue with another day.

RecodeHour

  

Replace hours part of a TDateTimevalue with another hour.

RecodeMinute

  

Replace minutse part of a TDateTimevalue with another minute.

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 Example92;

{ This program demonstrates the RecodeSecond function }

Uses SysUtils,DateUtils;

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

Var
  S : AnsiString;

Begin
  S:=FormatDateTime(Fmt,RecodeSecond(Now,0));
  Writeln('This moment, seconds stripped : ',S);
End.