Тема 4 . Об’єкти програм із графічним інтерфейсом.  Створення проекту в середовищі Lazarus
         ( облако mega)

Які об’єкти можуть «реагувати» на події?

Приклад    Об’єкти: форма, напис, командна кнопка. Вікно повідомлень showmessage.

1. Створіть програму в середовищі Lazarus. , за допомогою якої в поле елементу  Напис (Label1) буде виводитися цитата академіка В.М. Глушкова:
                  "Людина, яка у ХХІ століття не вмітиме користуватися комп’ютером, буде подібна до людини ХХ століття, що не вміє ні писати, ні читати."

2. Встановіть коментарі для команд програмного коду

Увага! Під час роботи з комп’ютером дотримуйтеся правил безпеки та санітарно-гігієнічних норм.

Хід роботи

1. Завантажте Lazarus. Створіть новий проект.Для цього:

Виконати команду Проект => Створити проект ...  У діалоговому вікні вибрати слово Додаток і натиснути кнопку ОК

2. Зберегти створений проект. Для цього:

• Виконати команду Проект - Зберегти проект як ... Відкриється вікно Зберегти проект.
• Не виходячи з цього діалогового вікна створити нову папку   для файлів вашого проекту (проект буде містити кілька файлів), відкрити її і клацнути по кнопці Зберегти.

Тим самим ми збережемо файл Project1, що містить відомості про проект.

• Відразу ж відкриється вікно Зберегти Unit1 для збереження програмного коду проекту (файл Unit1.pas), в якому також необхідно клацнути по кнопці Зберегти.

Крім цих двох файлів в папці проекту створюється автоматично ще кілька файлів, в тому числі - unit.lfm, який представляє собою файл з повними даними про проектувальника форми. Позиція, розмір, розташовані компоненти та ін.

Папка проекту повинна містити наступні файли:

3.    Створюємо інтерфейс проекту.
                      1.    В вікні  Інспектор об’єктів,  на вкладці Властивості задайте  значення таким властивостям форми:

Caption – В.М.Глушков Color - clGreen (color - колір, Green - зелений)  Height - 169 Width - 348  Left - 417 Top - 167

Підсумок 

Не забувайте зберігати  проект після кожної зміни при створені проекту.

          2. Розмістіть на формі компоненти  :

• кнопку (Button - командна кнопка - елемент управління, призначений для запуску якихось дій –команд).

 Властивості Caption задайте значення «Цитата»      

• напис (компонент Label - поле виведення інформації)

3. Задаємо значення  властивостям компонента Напис:

 Продовжуємо змінювати значення властивостей:

4.    Виконати компіляцію проекту. 
5.    Переконатися, що в проекті немає помилок – повідомлення про це висвітиться в вікні Повідомлень.

6. Зберегти проект.

7. Запустити на виконання.

Створюємо програмний код проекту.

Створюючи проект ми плануємо наступне:

• при запуску проекту в вікні компонент Напис повинен бути  невидимим;
• при виборі кнопки «Цитата» компонент Напис стає видимим;
• при закритті проекту повинне з’явитися вікно повідомлення про завершення проекту.

I.    Для реалізації першого завдання виберемо подію OnCreate  -   відкриття форми (вікна) на початку виконання проекту.

1.    Відкриваємо проект.
2.    Виділяємо форму і  до форми застосуємо подію – відкриття форми.

1. Виділяємо об'єкт - форма.
2.   В вікні Інспектора об'єктів  відкриваємо  вкл.Події та вибираємо подію OnCreate . 
3. Відбувається перехід з вікна Конструктора інтерфейсу проекта у вікно Редактора програмного коду.

Зверніть увагу!!!

1. У вікні редактора тексту проекту на вкладці Unit1 з'являється заготовка для тексту процедури з іменем TForm1.FormCreate, команди якої й будуть виконуватися при настанні події Відкриття форми .

2.  Команди процедури записуються між двома словами begin (англ. begin - початок) і end (англ. end - кінець).

3. Звертаємо увагу, що begin і end - це не команди, ці слова відіграють роль відповідно відкриваючої та закриваючої дужки, що визначають початок і закінчення процедури. Ці слова часто називають операторними дужками. 

4.  Після слова end у кінці процедури повинна стояти крапка з комою (;).

5. Кожна команда процедури також має закінчуватися крапкою з комою (;). 

3.    Напишемо програмний код для цієї процедури.

При відкритті форми значення властивості Visible (видимість)  компонента Label1 повинне мати значення false (компонент Напис повинен бути  невидимим). 

Для зміни значень властивостей можна застосовувати  команду присвоювання (таким чином застосовуємо динамічний спосіб зміни значень тих чи інших властивостей об’єктів)

Для запису команди присвоювання  використовують  оператор присвоювання, який позначається так: « :=  » .

Вводимо команду  зміни значення властивості Visible  в заготовку процедури, таким чином  обробник події ми запишемо так:

procedure TForm1.FormCreate(Sender: TObject);
begin
  label1.Visible:=false;
end; 

ІІ. Для реалізації другого завдання: при виборі кнопки «Цитата» компонент Напис стає видимим (label1.Visible:=true ) виберемо подію Click для компонента  Кнопка - Button1.

procedure TForm1.Button1Click(Sender: TObject);
begin
   label1.Visible:=true;
end;

III.    Для реалізації третього  завдання:  при закритті проекту повинне з’явитися вікно повідомлення про завершення проекту використаємо подію закриття форми Close (закривання форми (вікна) під час завершення виконання проекту).

Для виведення на екран текстових повідомлень можна використати спеціальне вікно - вікно повідомлень.
Для відкриття такого вікна і виведення на ньому потрібного текстового повідомлення використовується команда ShowMessage ('<текст>') (англ. show message - показувати повідомлення).
Створюємо обробник події (процедуру) закриття форми.

procedure TForm1.FormClose(Sender: TObject; var CloseAction: TCloseAction); begin       showMessage('Проект створено. ' + #13 + 'Бажаємо успіхів в подальшому навчанні'); // #13 - код переходу на новий рядок end;

Властивості form, label, button, edit
Елементи керування Image, Memo, ListBox
Тема3. Середовище візуального програмування Lazarus.
Тема 5. Як працювати з проектами в середовиші програмування Lazarus

• 2017 Февраль