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