一个关于ＤＡＴ文件的问题.(50分)

我用delphi7自带的mediaplayer制作了一个媒体播放器.播放ＭＰ３可以，.dat文件却不行.
以下是播放.dat文件时候的代码：
begin

with mediaplayer1do

　　begin

close;
　display:=panel1;
mediaplayer1.filename:=extractfiledir(application.ExeName)+'/曲库/'+panel2.caption+'.dat';
panel1.caption:='';
open;
rewind;
play;
end;

其中panel1是播放窗口，panel2是文件名称（假设这些都没什么问题.）
可每次我运行.dat文件的时候就出错，如下提示：
project project.exe raised exception class EMCIDeviceError with message'无法通过给定的扩展名确定设备类型.'.Process stopped. Use Step or Run to continue.

各位富翁请指教．

郁闷～～不是没人知道吧？

.dat改为.mpg

procedure TForm1.WriteMciConfig;
{定义一个过程,向ini文件写一些配置信息，
以便系统能调用相应驱动程序来播放文件,
注意:如果不这样做Mediaplay控件打开某
些扩展名的文件时会发生什么MCI初始化
错误,很多人相信已经吃过这个苦头}
begin

WritePrivateProfileString('mci extensions', 'mpg', 'MPEGVideo', 'win.ini');
WritePrivateProfileString('mci extensions', 'dat', 'MPEGVideo', 'win.ini');
WritePrivateProfileString('mci extensions', 'mpv', 'MPEGVideo', 'win.ini');
WritePrivateProfileString('mci extensions', 'mpeg', 'MPEGVideo', 'win.ini');
WritePrivateProfileString('mci extensions', 'cjt', 'MPEGVideo', 'win.ini');
WritePrivateProfileString('mci extensions', 'avi', 'AVIVideo', 'win.ini');
WritePrivateProfileString('mci', 'MPEGVideo', 'mciqtz.drv', 'system.ini');
WritePrivateProfileString('网络多媒体播放器', '作者', '陈经韬', 'netplay.ini');
WritePrivateProfileString('网络多媒体播放器', '版本', '演示版', 'netplay.ini');
end;

多人接受答案了。