DELPHI高精度计时方法,取毫秒级时间精度

心已赠人 2022-03-28 03:56 294阅读 0赞

//取毫秒级时间精度(方法一)：  
　　var  
　　t1,t2:int64;  
　　r1:int64;  
　　begin  
　　t1:=GetTickCount;//获取开始计数 WINDOWS API  
　　sleep(1000);\{do...\}//执行要计时的代码  
　　t2:=GetTickCount;//获取结束计数值  
　　r1:=t2-t1;//取得计时时间，单位毫秒(ms)  
　　showmessage(inttostr(r1));  
　　end;

//取毫秒级时间精度(方法二)：  
　　//use DateUtils;//引用DateUtils单位  
　　var  
　　t1,t2:tdatetime;  
　　r1:int64;  
　　begin  
　　t1:=now();//获取开始计时时间  
　　sleep(1000);\{do...\}//执行要计时的代码  
　　t2:=now();//获取结束计时时间  
　　r1:=SecondsBetween(t2,t1);//取得计时时间，单位秒(s)  
　　r1:=MilliSecondsBetween(t2,t1);//取得计时时间，单位毫秒(ms)  
　　showmessage(inttostr(r1));  
　　end;

//注：以上两种方式经本人测试好像只能产生0.01秒的计时精度

//取系统级时间精度：  
　　var  
　　c1:int64;  
　　t1,t2:int64;  
　　r1:double;  
　　begin  
　　QueryPerformanceFrequency(c1);//WINDOWS API 返回计数频率(Intel86:1193180)(获得系统的高性能频率计数器在一毫秒内的震动次数)  
　　QueryPerformanceCounter(t1);//WINDOWS API 获取开始计数值  
　　sleep(1000);\{do...\}//执行要计时的代码  
　　QueryPerformanceCounter(t2);//获取结束计数值  
　　r1:=(t2-t1)/c1;//取得计时时间，单位秒(s)  
　　r1:=(t2-t1)/c1\*1000;//取得计时时间，单位毫秒(ms)  
　　r1:=(t2-t1)/c1\*1000000;//取得计时时间，单位微秒  
　　showmessage(floattostr(r1));  
　　end;

发表评论取消回复

表情：

评论列表（有 0 条评论，294人围观）

还没有评论，来说两句吧...

相关阅读

相关 Hive中支持毫秒级别的时间精度

实际上，Hive 在较新的版本中已经支持毫秒级别的时间精度。你可以通过设置 hive.exec.default.serialization.format 和 mapred.ou

╰半夏微凉°/ 2024年02月05日 20:17/ 0 赞/ 65 阅读

相关高精度取模模板

include<cstdio> include<cstring> include<iostream> using namespace std;

冷不防/ 2023年10月10日 10:24/ 0 赞/ 57 阅读

相关 Delphi生成时间戳（秒级、毫秒级)

网上的引用DateTimeToTimeStamp生成毫秒级时间戳基本都是错误的：现提供两种方法，算出的确认跟JAVA ，C++一样的秒级： Edit2.T

川长思鸟来/ 2023年10月04日 18:42/ 0 赞/ 69 阅读

相关 Lua中使用毫秒精度时间的方法

这篇文章主要介绍了lua中使用毫秒精度时间的方法,本文讲解使用luasocket库实现毫秒精度时间,需要的朋友可以参考下！ lua自带的时间函数只能到秒的精度。为了统计到

旧城等待，/ 2023年10月03日 08:39/ 0 赞/ 24 阅读

相关高精度 AcWing 791. 高精度加法

高精度 AcWing 791. 高精度加法原题链接 [AcWing 791. 高精度加法][AcWing 791.] 算法标签高精度代码

灰太狼/ 2023年09月28日 11:11/ 0 赞/ 21 阅读

相关高精度 AcWing 792. 高精度减法

高精度 AcWing 792. 高精度减法原题链接 [AcWing 792. 高精度减法][AcWing 792.] 算法标签高精度代码

川长思鸟来/ 2023年09月28日 11:11/ 0 赞/ 169 阅读

相关 C++ 高精度加法高精度减法高精度乘法1

转自：http://blog.sina.com.cn/s/blog\_4fdb102b010087ng.html 前言:由于计算机运算是有模运算,数据范围的表示有一定限制,如

落日映苍穹つ/ 2022年06月09日 09:11/ 0 赞/ 298 阅读

相关 timegettime 与高精度计时

呵呵随手记一下，大家不要骂我 \include \pragma comment(lib,"winmm.lib") timegettime的标称是毫秒级别

ゝ一纸荒年。/ 2022年05月31日 04:16/ 0 赞/ 187 阅读

相关精确计算C++程序运行时间精度远超毫秒级

void timer() { SetThreadAffinityMask(GetCurrentThread(), 1); //choose core

野性酷女/ 2022年05月24日 01:05/ 0 赞/ 228 阅读

相关 DELPHI高精度计时方法,取毫秒级时间精度

//取毫秒级时间精度(方法一)：　　var 　　t1,t2:int64; 　　r1:int64; 　　begin 　　t1:=GetTickCount;/

心已赠人/ 2022年03月28日 03:56/ 0 赞/ 295 阅读