Implementation
uses Unit1,Unit2,Unit3,Unit4;
{$R *.dfm}
End.
Настроим компонент Form5, для этого левой кнопкой мыши щелкнем на область пятой формы. В Инспекторе объектов отобразятся свойства компонента Form5. Для того чтобы форма при отображении раскрывалась на весь экран, свойству WindowState назначим значение wsMaximized. Изменим заголовок главной формы, назначив свойству Caption значение «Первое приложение».
Каждый компонент TButton, помещенный на форму, должен вызывать одну из четырех форм.
Выделим компонент Button1 одним щелчком левой кнопки мыши над этим компонентом. В Инспекторе объектов появятся свойства этого компонента. Изменим надпись кнопки Button1, назначив свойству Caption значение «Форма1». Будем вызывать первую форму по нажатию на кнопку Button1. Для этого создадим обработчик события OnClick компонента Button1 (событие происходит при «щелчке» мышью над компонентом). Выделим компонент Button1, в Инспекторе объектов выберем вкладку Events и в области значения свойства-события OnClick щелкнем дважды левой кнопкой мыши (Рис. 6).
Рис. 6. Окно инспектора объектов. Создание обработчика события OnClick компонента Button1
Delphi автоматически создаст обработчик события и курсор в окне кода будет находится в процедуре-обработчике (Рис. 7).
В процедуре-обработчике мы помещаем код вызова первой формы:
procedure TForm5.Button1Click(Sender: TObject);
Begin
Form1.ShowModal;
end;
Примечание. Метод формы ShowModal отображает форму на экране и не позволяет перейти пользователю к другой форме приложения, пока она не будет закрыта. Отображаемая таким образом форма называется модальной.
Таким образом, когда пользователь приложения нажмет на первую кнопку – произойдет событие OnClick. При возникновении события OnClick будет запущен (при наличии) обработчик этого события и выполнится код обработчика. В нашем случае произойдет вызов первой формы (Рис. 8).
Рис.7. Процедура-обработчик события OnClick компонента Button1
Рис. 8. Работающее приложение. Вызвана первая форма.
Следует запомнить!
1. процесс создания Delphi-программы разбивается на две фазы: фазу конструирования формы и фазу кодирования;
2. конструирование формы осуществляется с помощью выбора компонентов из палитры и размещения их на форме;
3. программист может перемещать любой размещенный на форме компонент и изменять его размеры с помощью мыши;
4. чтобы придать компоненту нужные свойства, используется страница Properties Инспектора объектов;
5. чтобы компонент мог откликаться на то или иное событие, программист должен создать обработчик события;
6. обработчик события оформляется в виде процедуры, имеющей составное имя: первая часть имени представляет собой имя класса для формы, вторая часть отделяется от первой точкой и может быть произвольной. Если Delphi автоматически формирует заготовку для обработчика, то вторая часть имени представляет собой объединение имени компонента и имени события без предлога On.
7. тело процедуры ограничено служебными словами begin... end и состоит из отдельных предложений (операторов) языка Object Pascal, которые отделяются друг от друга точкой с запятой;
8. свойства компонента могут изменяться как на этапе разработки приложения, так и во время работы приложения;
9. в Инспекторе объектов может отображаться лишь часть свойств и событий компонента. Полностью все (кроме частных, private) свойства компонента могут быть доступны при обращении к ним программно.
Общее задание
Добавить в рассмотренный нами проект код, организующий вызов остальных трех форм: Form2, Form3, Form4. Вызов должен происходить при нажатии на соответствующую кнопку: Button2, Button3, Button4. Каждая кнопка должна иметь надпись согласно вызываемой форме: «Форма2», «Форма3», «Форма4».
Лабораторная работа № 2
«Компоненты для отображения и редактирования текста Label, Edit, Memo»
Используя стандартные компоненты для отображения и редактирования текста (Label, Edit, Memo), создайте приложение, позволяющее организовать решение данной в варианте задачи. При решении задачи необходимо обрабатывать числовые данные. Перевод числа в строку для обработки, в целях решения задачи, недопустим!
Дата добавления: 2015-09-18 | Просмотры: 551 | Нарушение авторских прав
1 | 2 | 3 | 4 | 5 | 6 | 7 | 8 | 9 | 10 | 11 | 12 | 13 | 14 | 15 | 16 | 17 | 18 | 19 | 20 | 21 | 22 | 23 | 24 | 25 | 26 | 27 | 28 | 29 | 30 | 31 | 32 | 33 | 34 | 35 | 36 | 37 | 38 | 39 | 40 | 41 | 42 | 43 | 44 | 45 | 46 | 47 | 48 | 49 | 50 |
|