随机函数，滑块条的使用

---

 ————版权申明————

---

 

首先呢，我们要庆祝一下中共十九大顺利召开。

 

————————————————————————

 

好了，接下来学习新的内容：

说错了，还是做完上一次的项目吧，音乐播放器啊。。。。。。

其实音乐播放器做得差不多了，就差那么一点小细节没做好。

比如：拖动进度条的时候，播放的进度没有跟着走呢。

还有，列表本应该是可以随机播放，顺序播放，单曲循环啊，列表循环啊什么的。

——————————闷，骚，的，分，隔，线————————————

由于之前写的程序，今天测试的时候发现有bug存在，咱们先把bug修复一下。

1.先回到【_启动窗口】面板，选中 【进度条】控件，然后修改最大位置为：1000，如下图：

 

2.然后在全部变量里面添加两个全局变量：

鼠标按下：逻辑型

播放位置：逻辑型

 

3.接着找到【时钟周期函数】修改该函数，如下：

鼠标被按下的时候，直接调用 返回() 函数，这个处理是为后面的进度条拖动做准备

然后修改进度条的位置，进度条的实际位置应该是：

进度条.位置 ＝ 媒体播放1.取位置 () ÷ 媒体播放1.取长度 () × 1000

这个修改 同样是为后面的进度条拖动做准备，由于之前的计算是错误的，所以如果不修改这个的话会直接影响到后面的功能。

好了，就修改那么多。

 

——————————闷，骚，的，分，隔，线————————————

拖动进度条，让播放进度跟着走怎么做呢？

As shown below ……

回到 【_启动窗口】，选中进度条控件，然后在左边的事件列表框里面选中【位置被改变】，然后程序就会生成一个【位置被改变】的函数，如下图：

 

添加好【位置被改变】事件之后，接下来我们开始实现这个函数。

（注：位置被改变，说明白了就是进度条的那个控件的位置被修改，这里所说的位置是指滑块中，滑块点的位置，并非整个控件的位置。OK？）

代码如下：

定义两个个局部变量：总时长：整数型，拖放进度：小数型（不知道如何添加的话，自己面壁：传送门）

首先获取当前文件的总时长，也就是：媒体播放器 取长度。

然后获取拖放的进度的比例，计算方式就是：拖放进度 ＝ 进度条.位置 ÷ 进度条.最大位置

接着把得到的数值（进度条的比例） 乘上 总时长后 赋值给 全局变量 播放位置 ，

昨晚这一步之后，接着回到【_启动窗口】面板，选中进度条控件，然后在左边的事件列表框中添加

【_进度条_鼠标左键被按下】和【_进度条_鼠标左键被放开】这两个函数

代码如下：

鼠标左键按下的时候的时候，修改变量 鼠标按下 = 真，这是为了，鼠标在按下的时候，不给播放的定时器刷新，如果不加入这个的话，鼠标一点击了这个进度条之后，位置被修改，然后定时器也跟着刷新了这个位置，就会导致这个控件的滑块乱跳的现象。

鼠标左键放开之后，我们修改 鼠标按下 = 假，然后就播放当前的播放位置

so easy ……

 

————————————————————————

 

接下来，开始做播放的顺序，

上面说过了，播放的顺序可以有：顺序播放，随机播放，单曲循环，列表循环，这四种模式。

算了，还是下次再说吧。朕乏了，各位跪安了。