Update VideoMusicPlayer - Update by Gal
@@ -201,6 +201,12 @@ MyApp = New qapp
setstylesheet("background-color: green")
}
+ playlist = new QMediaPlaylist() {
+ addMedia(new qurl("/Users/calmosoft/video/CalmoSoftFifteenPuzzle.avi"))
+ addMedia(new qurl("/Users/calmosoft/video/CalmoSoftSixteenPuzzle.avi"))
+ setCurrentIndex(1)
+ }
+
player = new QMediaPlayer()
{
if Fexists(FileToPlay)
@@ -209,13 +215,10 @@ MyApp = New qapp
msg = "FileToPlay: -- "+ FileToPlay +" -- required. Use music mp3 of your choise"
SendMsg(msg)
ok
-
setVideoOutput(videowidget)
play()
}
-
-
###===========================================================
###===========================================================
btnVertPos = 20
@@ -298,6 +301,13 @@ MyApp = New qapp
setclickevent( "volumeInc()")
}
+ btnPlayList = new qpushbutton(win1)
+ {
+ setgeometry(1050,btnVertPos,50,btnSize)
+ settext("Play List")
+ setclickevent( "playList()")
+ }
+
###===========================================================
###===========================================================
@@ -688,3 +698,9 @@ Func volumeInc()
return
###----------------------------------
+
+Func playList
+ if BarMan.value() = 100
+ player.setPlaylist(playlist)
+ player.play()
+ ok
