【更新说明】
1、新增的 CalcPerf 函数可以用来统计一个函数的执行时间,只需要在函数的开始位置调用它就可以了。您需要为它指定一个字符串标签(Tag),以便在日志中区分不同的函数调用。示例代码如下:
procedure TForm2.Button2Click(Sender: TObject); begin CalcPerf('Button2Click'); Sleep(1000); end;
实际输出日志内容如下:
[16:30:46.689][5112][DEBUG]:[Button2Click] 开始执行
[16:30:47.691][5112][DEBUG]:[Button2Click] 执行完成,用时 1000 ms
可以看到,达到了我们统计性能的目的。
要自定义输出日志内容的格式,请修改 PerfTagStartFormat 和 PerfTagStopFormat 两个全局变量的值。
2、修正了特定场景下日志输出时,时间戳信息丢失的问题。
【更新级别】
可选
【特别感谢】
青春