Timer в delphi

Компонент Timer в Delphi задає в додатку інтервали часу. У Таймера є численні застосування: синхронізація мультипликаций, закриття вікон, з якими користувач якийсь час не працює, установлювати заставки або закриття сполучних ланок з віддаленим сервером при відсутностей операцій користувача, регулярне тестування джерел інформації, установки часу на відгук в навчальних програмах - всі ці завдання, в які вимагають поставити інтервали часу, використовуються за допомогою таймера.

У Timer в Delphi є два керуючих властивості: Interval - значення часу в мілісекундах і Enabled - досяжність. Через встановлений інтервал часу, таймер спрацьовує подією OnTimer. Всі задані операції записуються в обробнику цієї події.

При завданні інтервалу (Interval) рівного нулю або Enabled = false таймер стає неактивним. Для того, щоб запустити Timer слід встановити Enabled = true, за умови, що Interval - позитивне число. Або ж встановити позитивне значення Interval і значення Enabled = false.

Наприклад, якщо потрібно, щоб через 10 секунд після запуску програми закрилася заставка, яка відображає логотип програми, то на заставці потрібно розмістити таймер і встановити Interval = 10000, а в подію встановити OnTimer = Close.

Якщо потрібно в якийсь процедурі привести в дію таймер, який відрахував б встановлений інтервал, наприклад 10 секунд, після чого потрібно виконати деякі операції і вимкнути таймер, це реалізується: при проектуванні встановлюємо Enabled = true і інтервал задається 0. Для запуску Timer потрібно виконати оператор Timer1.Inerval: = 10000; через 10 секунд в подію OnTimer задати Nimer1.Interval: = 0;

Timer в Delphi точно витримує встановлені інтервали, навіть якщо вони великі - тисячі міллісікунд.

Enabled - property Enabled: Boolean;

Interval - property Interval: Cardinal;

подія:
OoTimer - подія відбувається, коли закінчився черговий відрізок часу Interval.

Схожі статті