Події та їх обробники Урок інформатики в 11 класі за підручником Й.Я.Ривкінд Курило Світлана Володимирівна вчитель Балясненської ЗОШ І – ІІІ ступенів Диканської районної ради Полтавської області

Щоб за вибору кнопки відбулася якась подія, програмі потрібно про це повідомити Елемент керування – Кнопка – використовується для виконання певних операцій.

У вікні Object Inspector на вкладці Events можна вказати, яка подія повинна відбутися при виборі кнопки. OnClik – вказана подія виконуватиметься при натисканні на кнопку. OnMouseMove – вказана подія виконуватиметься при наведенні вказівника на кнопку. OnKeyPress – вказана подія виконуватиметься після натиснення клавіші клавіатури. OnStartDrag – вказана подія виконуватиметься після початку перетягування обєкта.

Вибираємо процедуру, команди якої будуть виконуватися після вибору кнопки, та двічі клацаємо в полі справа від напису процедури. Відкривається вкладка Code. Структура процедури – обробника події OnClick. Рядок заголовка Запис команди процедури, які будуть виконуватися при настанні події OnClick. Команди процедури утворюють тіло процедури. Кожен прописаний рядок повинен закінчуватися крапкою з комою (;).

Приклад 1. Потрібно змінити колір форми на червоний при натисканні на кнопку. Відкриваємо програму Delphi, ставимо на Form1 елемент керування кнопку (Button1). Вибираємо для кнопки подію OnClick ( зміна кольору форми відбудеться при натисканні на кнопку). Двічі натискаємо на полі праворуч від назви події, переходимо на вкладку Code. procedure TForm1.Button1Click(Sender: TObject); begin Form1.Color:= clRed; end; end. Натискаємо кнопку Run панелі інструментів. Натискаємо на кнопку на формі.

Приклад 2. Процедура OnClick змінює: 1)колір вікна на зелений, 2)змінює текст заголовку на Ваше прізвище, 3)зменшує ширину вікна на 200 пікселів, 4)змінює положення кнопки і 5)текст на кнопці. procedure TForm1.Button1Click(Sender: TObject); begin Form1.Color:= clGreen; Form1.Caption:= 'Курило Світлана Володимирівна'; Form1.Width:=Form1.Width-200; Button1.Left:=45; Button1.Top:=200; Button1.Caption:= 'Чи запамятали матеріал уроку?' end; end.

Домашнє завдання Розділ 2 Пункт 2.5 ( ст.51-56) – прочитати; Виконати 5 (ст. 61).