Создание окна с возможностью изменения его размеров - PascalABC.NET

{$apptype windows}
{$reference 'System.Windows.Forms.dll'}
uses
  System,System.Windows.Forms;
 
var
  MyForm: Form;
  But1,But2: Button;
procedure Click1(Sender: Object; Args: System.EventArgs);
begin
  with Myform do
   begin
    Left:=Left-10;
    Top:=Top-10;
    Width:=Width+20;
    Height:=Height+20;
   end;
end;
procedure Click2(Sender: Object; Args: System.EventArgs);
begin
  with Myform do
   begin
    Left:=Left+10;
    Top:=Top+10;
    Width:=Width-20;
    Height:=Height-20;
   end;
end;
 
begin
  MyForm := new Form;
  MyForm.text := 'Форма';
  MyForm.Height := 400;
  MyForm.Width := 600;
  MyForm.StartPosition:=FormStartPosition.CenterScreen;
  But1 := new Button;
  But1.Width := 100;
  But1.Height := 50;
  But1.Left := 250;
  But1.Top := 100;
  But1.Text:='Увеличить';
  But1.Click += Click1;
  MyForm.Controls.Add(But1);
  But2 := new Button;
  But2.Width := 100;
  But2.Height := 50;
  But2.Left := 250;
  But2.Top := 150;
  But2.Text:='Уменьшить';
  But2.Click += Click2;
  MyForm.Controls.Add(But2);
  Application.Run(MyForm);
end.