Delphi-获取毫秒-计算代码运行的时间

本文整理自网络，侵删。

 
很多时候,我们想获取程序代码的执行时间,来计算代码的执行效率.

具体做法如下,非常简单:

var
    i:integer;
    t:integer;
begin
    t := GetTickCount();
    for I := 0 to 10000 do
    begin
        //code
    end;
    showmessage(inttostr(GetTickCount()-t));    
end;

 

相关阅读 >>

Delphi xe 中使用正则表达式

Delphi 精确打印image画布

Delphi 查看内存数据的函数

Delphi 在线程中运行窗体

Delphi 将整数转换为罗马数字（字符串）2

Delphi tchart使用经验小结

Delphi二值图像腐蚀算法

Delphi 字符串与日期格式互转

Delphi 用api函数抓取屏幕图像

Delphi ascii 码对照表

更多相关阅读请进入《Delphi》频道 >>

转载请注明出处：木庄网络博客 » Delphi-获取毫秒-计算代码运行的时间