ІНСТРУКТИВНА КАРТКА ДО ПРАКТИЧНОЇ РОБОТИ на тему "Елементи для введення даних: текстове поле, прапорець, випадаючий список."

ІНСТРУКТИВНА КАРТКА

Тема: Елементи для введення даних: текстове поле, прапорець, випадаючий список.

Задача «Подорож містами»

  Створити в програмі Lazarus проєкт, в якому за допомогою компонента CheckBox відображатиметься зображення денного і нічного міста Києва та Кропивницького.

Хід роботи

І. Розміщення елементів керування на формі

Створіть новий проєкт. Помістіть на форму дві кнопку Button, компонент CheckBox і чотири картинки Image. Змініть значення властивостей Caption згідно з рисунком.

II. Написання процедур обробки подій

Створіть процедуру обробки події ОnСlіск для кнопки Button1 та Button2.

Виконання процедури має показувати нічне та денне зображення, в залежності відмітки прапорця CheckBox. Орієнтовний програмний код:

procedure TForm1.Button1Click(Sender: TObject);

begin

  Image1.Visible:=True;

Image2.Visible:=False;

Image3.Visible:=False;

Image4.Visible:=False;

   If CheckBox1.Checked then

  Image3.Visible:=True;

end;

procedure TForm1.Button2Click(Sender: TObject);

begin

  Image2.Visible:=True;

Image1.Visible:=False;

Image3.Visible:=False;

Image4.Visible:=False;

   If CheckBox1.Checked then

  Image4.Visible:=True;

end;             

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

ІІІ. Додаткове завдання

(*) За допомогою кнопки Button додайте в дану програму ще два будь яких міста в денному та нічному вигляді.