Time

Time related methods


TTimeMarker

type TTimeMarker = record
    time, startTime: LongWord;
    paused: Boolean;
end;

Timer type which is useful for loops, timing and writing progress reports.

Note

  • by Bart de Boer

TTimeMarker.Start

Starts the timer. Can also be used when paused to continue where it left.

Note

  • by Bart de Boer

Example:

myTimer.Start();

TTimeMarker.Reset

Stops the timer and resets it to zero.

Note

  • by Bart de Boer

Example:

myTimer.Reset();

TTimeMarker.Pause

Pauses the timer. It can be continued with start().

Note

  • by Bart de Boer

Example:

myTimer.Pause();
TakeABreak(90000);
myTimer.Start();

TTimeMarker.GetTime

Gets the time from the timer. Returns zero if the timer was not set.

Note

  • by Bart de Boer

Example:

myTimer.start();
repeat
  DoStuff;
until(myTimer.GetTime() > 60000);

TTimeMarker.GetTotalTime

Gets the time from the timer including the time it was paused. Returns zero if the timer was not set.

Note

  • by Bart de Boer

Example:

BreakTime := MyTimer.GetTotalTime() - MyTimer.GetTime();

TCountDown

A neat and simple timer type.

Example:

myTimer.Init(3000); //3000ms
while not myTimer.IsFinished() do
  {do something};

myTimer.Restart(Random(-200,200)); //3000 +/- 200ms
while not myTimer.IsFinished() do
  {do something};