Сложение двух чисел - PascalABC.NET

Формулировка задачи:

Помогите составить программу, реализующую сложение двух чисел. В результате должно выводиться окошко с надписями и текстовыми полями, в которых будут указываться первое и второе слагаемые. Плюс кнопка, при нажатии на которую выводится результат сложения. Заранее спасибо)

Решение задачи: «Сложение двух чисел»

Листинг программы

{$apptype windows}
{$reference 'System.Windows.Forms.dll'}
 
uses
  System.Windows.Forms;
 
var
  MainForm: Form;
  B:  System.Windows.Forms.Button;
  Label_1, Label_2, Label_3: System.Windows.Forms.Label;
  Tb_1, Tb_2: System.Windows.Forms.TextBox;
 
procedure Button_Click(sender: object; args: System.EventArgs);
begin
  var x: real;
  var y: real;
  var e: integer;
  PABCSystem.Val(Tb_1.Text, x, e);
  PABCSystem.Val(Tb_2.Text, y, e);
  if (Tb_1.Text <> '') and (Tb_2.Text <> '') then
    Label_3.Text := 'Сумма = ' + PABCSystem.FloatToStr(x + y);
end;
 
begin
  Label_1 := new System.Windows.Forms.Label;
  Label_1.Dock := System.Windows.Forms.DockStyle.Top;
  Label_1.Text := 'Введите 1-ое слагаемое:';
  
  Label_2 := new System.Windows.Forms.Label;
  Label_2.Dock := System.Windows.Forms.DockStyle.Top;
  Label_2.Text := 'Введите 2-ое слагаемое:';
  
  Label_3 := new System.Windows.Forms.Label;
  Label_3.Dock := System.Windows.Forms.DockStyle.Top;
  
  Tb_1 := new TextBox;
  Tb_1.Dock := System.Windows.Forms.DockStyle.Top;
  
  Tb_2 := new TextBox;
  Tb_2.Dock := System.Windows.Forms.DockStyle.Top;
  
  B := new Button;
  B.Dock := System.Windows.Forms.DockStyle.Top;
  B.Text := 'Сложить!';
  B.Click += Button_Click;
  
  MainForm := new Form;
  MainForm.Text := 'Сумматор';
  
  MainForm.Controls.Add(B);
  MainForm.Controls.Add(Label_3);
  MainForm.Controls.Add(Tb_2);
  MainForm.Controls.Add(Label_2);
  MainForm.Controls.Add(Tb_1);
  MainForm.Controls.Add(Label_1);
  
  Application.EnableVisualStyles;
  
  Application.Run(MainForm);
end.

Объяснение кода листинга программы

Объявлены переменные x и y типа real, а также переменная e типа integer.
Введен код для проверки ввода с клавиатуры и преобразования его в число с плавающей точкой.
Если оба поля для ввода не пустые, то выполняется сложение чисел и выводится результат на экран.
Создается новая форма с текстом Сумматор.
На форму добавляются элементы управления: кнопка Сложить!, метка Сумма = и два текст-бокса для ввода чисел.
Запускается приложение.