Sub Globals
Dim FFMpegMediaController1 As FFMpegMediaController
Dim FFMpegVideoView1 As FFMpegVideoView
End Sub
Sub Activity_Create(FirstTime As Boolean)
If FirstTime Then
FFMpegVideoView1.Initialize("FFMpegVideoView1")
Activity.AddView(FFMpegVideoView1, 0, 0, 100%x, 100%y)
FFMpegMediaController1.Initialize("FFMpegMediaController1")
FFMpegVideoView1.SetMediaController(FFMpegMediaController1)
FFMpegVideoView1.SetVideoPath("http://devimages.apple.com/iphone/samples/bipbop/gear1/prog_index.m3u8")
End If
End Sub