|
---- 可视动画控件ActiveMovie是Microsoft公司开发的ActiveX控件，从开始的1.0版、1.2版到现在的2.0版，功能上已经有了很大的改进。由于该控件内嵌了Microsoft MPEG音频解码器和Microsoft MPEG视频解码器，所以能够很好地支持音频文件和视频文件，用其播放的VCD效果就很好。另外，播放时若用鼠标右键单击画面，可以直接对画面的播放、暂停、停止等进行控制，读者还可以自行在“属性”栏中对影片播放进行控制设置，用起来非常方便。 在Microsoft公司去年推出的VC++6.0中已经包含了ActiveMovie控件的2.0版，笔 者 在VC++6.0下利用这个控件自制了一个简易的媒体播放器，除了满屏功能外，还可以对音量进行控制。下面把具体做法介绍给读者。
---- 一 建立工程
---- 利用 VC++6.0的AppWizard生成一个基于对话框的工程Player，去掉对话框上的确定和取消按钮，并加入ActiveMovie控件（通常情况下ActiveMovie控件并不出现在控件面板中，可在菜单中依次选择->Add To Project->Components And Controls，在出现的Components And Controls Gallery对话框中打Registered Active Controls文件夹，选中ActiveMovie Control
Object选项，按Insert后关闭该对话框，ActiveMovie控件便出现在控件面板中），调整好控件在对话框中的位置。为了能够控制控件的操作，应为对话框设计一个菜单，菜单的项目可以定为文件、屏幕控制和音量控制。
---- 二 添加代码
---- 首先利用ClassWizard为ActiveMovie控件声明一个变量m_ActiveMovie。然后为菜单文件添加两个菜单项打开文件和退出，并分别添加函数OnOpen（）和OnExit（），代码如下：
void Cplayer：：OnOpen（）
{
// TODO: Add your command handler code here
char szFilter[] = " Video File (*.dat)
*.dat|Wave File (*.wav)*.wav|AVI File (*.avi)
(*.avi)|Movie File (*.mov)(*.mov)|Media File (*.mmm)(*.mmm)|Mid File(*.mid;*.rmi)(*.mid;*.rmi)|MPEG File (*.mpeg)(*.mpeg)|All File (*.*)*.* "; //用于设置FileDialog的文件类型
CFileDialog FileDlg( TRUE, NULL, NULL,
OFN_HIDEREADONLY, szFilter );
if( FileDlg.DoModal() == IDOK )
{
CString PathName = FileDlg.GetPathName();
PathName.MakeUpper();
m_ActiveMovie.SetFileName(PathName);
}
}
---- OnOpen()函数的作用是显示打开对话框，通过该对话框选择要执行的文件。
void CPlayer：：OnExit（）
{
// TODO: Add your command handler code here
OnOK（）；//退出应用程序
}
---- 为菜单屏幕控制添加菜单项满屏，其响应函数为OnFully（），具体代码如下：
void CPlayer：：OnFully()
{
// TODO: Add your command handler code here
m_ActiveMovie.Pause ();//暂停播放
m_ActiveMovie.SetFullScreenMode(true);//设置满屏模式
m_ActiveMovie. Run();//继续播放
m_ActiveMovie.SetMovieWindowSize(SW_SHOWMAXIMIZED);
//设置窗口为最大
}
---- ActiveMovie控件还提供了控制音量的两个函数GetVolume()和SetVolume()，只要在程序中调用这两个函数，便可以达到控制音量的目的。为音量控制
添加增加和减小两个菜单项，其响应函数分别为：
void CVcdDlg::OnAdd()
{
// TODO: Add your command handler code here
long m_valume= m_ActiveMovie.GetVolume ();
//获取当前音量
m_ActiveMovie.Pause ();
m_ActiveMovie.SetVolume(m_valume+100);
//用于增加音量
m_ActiveMovie.Run ();
}
void CVcdDlg::OnReducing()
{
// TODO: Add your command handler code here
long m_valume= m_ActiveMovie.GetVolume ();
m_ActiveMovie.Pause ();
m_ActiveMovie.SetVolume(m_valume-100);
//用于减小音量
m_ActiveMovie.Run ();
}
---- 在声卡的控制菜单上给出了静音操作，那么能否为我们自己制作的媒体播放器加上 静音功能呢？回答是肯定的。虽然ActiveMovie控件并没有直接提供静音函数，但可以通过控制函数SetVolume()的参数来实现静音的效果。笔者经过反复试验，当 SetVolume()的参数设为-4000使效果比较理想。要实现静音功能，应先为音量控制加入菜单项静音，并添加消息响应函数OnMute（），代码如下：
void CVcdDlg::OnMute()
{
// TODO: Add your command handler code here
m_ActiveMovie.Pause ();
m_ActiveMovie.SetVolume(-4000);
m_ActiveMovie.Run ();
}
---- 编译运行本程序，便可以用自制的媒体播放器欣赏光盘上的音频或视频节目了。本文是从网上转载的，其中包含很多“ ”分别是左引号和右引号。
|
