关于MPG文件的加速播放

Question

请问：
    如何才能使MPG文件以正常速度的N倍播放。有点像录像机倒带的感觉
    谢谢！100分送上。

Answer 1

  简单。  使用WindowsMediaPlayer 的ocx控件，然后将Rate值设为n即可。

Answer 2

上面的大侠，用windows的MediaPlayer这个OCX控件不行呀，这个控件确实可以支持快放，但好象Rate最大值只能设到2.2，大于这个数，但就不再向上加了。请问，还有没有别的好办法

Answer 3

    要达到30倍干吗？我见过最快软件的也就能以12倍的速度播放(mpegVCR)。

Answer 4

procedure TForm1.CoolButton6Click(Sender: TObject);
begin
//如果正处于播放状态则倒带后继续播放，否则倒带后不播放
if mediaplayer1.mode=mpplaying then
begin
MediaPlayer1.back;
MediaPlayer1.play;
end
else
MediaPlayer1.back;
end;procedure TForm1.Timer1Timer(Sender: TObject);
begin
if mediaplayer1.mode=mpplaying then
begin
 mediaplayer1.timeformat:=tfmilliseconds;
 trackbar951.max:=mediaplayer1.length div 1000;
 trackbar951.position:=mediaplayer1.position div 1000;
 end;
end;procedure TForm1.TrackBar1Change(Sender: TObject);
begin
if form1.mediaplayer1.mode=mpplaying then
begin
  mediaplayer1.position:=trackbar951.position*1000;
  mediaplayer1.play;
 end;  
end;

Answer 5

To: ： cg1120(代码最优化－§为这世界,添些美丽色彩§你写的这些可以做到加速播放吗？！