0 07idea Unregistered / Unconfirmed GUEST, unregistred user! 2003-10-22 #1 我用那个Trackbar能实现进度条功能，但要实现一拉进度条就会播在指定的位置，要怎么实现？
A aichiyu Unregistered / Unconfirmed GUEST, unregistred user! 2003-10-23 #2 用trackbar是max上限会溢出 我用的是progressbar
L lovinger_2000 Unregistered / Unconfirmed GUEST, unregistred user! 2003-10-23 #3 不啊，用Trackbar的话要看你用什么控件了，如果使用MediaPlayer控件的话很容易实现的，在播放之前先取得媒体文件的时间，然后换算成秒，设置Trackbar的max为媒体文件的时间（一秒钟为1）。在Trackbar的响应函数中，一旦Trackbar改变，就设置Mediaplayer控件的播放位置为Trackbar的值，这样就实现了Trackbar进度条的问题。
不啊，用Trackbar的话要看你用什么控件了，如果使用MediaPlayer控件的话很容易实现的，在播放之前先取得媒体文件的时间，然后换算成秒，设置Trackbar的max为媒体文件的时间（一秒钟为1）。在Trackbar的响应函数中，一旦Trackbar改变，就设置Mediaplayer控件的播放位置为Trackbar的值，这样就实现了Trackbar进度条的问题。
0 07idea Unregistered / Unconfirmed GUEST, unregistred user! 2003-10-23 #4 实现一拉TrackBar就播放到指定的地方要用那个事件？我用了Onchange，但是播放时，TrackBar就已经是在Onchange了，所以播了1S后就重播了。要用那个事件啊？
L lovinger_2000 Unregistered / Unconfirmed GUEST, unregistred user! 2003-10-23 #5 把Trackbar的Tab取消了，改成只能用鼠标来拖动Trackbar，然后用MouseUp事件响应啊，当鼠标键弹起的时候就可以确定Trackbar的位置了。给分吧
L lovinger_2000 Unregistered / Unconfirmed GUEST, unregistred user! 2003-10-24 #7 不是有OnEndDrag事件吗？那个就是拖动结束的时候的响应函数啊，你学Delphi几天哦，这个要举一反三啊。
0 07idea Unregistered / Unconfirmed GUEST, unregistred user! 2003-10-24 #9 那个OnEndDrag我早就试过了，不行，没有反应。。 例如： procedure TForm1.TrackBar1EndDrag(Sender, Target: TObject; X, Y: Integer); begin ShowMessage(inttostr(TrackBar1.Position)); end; 用鼠标拖动后没反应！！
那个OnEndDrag我早就试过了，不行，没有反应。。 例如： procedure TForm1.TrackBar1EndDrag(Sender, Target: TObject; X, Y: Integer); begin ShowMessage(inttostr(TrackBar1.Position)); end; 用鼠标拖动后没反应！！
