В PaskalABC.NET Как в формах присвоить кнопку, что бы при нажатии вылетало новое небольшое окошко с текстом

Unit Unit1;

interface

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

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

implementation

procedure Form1.button1_Click(sender: Object; e: EventArgs);
begin
MessageBox.Show('Маленькое окошко с сообщением', 'Сообщение');
end;

end.