How can I create a splash screen to my APPs? Do we have any library?
Cool... Thinking this afternoon, I did that, but I wasn't sure that is the best solutionYou don't need a library to show the splash screen. Add your logo/icon in Main module, it will be shown when your app start. Add a timer to call next screen after a time, remember to HideBackButton too. Done!
Sub Process_Globals
Public App As Application
Public NavControl As NavigationController
Private Page1 As Page
Private csu As CallSubUtils
End Sub
Private Sub Application_Start (Nav As NavigationController)
NavControl = Nav
Nav.NavigationBarVisible = False
Dim splashPage As Page
splashPage.Initialize("")
splashPage.RootPanel.Color = Colors.Red
csu.Initialize
csu.CallSubDelayedPlus(Me, "AfterSplash", 5000)
NavControl.ShowPage(splashPage)
Page1.Initialize("Page1")
Page1.RootPanel.LoadLayout("1")
End Sub
Private Sub AfterSplash 'ignore
NavControl.SetNavigationBarVisibleAnimated(True)
NavControl.SetPagesStack(Array(Page1))
End Sub