_GetTickCount (    StartMS : Longint) : Longint

Funkce vrací počet milisekund od startu systému - jestliže je parametr StartMS = -1. Tento parametr přeteče zhruba jednou za 25 dní.

Jestliže je parametr StartMS >= 0, vrací funkce rozdíl aktuálního čítače milisekund a milisekund z parametru StartMS. Přitom zohlední přetečení.

Podívejte se na: Procedury a funkce - Datumy

Příklad:

dim TickMS : Longint;
dim OldTickMS : Longint;
TickMS := _GetTickCount(-1);
Printup(TickMS,"  ",_GetTickCount(OldTickMS));
OldTickMS := TickMS;