一个简单的问题，使用mediaplay播放让scrollbar滚动.(50分)

如题，我开始播放，滚动条开始滚动，播放完成，滚动条也滚动完成，
中途停止播放，相应的滚动也停止，请问如何实现?

MediaPlayer1.FileName:=(指定文件路径)
MediaPlayer1.open;
MediaPlayer1.Play;
加一个Timer控件，INTERVER改为100enabled属性为False；
在播放按钮CLICK事件中设Timer1.Enabled:=TRUE,
在ONTIMER事件中加以下代码：
Scrollbar1.Min:=0;
Scrollbar1.Max:=MediaPlayer1.Length;
SCROLLBAR1.POSITION:=MEDIAPLAYER1.POSITIOM;
在Scrollbar的OnScrolL(好像是这个)事件加:
MediaPlayer1.pause;
MediaPlayer1.position:=Scrollbar1.position;
MediaPlayer1.Play

当然PLAY了以后别忘设TIMER1。ENABLED：=TRUE

以后多问问

接受答案了.