请问DELPHI中有没有专门计算时间差的函数？

Question

要计算向串口发送一个命令，到串口接收到该指令的时间。

Answer 1

var 
time1,time2,time3:TDatetime;h,m,s:integer;begintime3:=time1-time2;decodetime(time3,h,m,s);result:=h*3600+m*60+s;end;
 

Answer 2

>>要计算向串口发送一个命令，到串口接收到该指令的时间。
你如何知道, 取得串口收到指令的時間呢??一般用 GetTickCount  來取 计算时间差;
就是如下: oldTime := GetTickCount;
 ....doing your thing;
 ... TotalUseTime := GetTickCount = oldTime;

Answer 3

我也觉得不要用TTIMER用GetTickCount
精确些

Answer 4

>>你如何知道, 取得串口收到指令的時間呢??
读串口数据，如果返回“O"则表示收到指令。>>直接相减就行
不精确，计算不到毫秒级