Работа со строкой статуса

Работа с объектом Timer

При работе с объектом Timer используются свойство Interval и метод Timer. Объект является реле времени и на экране во время исполнения программы никогда не виден. Отсчет выдержки начинается немедленно, после установки свойства Interval:

Имя_таймера.Interval=<выдержка в миллисекундах>

По окончании выдержки вызывается обработчик событий имя_таймера_Timer.

Private sub CMP_Click() Rele.Interval=10000 End sub Private sub Rele_Timer TB.Text="Финиш" End sub Рис. 4.28. Программа для работы с объектом Timer Например, на форме имеется кнопка "Пуск" с именем CMP, таймер с именем Rele и объект TextBox с именем TB. Необходимо через 10 секунд после нажатия кнопки вывести в текстовое окно слово "Финиш". Текст соответствующей программы приведен на рис. 4.28.

Строка статуса, как указано в главе 2, поставляется как дополнительный компонент библиотеки Microsoft Common Control 5.0 (SP2) и имеет параметр "Style", который определяет вид строки статуса с одной панелью или с несколькими (рис. 4.29).

а) б)
Рис. 4.29. Вид строки статуса при Style=0 (а) и при Style=1 (б)

Строка с одной панелью (Style=1) может быть применена для вывода одного сообщения, строка с многими панелями – для вывода многих сообщений, в том числе даты, времени, состояния клавишей Insert, CAPS, NumLock, которые могут сопровождаться иконками. Выводимые сообщения могут быть заданы как свойства Text панелей строки статуса (Style=0) или свойство SimpleText при Style=1. Проще всего создать в специальном модуле массив подсказок и менять подсказки щелчком по панели (рис. 4.29,а) или по специальной кнопке (рис. 4.29,б) или в ином обработчике событий.