#Region Shared Files
#CustomBuildAction: folders ready, %WINDIR%\System32\Robocopy.exe,"..\..\Shared Files" "..\Files"
'Ctrl + click to sync files: ide://run?file=%WINDIR%\System32\Robocopy.exe&args=..\..\Shared+Files&args=..\Files&FilesSync=True
#End Region
'Ctrl + click to export as zip: ide://run?File=%B4X%\Zipper.jar&Args=Project.zip
Sub Class_Globals
Private Root As B4XView
Private xui As XUI
Private Canvas1 As Canvas
'Public pagMain As frmMain
Public pagScreen1 As frmScreen1
Public pagScreen2 As frmScreen2
Public pagScreen3 As frmScreen3
Public pagScreen6 As frmScreen6
Public pagConfigurazione As frmConfigurazione
Public pagCheck As frmCheck
Public pagComandi As frmComandi
Public pagColori As frmColori
Public pagGps As frmGps
Public pagMappa As frmMappa
Public pagMqtt As frmMqtt
Public pagSms As frmSms
Public pagPassword As frmPassword
Public pagUpdater As frmUpdater
Public pagWeb As frmWeb
Public ImageView1 As ImageView
Private lblNumeroTelefonico As Label
Private lblNetworkOperatorName As Label
Private lblNetworkType As Label
' Private lblMessaggio As Label
Private lblMonitoraggioAttivo As Label
' Private cmdVerificaPermessi As Button
Private lblDeviceId As Label
Public lblMqttConnection As Label
Public lblBatteryVoltage As Label
Public lblBatteryTemperature As Label
Public lblTempoAvvio As Label
Private cmdConfigurazione As Button
End Sub
Public Sub Initialize
End Sub
'This event will be called once, before the page becomes visible.
Private Sub B4XPage_Created (Root1 As B4XView)
GlobRob.logga("B4XMainpage.B4XPage_Created")
Root = Root1
Root.LoadLayout("frmMain")
Canvas1.Initialize(Root)
'pagMain.Initialize: B4XPages.AddPage("Main",pagMain)
pagConfigurazione.Initialize: B4XPages.AddPage("Configurazione",pagConfigurazione)
pagComandi.Initialize: B4XPages.AddPage("Comandi", pagComandi)
pagCheck.Initialize: B4XPages.AddPage("Check", pagCheck)
pagColori.Initialize: B4XPages.AddPage("Colori", pagColori)