如何获取定时器中的剩余时间？

Question

可能的重复：
Delphi 计时器：下一个事件之前的时间

如何获取计时器执行时的当前剩余时间？

例如：

我创建了一个间隔为 60 000 的计时器

procedure TForm1.my_Timer(Sender: TObject);
begin
  // do something
end;

然后我创建另一个计时器（间隔1000），其原因是获取第一个计时器的剩余时间

procedure TForm1.second_Timer(Sender: TObject);
begin
  second_Timer.Interval := 1000;
  Label1.Caption := IntToStr(my_Timer.timeleft); // How ???
end;

谢谢。

Answer 1

您无法从计时器获取此信息。您能做的最好的事情就是记下计时器最后一次触发的时间并自己计算出来。例如，您可以使用TStopwatch来执行此操作。