Компонент Delphi Timer

Компонент Delphi Timer расположен на странице System Палитры Инструментов. Это важный не визуальный компонент,  который позволяет  задавать в приложении  необходимые задержки времени между выполнением тех или иных действий.

Данный компонент имеет два главный свойства:

  • Enabled - включает (TRUE) или выключает (FALSE) работу таймера,
  • Interval - задает фиксированный интервал времени в миллисекундах.

Событие, которое может обработано данным компонентом одно, это onTimer. Его можно задать во вкладке Events Инспектора объектов или двойным щелчком на компоненте. Это событие генерируется всякий раз, когда истекает промежуток времени заданный в свойстве Interval с момента последней генерации данного события, пока свойство Enabled будет равно TRUE.

Компонент Delphi Timer не достаточно точный для малых промежутков времени (менее 100 миллисекунд).

Давайте разберем два примера:

1. Установим событие onTimer:

procedure TForm1.Timer1Timer(Sender: TObject);
begin
    Timer1.Enabled := False;
    ShowMessage('Программа уже загружена');
end;

Через время заданное в свойстве Interval появиться однократное сообщение о загрузке программы.

2. Расположим на форме в дополнение к компоненту Timer компонент Label. Обработчик события onTimer:

procedure TForm1.Timer1Timer(Sender: TObject);
begin
  Label1.Caption := TimeToStr(now);
end;

Мы создали электронные часы. Now - это функция возвращающая дату и время на данный момент. TimeToStr - забирает время и переводит его в строковую переменную.

Итог: мы изучили компонент Timer и его применение в приложении.

Понравилась статья? Раскажите друзьям:
Общайтесь со мной

Оставить комментарий

Ваш email не будет опубликован. Обязательные поля отмечены *

Вы можете использовать это HTMLтеги и атрибуты: <a href="" title=""> <abbr title=""> <acronym title=""> <b> <blockquote cite=""> <cite> <code> <del datetime=""> <em> <i> <q cite=""> <strike> <strong>