Sub Process_Globals
Public App As Application
Public NavControl As NavigationController
Private Page1 As Page
Type ttt (sss As String)
Dim vvv As ttt = Null
End Sub
Private Sub Application_Start (Nav As NavigationController)
NavControl = Nav
Page1.Initialize("Page1")
Page1.Title = "Page 1"
Page1.RootPanel.Color = Colors.White
NavControl.ShowPage(Page1)
If vvv <> Null Then
Log(vvv)
Log(vvv.sss)
Else
Msgbox("vvv = Null", "Test")
End If
End Sub