Delphi 时间耗时统计

处理事情：

        数据处理过程中，速度很慢，无法准确定位分析是DB问题还是客户端处理问题，所以增加计时统计日志；

       Delphi计时首次使用，查阅资料，予以记录：

var
　BgPoint, EdPoind: int64;
　OffSet: int64;
begin
  BgPoint := GetTickCount;
  //>> 逻辑处理语句。。。。。。
　EdPoind := GetTickCount;
  OffSet := EdPoind - BgPoint; //耗时(ms)
end;
//>>注：GetTickCount函数返回从操作系统启动所经过的毫秒数，它的返回值是DWORD。