Розробка форм та розміщення на них елементів керування

Завдання. На формі розміщені три кнопки. Записати процедури, які містяться в кнопках 1 і 2. Унаслідок натискання кнопки 1 її ширина й висота збільшується на 15 пікселів. Форма і кнопка 2 не змінюють розмірів. У міру збільшення кнопки 1 кнопка 2 зміщується, а кнопка 3 зменшується в розмірах. Якщо натиснути кнопку 2, описаний процес іде в зворотньому порядку - кнопка 3 збільшується, кнопка 1 зменшується. Унаслідок натискання на кнопку 3 форма закривається. Результат натискання на кнопку 1 показано на малюнку.

Хід роботи.

1. Запустити середовище Lazarus.
2. На формі розмістити три кнопки.
3. Підписати кнопки Кнопка 1, Кнопка 2, Кнопка 3 як на малюнку.
4. Створити процедуру OnClick для першої кнопки.

      procedure TForm1.Button1Click(Sender: TObject);
      begin
        button1.Width:=button1.width+15;
        button1.Height:=button1.Height+15;
        button2.Top:=button2.top+15;
        button2.Left:=button2.left+15;
        button3.width:=button3.width-15;
        button3.Height:=button3.Height-15;
        button3.top:=button3.Top+15;
        button3.Left:=button3.Left+15;
     end;                    
     5. Створити процедуру OnClick для другої кнопки (знак змінити на протилежний).
     6. Створити процедуру OnClick для третьої кнопки.
     procedure TForm1.Button3Click(Sender: TObject);
     begin
        close;
     end;
     7. Збережіть проект в папці Елементи керування  у власній папці.
     8. Запустіть проект на виконання.