Как сделать и автоматический сброс таймера в Delphi 7?

Question

Может кто-нибудь сказать мне, как сделать сброс таймера по истечении заданного времени? Как будто я пытаюсь сделать часы, и я хотел бы, чтобы они сбрасывались и начинались заново (например, через 60 минут и начинались заново с 0).

Answer 1

Попросите ваше событие OnTimer обновить свойство таймера Tag или отдельную переменную, указав, сколько времени прошло, а затем сбросьте таймер, когда это значение достигнет вашего порога.

Или вы можете просто запустить отдельный таймер, который срабатывает один раз после истечения желаемого интервала, а затем сбросить оба таймера вместе.