nx chronos
1.0.0
Кроссплатформенный секундомер с одинаковой функциональностью с TStopwatch , но он позволяет измерять различные времена: в реальном времени, время процесса и время потока, включая высокие точные циклы процессов и циклы потоков.
Если вы измеряете циклы, вы сможете получить только Elapsed значение, которое нельзя преобразовать в наносекунд, миллисекунд или секунд.
ProcessCycles и режимы измерения ThreadCycles поддерживаются только Windows Vista и более новой ОС.
var
ts: TNxChronometer;
begin
ts := TNxChronometer.Start(ProcessTime);
// code to be measured
...
ts.Stop;
Writeln( ' Process time: ' , ts.ElapsedMs);
end ;https://dalija.prasnikar.info