ВУЗ:
Составители:
Рубрика:
30
представляет форму диалогового окна). Это ООР - сообщение заставляет форму
вызывать унаследованный метод ShowModal, который отображает форму как
модальное диалоговое окно. ООР - сообщение расположено в операторе if, который
сравнивает результат сообщения с предопределённой константой mrOK. Это сравнение
определяет, нажал ли пользователь кнопку ОК. Если это условие выполнено,
выполнение программы продолжается в 31 строке. Эта строка содержит оператор Close,
который закрывает основную форму.
Листинг 8 содержит два метода обработки события. Метод
TOKBottomDlg.OKBtnClick назначает заданную константу mrOK свойству ModalResult
(строка 31). Это свойство передаёт своё значение методу ShowModal. Обратите
внимание, что метод обработки данного события не имеет никакого оператора
закрытия диалогового окна. Метод TOKBottomDlg.CancelBtnClick присваивает
предопределённую константу mrCancel свойству ModalResult (строка 36).
6 Контрольные вопросы
1. Что можно делать с группой выбранных компонентов ?
2. Всегда ли нужно использовать данные, переданные параметрами
обрабатывающего событие метода ?
3. Чем отличается модальное диалоговое окно от немодального ?
4. Что такое вторичная форма ?
5. Верно ли, что Delphi создаёт класс формы (чьё имя по умолчанию
TForm1) как потомок класса TForm ?
7 Дополнительное задание
1. Создайте программу dlg2, которая является версией dlg1 и поддерживает
немодальное диалоговое окно. Выполните следующие шаги:
а) сохраните файл UDLG11.PAS как UDLG21.PAS,
б) сохраните файл UDLG12.PAS как UDLG22.PAS,
в) сохраните файл проекта как DLG2.DPR,
г) добавьте кнопку ShowForm к основной форме,
д) отредактируйте обрабатывающие событие методы для кнопки на обеих
формах.
8 Литература
1.Возневич Э. Delphi. Освой самостоятельно. - М.: Восточная Книжная
Компания, 1996. - 736 с.
2. Рубенкинг Н. Программирование в Delphi для “чайников”. -К.:
Диалектика, 1996. - 304 с.
3. Фаронов В. Delphi 6: учебный курс. – СПб.: Питер, 2002. – 512 с.
