add form

HelloWorld.pas

@@ -1,4 +1,19 @@
+procedure THelloWorldForm.Button1Click(Sender: TObject);
+begin
+    ShowMessage('Hello World - Button 1');
+end;
+
+procedure THelloWorldForm.Button2Click(Sender: TObject);
+begin
+    ShowMessage('Hello World - Button 2');
+end;
+
+procedure THelloWorldForm.Button3Click(Sender: TObject);
+begin
+    ShowMessage('Hello World - Button 3');
+end;
+
 procedure HelloWorld;
 begin
-    ShowMessage('Hello World');
+    HelloWorldForm.ShowModal;
 end;