Unit 'DateUtils' Package
[Overview][Constants][Classes][Procedures and functions][Index] [#rtl]

RecodeSecond

Replace seconds part of a TDateTime value with another second.

Declaration

Source position: dateutil.inc line 372

function RecodeSecond(

  const AValue: TDateTime;

  const ASecond: Word

):TDateTime;

Arguments

AValue

  

Date/time to recode.

ASecond

  

Second to replace in AValue.

Function result

AValue with replaced second.

Description

RecodeSecond replaces the Second part of the timestamp AValue with ASecond. All other parts of the date/time stamp are left untouched.

Errors

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

RecodeMilliSecond

  

Replace milliseconds part of a TDateTime value with another millisecond.

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 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.

Documentation generated on: Dec 10 2024