nx chronos
1.0.0
O cronômetro de plataforma cruzada com funcionalidade semelhante ao TStopwatch , mas permite medir tempos diferentes: tempo real, tempo de processo e tempo de encadeamento, incluindo ciclos de processo altamente precisos e ciclos de threads.
Se você estiver medindo ciclos, só poderá obter um valor Elapsed bruto que não pode ser convertido em nanossegundos, milissegundos ou segundos.
Os modos de medição de ProcessCycles e ThreadCycles são suportados apenas Windows Vista e SO mais recente.
var
ts: TNxChronometer;
begin
ts := TNxChronometer.Start(ProcessTime);
// code to be measured
...
ts.Stop;
Writeln( ' Process time: ' , ts.ElapsedMs);
end ;https://dalija.prasnikar.info