"Для разработчиков", "Серверные скрипты", "Описание функций", "Разное", "GetTickCount".
Функция для получения времени аптайма хост-системы Windows в миллисекундах.
function GetTickCount: string;
Число миллисекунд, тип int64.
Замер времени исполнения фрагмента кода скрипта для профилирования производительности.
var
iStart: int64;
i: integer;
r: double;
begin
iStart := GetTickCount;
for i := 1 to 100000 do
r := Sqrt(Random(1000000)) + Sin(Random(1000));
mLogScript(IntToStr(GetTickCount - iStart), 'milliseconds');
end.
[12:18:20] (Log "GetTickCount"): [milliseconds] 453
[12:18:20] (Run "GetTickCount"): Время выполнения скрипта: 454 мс
[12:18:20] (Run "GetTickCount"): Скрипт выполнен успешно.