我想用delphi timer 控件 记录 软件的运行时间！

Question

我想用delphi timer 控件 记录 软件的运行时间，请问应该如何写代码，请高人指教！

Answer 1

用GetTickCount,初始时,取一次时间,关闭时再取一次时间,然后做差,单位毫秒,自己换算

Answer 2

procedure TForm1.Timer1Timer(Sender: TObject);
begin
inc(i);
label1.Caption:='时间'+inttostr(i)+'秒';
end;procedure TForm1.Button1Click(Sender: TObject);
begin
timer1.Enabled:=true;
end;procedure TForm1.Button2Click(Sender: TObject);
begin
timer1.Enabled:=false;
end;
乱写了个。应该就是这个原理，开始停止。

Answer 3

timer里面随时更新：当前时间-启动时间