Moduły » DateUtils

IncSecond

IncSecond
Moduł: DateUtils

function IncSecond(const AValue: TDateTime; const ANumberOfSeconds: Int64 = 1): TDateTime;

Funkcja zwiększa ilość sekund w wartości określającej datę/czas (parametr AValue). Parametr ANumberOfSeconds oznacza ilość sekund (możliwa wartość ujemna):

program Foo;
 
{$APPTYPE CONSOLE}
 
uses
  SysUtils, DateUtils;
 
var
  dtNow : TDateTime;
begin
  dtNow := Now;
  Writeln('Teraz jset: ' + TimeToStr(dtNow));
  Writeln('Za 30 sekund będzie: ' + TimeToStr(IncSecond(dtNow, 30)));
 
  Readln;
end.


Zobacz też: