delphi 另类计算程序代码运行耗时

本文整理自网络，侵删。

 

var
  d: TDateTime;
begin
 d:= Now();
//--------------------
代码
//---------------------
 StatusBar1.Panels[0].Text:='耗时：'+ FormatDateTime('hh:nn:ss.zzz', (Now-d));


 

相关阅读 >>

Delphi搜索文件夹和文件

Delphi mscomm 实时串口通讯

Delphi datasnap http用法注意事项

Delphi 日期相关总结20190702完结篇

Delphi 18位身份证号码的校验

Delphi memo 过滤重复字符 indexof

Delphi 用ado从文本文件中导入数据库的两种方法比较

Delphi实现解析百度搜索结果link？url=

Delphi中读取硬盘的物理序列号

Delphi 从数组中任取一个

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

转载请注明出处：木庄网络博客 » delphi 另类计算程序代码运行耗时