#Region Activity Attributes
#FullScreen: True
#IncludeTitle: True
#End Region
Sub Process_Globals
Private player1 As SimpleExoPlayer
End Sub
Sub Globals
Private SimpleExoPlayerView1 As SimpleExoPlayerView
Private button1 As Button
End Sub
Sub Activity_Create(FirstTime As Boolean)
Activity.LoadLayout("albie1")
If FirstTime Then
player1.Initialize("player")
player1.Prepare(player1.CreateFileSource(File.DirAssets, "albie1.mp4"))
End If
SimpleExoPlayerView1.Player = player1
player1.play
End Sub
Sub button1_click
player1.Pause
player1.Release
StartActivity("main")
End Sub
Sub Activity_Pause (UserClosed As Boolean)
player1.Pause
player1.Release
End Sub
Sub Activity_Resume
Activity.LoadLayout("albie1")
player1.Initialize("player")
player1.Prepare(player1.CreateFileSource(File.DirAssets, "albie1.mp4"))
SimpleExoPlayerView1.Player = player1
player1.play
End Sub