Завдання

1. Запустіть середовище програмування (ПускàВсе программыàBorland Delphi 7àDelphi 7)

2. Розмістіть на формі компоненти Button, Label, Edit (див. малюнок)

3. У кожного компонента мається властивість Name (ім’я компонента). Знайдіть її в Інспекторі об’єктів для кожного об’єкта та заповніть таблицю:

4. Якщо ми запустимо програму і клюкнемо мишею по кнопці, то відбудеться подія – щиглик миші на кнопці. Delphi дозволяє обробляти події, тобто програмувати те, що буде робитися при виникненні події. Для цього треба вносити зміни в код програми, тобто дописувати програму, яку Delphi написала замість нас.

Приклад. Припустимо, ми хочемо, щоб коли ми клюкнули по кнопці, заголовок форми змінився на «ага, воно робе».

Розв’язання. Форма має ім’я Form1, у форми є властивість Caption, яка задає її заголовок. Отже, об’єкт Form1 має властивість Caption. Коли ми будемо писати програму, будемо позначати властивість Caption об’єкта Form1 так: Form1.Caption(між Form1 і Caption ставиться точка).

Для програмування події виконайте наступне.

1) Виділіть кнопку (Button).

2) Перейдіть в Інспекторі об’єктів на вкладку Events (Події).

Знайдіть подію OnClick (при кліці). Подія OnClick кнопки Button1 виникає тоді, коли користувач клюкне по ній. Клацніть двічі мишею по порожньому текстовому полі напроти властивості (див. мал.)

3)

procedure TForm1.Button1Click(Sender: TObject);

Begin

end;

Напишіть між словами begin та end:

Form1.Caption := 'а воно робе!' ;

	Властивість Caption об’єкта Form1		Знак присвоювання (встановлення)

Запустіть програму. Клюкніть мишею на кнопці. Що відбувається? ____________________________
_____________________________________________________________________________________

5. Додайте після рядка, що ви написали у попередньому завданні, рядок

Form1.Color:=clYellow;
(замість clYellow можна написати clBlue, clCyan, clRed, clMagenta і т.д.)

Запустіть програму. Клюкніть мишею на кнопці. Що відбувається? ____________________________
_____________________________________________________________________________________

6. Додайте туди ж іще один рядок:

Button1.Caption:=’OK’;

Запустіть програму. Клюкніть мишею на кнопці. Що відбувається? ____________________________
_____________________________________________________________________________________

7. В Інспекторі об’єктів знайдіть властивість Text об’єкта Edit1 та встановіть його порожнім.

Знайдіть властивість Caption об'єкта Label1 і встановіть його «Гарна програмка».

Додайте в процедуру наступний рядок:

Edit1.Text:=Label1.Caption;

Запустіть програму. Клюкніть мишею на кнопці. Що відбувається? ____________________________
_____________________________________________________________________________________

8. Завдання для самостійної роботи.

Створіть на формі ще одну кнопку, підпишіть її «Встановити заголовок» і зробіть так, щоб при кліці по цій кнопці заголовок форми (Form1.Caption) ставав таким же, як напис у текстовому полі (Edit1.Text).

Напишіть команду, яку ви вписали в процедуру обробки події:

_____________________________________________________________________________________

9. Знайдіть для мітки Label1 подію OnMouseMove (виникає, коли курсор миші рухається над об’єктом) на вкладці Events Інспектора об’єктів.

Створіть процедуру її обробки подвійним щигликом миші.

Напишіть у цій процедурі команду Label1.Font.Color:=clBlue;

Знайдіть для мітки Label1 подію OnMouseLeave (виникає, коли курсор миші залишає об’єкт) на вкладці Events Інспектора об’єктів.

Створіть процедуру її обробки подвійним щигликом миші.

Напишіть у цій процедурі команду Label1.Font.Color:=clBlack;

Що відбувається, коли миша проходить над об’єктом Label1? ________________________________

Що відбувається, коли миша залишає об’єкт Label1? ________________________________________

10. У папці Delphi Projects створіть папку «Змінення властивостей об’єктів» і збережіть там проект.

Контрольні запитання

1. Коли виникає подія OnClick? _________________________________________________________

2. Коли виникає подія OnMouseMove? __________________________________________________

3. Коли виникає подія OnMouseLeave? __________________________________________________

4. На якій вкладці Інспектора об’єктів можна створювати процедури обробки подій? ___________

5. Як позначається в програмі заголовок форми? _____Form1.Caption_____
Напис на кнопці? ________________________ Колір форми? ____________________________
Текст у текстовому полі? __________________ Напис на мітці? __________________________
Колір напису на мітці? ____________________ Колір текстового поля? ____________________