Добавил:
Опубликованный материал нарушает ваши авторские права? Сообщите нам.
Вуз: Предмет: Файл:

ЛАБА_Таймер. Календарь. Показ дополнительных форм

.doc
Скачиваний:
7
Добавлен:
01.04.2016
Размер:
29.7 Кб
Скачать

Лабораторная работа № 30

Таймер. Календарь. Показ дополнительных форм

  1. Приложение Delphi может постоянно контролировать время работы с помощью невизуального компонента TTimer (закладка System). Таймер позволяет выполнять определенную процедуру через заданные промежутки времени. Свойства таймера:

Enabled: boolean - включение/выключение таймера. Если свойство = true, то таймер работает и обрабатывает событие OnTimer;

Interval: Cardinal - интервал в миллисекундах между последовательными возникновениеми события OnTimer, по умолчанию – 1000мс (1 с).

Таймер имеет единственное событие OnTimer, возникающее периодически с интервалом Interval. В обработчике этого события можно выполнить определенные действия.

  1. Компонент TMonthCalendar позволяет выбрать нужную дату с помощью мыши.

Свойства компонента:

CalColors -настройка цветов;

MaxDate – максимальная дата, до которой можно прокрутить календарь;

MinDate – минимальная дата, от которой можно прокрутить календарь.

  1. В приложении можно одновременно отображать несколько форм. Новая форма располагается в отдельном модуле и добавляется командой меню File-New Form. При этом создается автоматически модуль описания формы и в основную программу добавляется необходимый код (см Project-View Source). При запуске программы на экране отображается форма, созданная первой. Для показа других форм необходимо вызвать метод Show – для немодального режима или ShowModalдля модального режима. Для закрытия формы используется метод Close.

Задание

Напишите программу «Электронные часы». Программа должна в главной форме выводить текущее время. Форма должна содержать кнопки «Календарь» и «Секундомер». По нажатию кнопки «Календарь» должна показываться форма с выбором даты. По нажатию кнопки «Cекундомер» должна показываться форма с секундомером. Секундомер должен обеспечивать старт отсчета секунд, остановку и обнуление.

2