Обновлено: 01 декабря, 2018

Функция SecondOfTheDay в Delphi

Используемый модуль: DateUtils

Описание:

Возвращает число секунд, отсчитанное от начала дня, к которому относится указанное значение AValue типа TDateTime, до этого указанного значения.

Синтаксис:

function SecondOfTheDay(const AValue: TDateTime): LongWord;

Пример использования:

uses DateUtils;
...
Var
  Res: Integer;
begin
  Res:= SecondOfTheDay(Now); // сколько секунд прошло с начала дня
  ShowMessage('С начала дня прошло ' + IntToStr(Res) + ' секунд');
end;

Результат:

SecondOfTheDay в Delphi

(14 оценок, среднее: 4,86 из 5)

Загрузка...