13249907226q 发表于 2015-5-4 06:24:27

音乐播放器

时间 = 媒体播放1.取总时间 ()
标签_时长.标题 = “时长:” + 到文本 (到整数 (时间 ÷ 60)) + “:” + 到文本 (时间 % 60)
标签_播放.标题 = “播放:” + 到文本 (媒体播放1.取位置 () ÷ 1000 \ 60) + “:” + 取文本右边 (“0” + 到文本 (取整 (媒体播放1.取位置 () ÷ 1000 % 60)), 2)
如果 (超级列表框1.取表项数 () ≠ 0 且 媒体播放1.取状态 () = 1)
         每份的长度 = 媒体播放1.取长度 () ÷ 滑块条_进度条.最大位置
       取长度 = 每份的长度 × 滑块条_进度条.位置
如果真 (滑块条_进度条.位置 ≠ 程序集变量1)
         媒体播放1.播放 (取长度, )
         程序集变量1 = 滑块条_进度条.位置
如果真 (媒体播放1.取状态 () = 1)
         滑块条_进度条.最大位置 = 媒体播放1.取总时间 ()
         滑块条_进度条.位置 = 程序集变量1
程序集变量1 = 媒体播放1.取位置 () ÷ 1000
如果真 (媒体播放1.取状态 () = 1)
         滑块条_进度条.位置 = 程序集变量1
我看到还有人制作音乐播放器很想弄音乐文件播放的总时间和已播放时间,还有进度条怎么走这就是代码哦。
页: [1]
查看完整版本: 音乐播放器