mORMot2 精密计时器 TPrecisionTimer
一句话,TPrecisionTimer 等同于Delph定义在Diagnostics单元的里面的秒表 TStopwatch 。
mORMot 2 的实现是Record,定义在mormot.core.perf单元。使用方式类似!
整个单元的定位是
-性能计数器
-TSynMonitor进程信息类
-TSynMonitorUsage进程信息数据库存储
-操作系统监控
-DMI/SMBIOS二进制解码器
-用于FPU标志保存的TSynFpuException包装器
var
EquipRec: TModbusEquip;
begin
FTimer.Start;
EquipRec := TModbusEquip.Create;
try
EquipRec.IP := '124.0.0.1';
EquipRec.Name := 'testName5';
EquipRec.Port := 124;
FEquipResourceDB.Resource.Add(EquipRec, True);
finally
EquipRec.Free;
end;
Memo1.Append(Format('TModbusEquip.Create1 Total time: %s', [FTimer.Stop]));
end
可以看到,FTimer.Stop 是停止计时,并给出持续时间的时间字符串。
mORMot 1.18 的实现是Class,定义在SynCommons单元。使用方式类似!