IncMilliSecond

function IncMilliSecond(const AValue: TDateTime; const ANumberOfMilliSeconds: Int64 = 1): TDateTime;

Funkcja w wartości określającej datę/czas (parametr AValue), zwiększa ilość milisekund. Parametr ANumberOfMilliSeconds oznacza ilość milisekund do zwiększenia (lub zmniejszenia - wartość może być ujemna):

program Foo;
 
{$APPTYPE CONSOLE}
 
uses
  SysUtils, DateUtils;
 
var
  dtNow : TDateTime;
begin
  dtNow := Now;
  Writeln('Teraz jset: ' + TimeToStr(dtNow));
  Writeln('Za 30 sekund będzie: ' + TimeToStr(IncMilliSecond(dtNow, 30000)));
 
  Readln;
end.

Zobacz też:

• IncMonth
• IncDay
• IncWeek
• IncSecond
• IncMinute
• DateTimeToStr
• Now