MilliSecondOf
Модуль: DateUtils
function MilliSecondOf(const AValue: TDateTime): Word;
Функция возвращает количество миллисекунд , чтобы прочитать параметр Avalue типа TDateTime . Функция возвращает число от 0 до 999:
1 2 3 4 5 6 7 8 9 10 11 12 13 14 |
program Foo; {$APPTYPE CONSOLE} uses SysUtils, DateUtils; begin Writeln('Дата: ', DateTimeToStr(Now)); Writeln('-----'); Writeln('Мил Сек: ', MilliSecondOf(Now)); Readln; end. |