#Region Project Attributes
#ApplicationLabel: B4A Auto Demo
#VersionCode: 1
#VersionName: 0.1
#SupportedOrientations: unspecified
#CanInstallToExternalStorage: False
#AdditionalJar: app-1.8.0-rc01.aar
#AdditionalJar: app-projected-1.8.0-rc01.aar
#AdditionalJar: androidx.arch.core:core-common
#AdditionalJar: androidx.arch.core:core-runtime
#AdditionalJar: androidx.lifecycle:lifecycle-common
#AdditionalJar: androidx.lifecycle:lifecycle-runtime
#MultiDex: True
#End Region

#Region Activity Attributes
#FullScreen: False
#IncludeTitle: True
#End Region

'No shared state is needed for this demo.
Sub Process_Globals
End Sub

'No Designer controls are needed for this demo.
Sub Globals
End Sub

'Shows a simple message on the phone.
Sub Activity_Create(FirstTime As Boolean)
    Activity.Color = Colors.White
    Dim Info As Label
    Info.Initialize("")
    Info.Text = "Open B4A Auto Demo in Android Auto."
    Info.TextColor = Colors.Black
    Info.TextSize = 20
    Activity.AddView(Info, 20dip, 30dip, 100%x - 40dip, 100dip)
End Sub

'No action is needed when the phone screen resumes.
Sub Activity_Resume
End Sub

'The car screen is managed by its own session.
Sub Activity_Pause(UserClosed As Boolean)
End Sub