Private Sub B4XPage_Created (Root1 As B4XView)
Root = Root1
'load the layout to Root
Root.LoadLayout("Layout")
SoftOrientationMain.Initialize(B4XPages.GetNativeParent(Me))
SoftOrientationMainPage.Initialize(Me,"SoftOrientationMainPage","mainpage","Layout",SoftOrientationMain.SCREEN_ORIENTATION_SENSOR,Root.As(Panel))
SoftOrientationMain.AddB4XPage2(SoftOrientationMainPage)
'Here you can continue to adding views programatically or fill custom views with content
End Sub