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

本文整理自网络，侵删。

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

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

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

 

相关阅读 >>

Delphi 获取所有磁盘分区另类方法

crc32.pas 第二版

Delphi使用cef4Delphi制作chromium谷歌内核浏览器

Delphi实现文件防删除

Delphi 从twebbrowser webbrowser得到全部html源码

Delphi xe5 手机应用开发经验技巧

Delphi winsock downloader

cvcode.pas

Delphi 安卓app自动升级

Delphi动态创建30个按钮，每行6个共5行，顺序排列

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

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