Принципы визуального программирования. Семенов Н.М. - 21 стр.

UptoLike

Составители:

Рубрика:

3. Установите свойство Caption кнопки в ОК.

Рис.11. Вторичная форма программы FrmDlg1.

4. Установите свойство Name кнопки в OKBtn.

5. Нарисуйте метку (Label) в середине формы.

6. Установите свойство Caption метки в Good Bye !

7. Установите свойство Name метки в ByeLbl.

8. Дважды нажмите на вложенное свойство Font.

9. Установите свойство Size в 24.

10. Выберите вторичную форму, нажав на неё.

11. Установите свойство Caption формы в Modal Dialog Form.

12. Установите свойство Color в clYellow, чтобы выбрать жёлтый цвет.

13. Установите свойство BorderStyle в bsDialog.

14. Сохраните модуль для вторичной формы в файле UFORM12.PAS.

15. Сохраните проект в файле FRMDLG1.DPR.

5.2.3 Добавление методов обработки события

Теперь надо добавить методы обработки события управления кнопками на

основной и вторичной формах. Каждая кнопка должна обрабатывать события нажатия

мыши. Для каждой формы сначала выберите эту форму, затем - кнопку. Далее,

нажмите на страницу События в Инспекторе объекта и нажмите на значение события

OnClick. Листинг 3 показывает исходный текст для модуля UFORM11.PAS.

Выделенные строки показывают введённый вручную текст. Обратите внимание на

оператор uses, который включает имя модуля Uform12. Это объявление необходимо,

чтобы разрешить основной форме выдать вторичную форму, обратившись к

переменной Form2. Эта переменная, которая экспортируется модулем Uform12,

является образцом класса TForm2 и поддерживает вторичную форму. Листинг 4

показывает исходный текст модуля UFORM12.PAS. Выделенная строка 29 содержит

оператор, который Вам нужно ввести для метода TForm2.OKBtnClick.

Листинг 3. Исходный текст для модуля UFORM11.PAS.

______________________________________________________________________

1: unit Uform11;

3: interface