DateTime.AddSeconds

Синтаксис

AddSeconds(Value: DateTime; Count: Integer): DateTime;

Параметры

Value - исходная дата.

Count - количество добавляемых секунд.

Описание

Метод AddSeconds добавляет к значению исходной даты, передаваемой посредством параметра Value, указанное количество секунд.

Пример

Sub Main;

Var

DT, DT1, DT2, DT3, DT4: DateTime;

Begin

DT := DateTime.Parse("01.01.2004 10:20:20");

DT1 := DateTime.AddSeconds(DT, 1);

DT2 := DateTime.AddSeconds(DT, 80);

DT3 := DateTime.AddSeconds(DT, 3600);

DT4 := DateTime.AddSeconds(DT, -90);

End Sub Main;

В результате, в переменных «DT», «DT1», «DT2», «DT3» и «DT4» будут находиться значения:

«DT» - «01.01.2004 10:20:20»

«DT1» - «01.01.2004 10:20:21»

«DT2» - «01.01.2004 10:21:40»

«DT3» - «01.01.2004 11:20:20»

«DT4» - «01.01.2004 10:18:50»

См. также:

DateTime