mediaplayer放cd问题(50分)

得到了当前cd的曲目数，如何得到相应的每一曲的时间，及播放的剩余时间
而且如何选择了相应的曲目就播放？

有相应的api函数调用
试着去找本书
要么下次我把算法贴给你(很旧以前的事了,要找一找)

//sorry sir
//我以前的程序只能将Mediaplayer的播放位置转换成磁道数,已播放分钟,秒数
//相应代码如下,大概解决不了问题
With TMSFRec(CDPlayer.Position)do
{转换成TMSF格式}
begin

CurrentTrack:=Tracks;
{取得目前磁道}
strMinutes:=IntToStr(Minutes);
{目前的分数}
strSeconds:=IntToStr(Seconds);
{目前的秒数}
if Length(strMinutes)<2 then
strMinutes:='0'+strMinutes;
if Length(strSeconds)<2 then
strSeconds:='0'+strSeconds;
ShowTrack;
{显示目前磁道及其长度}
LinkPositionLabel.Caption:=strMinutes+':'+strSeconds;
end;


//but...
//我帮你查了一下资料
//Tmediaplayer有如下属性
//property tracklength(trackNum:integer):integer;
//可以读出曲目长度(我为用过)
//返回值和属性mediaplayer.timeformat有关
//关于mediaplayer.timeformat的说明很长
//我很难打完,不好意思,亲自己查查书
(我在delphi4.0/5.0类参考详解 清华出版 48rmb 中查的-----半礼拜饭钱)

接受答案了.