Sub Globals
Dim vv As VideoView
End Sub
Sub Activity_Create(FirstTime As Boolean)
vv.Initialize("vv")
vv.MediaControllerEnabled = False
Activity.AddView(vv, 10dip, 10dip, 250dip, 250dip)
vv.LoadVideo(File.DirRootExternal & "/Movies", "IMAG0018.MOV")
vv.play
End Sub
Sub vv_Complete
' vv.LoadVideo(File.DirRootExternal & "/Movies", "IMAG0018.MOV")
vv.Play
End Sub