delphi计算两个时间差别

来源：二三四教育网

引入 DateUtils

starttime:=now();
stoptime := Now();
r1 := MilliSecondsBetween(stoptime, starttime); //取得计时时间，单位毫秒(ms)
StatusBar1.Panels.Items[2].Text := '本次查询耗时：' + inttostr(r1) + '毫秒';

违法及侵权请联系：TEL:199 1889 7713 E-MAIL:2724546146@qq.com

本站由北京市万商天勤律师事务所王兴未律师提供法律服务