Описание:

         Считывает время, прошедшее с момента запуска системы.   

Параметры:

нет

Возвращаемое значение:

Прошедшее время (в миллисекундах).

Пример:

Procedure Button1OnClick();
var
     T:Cardinal

begin
        T := GetTickCount;
          Sleep(1000);
          T := GetTickCount — T;
          ShowMessage(intToStr(T));

end;