Public Sub Initialize(Module As Object, Parent As Activity, EventName As String)
clsModul = Module
clsEvent = EventName
clsPage = Parent
pnlLayout.Initialize("")
clsPage.AddView(pnlLayout, 0, 0, clsPage.Width, clsPage.Height)
pnlLayout.LoadLayout("Layout1")
pnlLayout.RemoveView
clsPage.AddView(pnlLayout, (clsPage.Width - panel1.Width) / 2, _
(clsPage.Height - panel1.Height) / 2, _
panel1.Width, panel1.Height)
End Sub