Компонент T Timer

Работа с датой и временем.

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

Свойства:

Enabled: boolean (true/ false)(включен таймер или нет).

Interval: long int, (для задания промежутков времени(в миллисекундах)).

Если интервал равен 0, то событие не генерируется.

Методы:

Create На данном уровне ознакомления с Delphi эти методы будут автоматически выполняться «владельцем» таймера (формой).

Free

Событие: On Timer.

Пример:

Form 1

Label Label

Таймер находится на странице System.

Interval: 100

Enabled: true

При создании формы необходимо описать некоторую переменную.

Private

Var

SecCount: longInt

Var

Sec:real

4.15.1.1. Процедура обработки события:

Procedure

SecCount:= SecCount + 1;

Sec:= SecCount/10

Str(sec: 10: 1, s);

LbSec. Caption:=s;

LbTime. Capton:=Time to str(Time).

Переменную SecCount необходимо инициализировать, и лучше всего это сделать в обработчике события On Create для формы.