Delphi高精度计时方法

【文件属性】：
文件名称：Delphi高精度计时方法
文件大小：2KB
文件格式：TXT
更新时间：2016-05-18 15:57:51
Delphi //取毫秒级时间精度(方法一)： 　　var 　　 t1,t2:int64; 　　 r1:int64; 　　begin 　　 t1:=GetTickCount;//获取开始计数 WINDOWS API 　　 sleep(1000);{do...}//执行要计时的代码 　　t2:=GetTickCount;//获取结束计数值 　　 r1:=t2-t1;//取得计时时间，Y\`国4~络(}.u_%t"hV单位毫秒(ms) 　　 showmessage(inttostr(r1)); 　　end;