Media End Event in Media Player

[junaidahmed]

How to use MediaEnd event for Media Player in Basic4Android,so that i can play all mp3 files automatically.pls advise

 

[Erel]

You can get the file duration and then set a timer to tick after this duration.

 

[junaidahmed]

pls give me sample example.

 

[Erel]

Something like:

Sub Process_Globals
    Dim mp As MediaPlayer
    Dim Timer1 As Timer
End Sub

Sub Globals
End Sub

Sub Activity_Create(FirstTime As Boolean)
    If FirstTime Then
        mp.Initialize
        Timer1.Initialize("Timer1", 0)
    End If
    
End Sub
Sub PlaySong(song As String)
    mp.Load(File.DirRootExternal, song)
    Timer1.Interval = mp.Duration + 100
    mp.Play
    Timer1.Enabled = True
End Sub
Sub Timer1_Tick
    Timer1.Enabled = False
    PlaySong("nextsong")
End Sub

 

[junaidahmed]

ok got it,thanks for your quick response

 

[mjcoon]

Or, you could borrow from, and extend, the Media Player tutorial and test every second (say) for Position = 100% to show completion.

This would work even if you have a Pause or Stop function.

(And this is what I did for my Basic4PPC "Music Player" http://www.b4x.com/forum/share-your-creations/5221-music-player-play-list.html#post30578.)

Mike.