Sign in Join
FPDoc Onlineexperiment

MilliSecondOfTheSecond function

In unit DateUtils

Calculate the number of milliseconds elapsed since the start of the second.

Declaration

pascal
function MilliSecondOfTheSecond(const AValue: TDateTime): Word

Arguments

AValue

Moment in the second.

Function result

Number of milliseconds elapsed since the start of the second.

Description

MilliSecondOfTheSecond returns the number of milliseconds that have passed since the start of the second (HH:MM:SS.000) till the moment indicated by AValue. This is a zero-based number, i.e. HH:MM:SS.000 will return 0.

See also

Example: ex46

pascal
Program Example46;

{ This program demonstrates the MilliSecondOfTheSecond function }

Uses SysUtils,DateUtils;

Var
  N : TDateTime;

Begin
  N:=Now;
  Writeln('MilliSecond of the Second : ',
          MilliSecondOfTheSecond(N));
End.

An experiment, built from development snapshots. Not the official Free Pascal or Lazarus documentation.