关于多媒体播放时间计算问题.

我在用delphi的mediaplay编写多媒体时,我怎么正确地计算当前的播放时间.请给点代码.
一定送分.

解决方案 »

  1.   

    首先设定时间格式
    TimeFormat := tfMSF;
    把取出的长度放在一个longint 的变量中
      TheLength := mPlayer.Length;MCI_MSF_Minute(TheLength)   //分
    MCI_MSF_Second(TheLength)   //秒更详细的用法可以参考delphi的帮助文件和微软的帮助
      

  2.   

    如果播放的MP3则：
    MediaPlayer1.Length div 1000
    就歌曲的秒数，可以算出分钟数与秒数。
      

  3.   

    function  GetPosition: Integer;               得到播放位置
    function  GetLength: Integer;                 得到长度