Replace MainForm.fmx

MainForm.fmx

-object HeaderFooterForm: THeaderFooterForm
+object ToolsForm: TToolsForm
   Left = 0
   Top = 0
   Caption = 'Header Footer Form'
@@ -8,6 +8,7 @@ object HeaderFooterForm: THeaderFooterForm
   FormFactor.Height = 900
   FormFactor.Devices = [Desktop]
   OnCreate = FormCreate
+  OnShow = FormShow
   DesignerMasterStyle = 3
   object Header: TToolBar
     Size.Width = 384.000000000000000000