Практическая работа №2. Практическая работа 2 Тема Проект диалог

• Название: Практическая работа 2 Тема Проект диалог
• Дата: 21.11.2022
• Размер: 16.51 Kb.
• Имя файла: Практическая работа №2.docx
• Тип: Практическая работа; #802460

Практическая работа №2

Тема: Проект ДИАЛОГ
Цель занятия: использование строки ввода Edit вкладки палитры компонентов Standard, обработка события OnKeyPress – нажатия клавиши.
Задача № 1.

Создать программу, выполняющую следующие действия:

После запуска программы пользователь вводит свое имя, например, Александр, в прямоугольник с мигающим текстовым курсором и нажимает клавишу Enter. Появляется вопрос: «Александр, ты любишь читать?». Если пользователь щелкает на кнопке «Да», то появляется реплика «Молодец!», если на кнопке

«Нет», то реплика «Почему же? Надо читать». Для выхода из программы необходимо щелкнуть мышью на кнопке «Выход».
Этапы разработки программы

1. Откройте новый проект.

2. Разместите на форме следующие экземпляры компонентов (Label1, Label2, Label3, Button1, Button2, Edit1, BitBtn1).

3. Сохраните код программы и проект под именами, например, Unit3.pas и Pr3.dpr.

4. Выполните следующие действия:

Выделенный объект	Вкладка окна Object Inspector	Имя свойства/ Имя события	Значение/Действие
Form1	Properties	Caption	Диалог
BitBtn1	Properties	Caption	&Выход
		Kind	bkClose
Label1	Properties	Caption	Введи свое имя и нажми Enter
Edit1	Properties	Caption	Удалить название объекта
	Events	OnKeyPress	If key=#13 then Label2.Caption:=Edit1.Text + ’, ты любишь читать? ’;
Button1	Properties	Caption	Да
	Events	OnClick	Label3.Caption:= ’Молодец! ’;
Button2	Properties	Caption	Нет
	Events	OnClick	Label3.Caption:= ’Почему же? Надо читать.’;
Label2	Properties	Caption	Удалить название объекта
Label3	Properties	Caption	Удалить название объекта

5. Сохраните проект окончательно, запустите и протестируйте его.
Задача № 2.

1. Сделайте кнопки «Да» и «Нет» доступными только после ввода имени и нажатия клавиши Enter.

2. Сделайте, чтобы строка ввода стала не доступной после нажатия кнопки «Да» или «Нет».

3. Введите дополнительную кнопку «Повторить», которая позволяет повторно выполнить задание.

4. Сделайте так, чтобы при повторении диалога строка ввода была бы снова активной.