求TWINDOWSMEDIAPLAY做播放器微软的控件用法 200分在线等! (200分)

TwindwosMEDIAPLAY做播放器,如何屏蔽如扩展名不支持类的错误窗口,
如何判断播放状态if windowsMediaPlayer1.playstate<>mpPLaying then

最好是哪位兄弟提供它的全部方法和属性的说明,救命啊!

使用异常处理就可以了
ex:
try
你的代码
except
异常代码 [可以空着，即不显示任何错误信息]
end;

哪位兄台有办法 啊?????

procedure TfrmDisplay.Timer1Timer(Sender: TObject);
var
iPostion,iLongouble;
begin

iPostion:=MediaPlayer.controls.currentPosition;
iLong:=Mediaplayer.currentMedia.duration;
if not Started then

begin

Started:=true;
exit;
end;

if iPostion>(iLong-2) then

begin

Timer1.Enabled:=false;
frmDisplay.MediaPlayer.Visible:=false;
frmDisplay.MediaPlayer.fullScreen:=false;
frmMain.PlaySong;
end;


end;

这是我写的代码原来用过的希望对你有用处我用的是mediaplayer9的active

取得状态用OnPlayStateChange取得，NewState的值你测试一下就知道了。
controls有常用的控制功能
currentMedia下有媒体信息