2. Создайте проект, в котором при двойном клике мыши по форме ее размеры будут увеличиваться на 5.

После создания нового проекта в инспекторе свойств измените свойство Text на «Упражнение 2» и создайте обработчик события DoubleClick. После этого во вкладке «Код» объявится соответсвующая процедура и обработчик для двойного клика. В тело обработчика добавьте команды для изменения переменных Width и Height.

Итоговая программа может выглядеть так:

Unit Unit1;

interface

uses System, System.Drawing, System.Windows.Forms;

type
  Form1 = class(Form)
    procedure Form1_DoubleClick(sender: Object; e: EventArgs);
{$region FormDesigner}
  private
    {$resource Unit1.Form1.resources}
    {$include Unit1.Form1.inc}
{$endregion FormDesigner}
  public
    constructor;
    begin
      InitializeComponent;
    end;
  end;

implementation

procedure Form1.Form1_DoubleClick(sender: Object; e: EventArgs);
begin
  Width := Width + 5;
  Height := Height + 5;
end;

end.
Другие задания