MSecsPerDay Delphi - Okolokompa

MSecsPerDay

Модуль: SysUtils
const
MSecsPerDay = SecsPerDay * MSecsPerSec;

Константа хранит значение, которое указывает количество миллисекунд в дне.

Константа, как и другие, связанные с датой и временем, объявлена в модуле SysUtils :

program DateTimeConst;

{$APPTYPE CONSOLE}

uses

SysUtils;

begin

Writeln('Это результат функции HoursPerDay: ', HoursPerDay);

Writeln('Это результат функции MinsPerHour: ', MinsPerHour);

Writeln('Это результат функции SecsPerMin: ', SecsPerMin);

Writeln('Это результат функции MSecsPerSec : ', MSecsPerSec );

Writeln('Это результат функции MinsPerDay: ', MinsPerDay);

Writeln('Это результат функции SecsPerDay: ', SecsPerDay);

Writeln('Это результат функции MSecsPerDay: ', MSecsPerDay);

Readln;

end.