急！在线等（多媒体播放器）

[八卦之魂]

用delphi的TMediaPlay写播放器。源代码从书上抄下来的，运行的时候老出现一个对话框，提示如下：

'project 程序名.exe raised exception class EMCIDeviceDrror with message 加载指定的设备驱动程序时发生了未知的问题。'.Process stopped.Use Step or Run to continue


请问如何解决

[cnhgj]

代码贴出来...或者运行了Mediaplayer不支持的文件格式?

[cnhgj]

你先用Mediaplay自已播播看

[kuki84]

mediaplay支持的格式吗？

[birdhaha]

关注！

[birdhaha]

我写这里时发现能打开AVI文件，却打不开DAT文件，但直接用Mediaplay放可以打开DAT。

[Kshape]

是不是你的插件没装上
很多播放器都是，可以打开一种文件
打不开另外的一种文件
但是装上插件就可以

[coolnan]

应先指定MedaiPlay要播放的文件类型，一般如
with MediaPlayer do begin
FileName:='';
DeviceType := dtAutoSelect;
open;
Play;
end;

[cangwu_lee]

说说你的文件的类型
MediaPlayer 支持那么多种文件格式。

[kuki84]

转，自己翻译。

#include <vfw.h>

HWND hMCIWnd = NULL;
__fastcall TForm1::TForm1(TComponent* Owner)
: TForm(Owner)
{
hMCIWnd = MCIWndCreate(Handle, HInstance,
0, "c:\\AVSEQ07.dat");
MCIWndPlay(hMCIWnd);
}
//---------------------------------------------------------------------------
void __fastcall TForm1::FormDestroy(TObject *Sender)
{
MCIWndDestroy(hMCIWnd);
}
//---------------------------------------------------------------------------
void __fastcall TForm1::Button1Click(TObject *Sender)
{
if (OpenDialog1->Execute()) {
MCIWndOpen(hMCIWnd, OpenDialog1->
FileName.c_str(), 0);
MCIWndPlay(hMCIWnd);
}
}



或播放文件之前改文件名为jpg。

[才子鸣]

UP

[zhouweiwansui]

接分