专注于互联网--专注于架构

delphi计时器:DELPHI高精度计时方法

//取毫秒级时间精度(方法一)：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; [阅读全文] [PDF]