Лабораторна робота №3 Робота з формою та компонентами Panel, Label, Edit, Button.

Мета:Сформувати початкові навички роботи в се­редовищі Delphi.

Порядок виконання роботи

Відкрийте свій проект. Для виконання практичної роботи вам знадобляться дві форми: Form1 і Form2. Форма Form1 вже створена середовищем Delphi. Створіть ще одну нову форму Form2.

Робота з формою Form1

Цю форму будемо використовувати для розміщення змісту всіх виконаних вами протягом навчального року проектів (рис. 1).

1. Введіть як заголовок форми Form1 своє прізвище (властивість Caption).

2. Створіть на формі компонент Panel. Встановіть його розмір за розміром форми. Для цього розгорніть форму на весь екран.

3. Видаліть заголовок панелі (властивість Caption).

4. Для оформлення панелі встановіть для властивості BeveBnner (внутрішня фаска) значення bvLowered, для властивості BevelOuter (зовнішня фаска) — значення bvRaised, для властивості BevelWight (ширина фаски) — значення 3. Можете вибрати інші значення на власний розсуд.

Рис.1

5. На підготовленій таким чином панелі розмістіть компонент Label і в його властивості Caption задайте надпис Зміст.

6. Прослідкуйте, щоб значенням властивості Auto-Size було True (автоматичне настроювання розміру компонента Label під розмір тексту).

7. За допомогою властивості Font підберіть для надпису відповідний шрифт, розмір шрифту, накре­слення, колір.

8. Створіть на панелі 2 кнопки Button1і Button2. Надалі ми будемо додавати на цю панель інші кнопки.

9. Використовуючи властивість Caption, розмістіть на кнопці Button1 надпис Практична робота №1, а на кнопці Button2 — надпис Вихід.

10. Кнопку Button1будемо використовувати для переходу до форми Form2. Для цього двічі клацнемо на кнопці Button1. Водночас автоматично здійснюється перехід у вікно редактора тексту програми. У місці, де стоїть курсор (між службовими словами Begin і End), надрукуйте команду: Form2.Show; (Показати форму).

11. Натисніть клавішу F12, щоб повернутися до форми Form1.

12. Кнопку Button2 (Вихід) будемо використовувати для закриття проекту. Двічі клацніть мишею на цій кнопці й у вікні тексту програми в зазначено­му курсором місці надрукуйте команду Close;.

13. Відкомпілюйте проект (команда меню Project/ Compile Project).

14. Запустіть проект командою меню Run/Run і перевірте дію кнопок.

Робота з формою Form2. Зміна заголовка форми програмним шляхом

1. За допомогою властивості Caption задайте новий заголовок форми Form2 — Практична робота №1 (рис. 2).

2. Створіть на формі компонент Panel. Встановіть його розмір за розміром форми.

3. Видаліть заголовок панелі (властивість Caption).

4. Для оформлення панелі встановіть для властивості BeveBnner (внутрішня фаска) значення bvLowered, для властивості BevelOuter (зовнішня фаска) — значення bvRaised, для властивості BevelWight (ширина фаски) — значення 3. Можете вибрати інші значення на ваш розсуд.

5. На підготовленій таким чином панелі розмістіть компонента Label (надпис), 1 компонент Edit і компонента Button.

6. У властивості Caption задайте такі надписи компонентам Label:

Label1 — Зміна заголовка форми програмним шляхом;

Label2 — Введіть новий заголовок.

7. За допомогою властивості Font підберіть для надписів відповідний шрифт, розмір шрифту, накре­слення, колір.

8. Для компоненти Edit1 видаліть текст (власти­вість Text).

9. На кнопці Button1 зробіть надпис Змінити за­головок форми, на кнопці Button2 — Зміст, на кно­пці Button3 — Вихід (властивість Caption).

10. За допомогою властивості Font підберіть для надписів відповідний шрифт, розмір шрифту, накреслення, колір.

Рис. 2

11. Двічі клацніть мишею на відповідній кнопці, увійдіть у вікно редактора тексту програми і введіть такі команди: для кнопки Buttonl — Form2.Caption:=Edit1.Text, для кнопки Button2 — Form1.Show, для кнопки Button3 — Form1.Close.

12. Відкомпілюйте проект.

13. Запустіть проект на виконання і перевірте його роботу.

14. Збережіть проект командою File/Save All.

Компонента	Властивість	Значення властивості	Програмний код
Form1	WindowState	wsMaximized
	Caption	Прізвище та ім'я учня
Panel	Bevellnner	bvLowered
	BevelOuter	bvRalsed
	BevelWIght	3
Label	AutoSIze	True
	Caption	Зміст
	Font	На розсуд учня
Bottonl	Caption	Практична робота №	Form2.Show;
Botton2	Caption	Вихід	Close;
Form2	Caption	Практична робота №
	WindowState	waNormal
Panel	Bevellnner	bvLowered
	BevelOuter	bvRalsed
	BevelWIght	3
LabeH	Caption	Зміна заголовка форми програмним шляхом
	Font	На розсуд учня
Label2	Caption	Введіть новий заголовок
	Font	На розсуд учня
Edltl	Text	Видаліть текст Editl
Bottom	Caption	Змініть заголовок форми	Form2. Caption :=Edlt1. Text;
	Font	На розсуд учня
Botton2	Caption	Зміст	Form I.Show;
	Font	На розсуд учня
ВоПопЗ	Caption	Вихід	Form 1. Close;
	Font	На розсуд учня