delphi怎么计算程序运行时间？

Question

即使是Console Application，也应该可以使用　GetTickCount函数的...试试...理论上 :-)

Answer 1

楼上说的是啊，程序开始时用GetTickCount取得当前系统运行时间，结束时再取一次，其差就是程序运行时间了吧……

Answer 2

需要获得更多详细信息，请查看Delphi Online Help
(这类问题我一概不答，别说我清高，我是想培养你们查看Help的习惯，不好意思，言重了)

Answer 3

需要获得更多详细信息，请查看Delphi Online Help
(这类问题我一概不答，别说我清高，我是想培养你们查看Help的习惯，不好意思，言重了)

Answer 4

var
  StartTime,EndTime: integer;
begin
  StartTime:=GetTickCount;
  ...
  EndTime:=GetTickCount;
  showmessage('总共花了'+floattostr((EndTime-StartTime)/1000.0)+'秒');
end;

Answer 5

GetTickCount最多有40天的时间，而后重新计时。