转入正题,嗯。。。对了,朋友有难不能不帮,况且还是位MM,哈。。。俺只好上网找资料了,在baidu搜了一下资料不是很多啊,后来看到有一个用vb做的DIY flash播放器的,就看了一下(就是下面贴的这个)。实现步骤挺简单的,使用Shockwaveflash控件实现,转化成vc实现。
嚯嚯。。。可以向MM邀功了。。。
实现步骤如下:
1。新建一个基于对话框的程序,添加变量:
int m_nTimer; //Timer时间控制
bool timerflag; //Timer启用的标志
bool screenflag; //全屏的标志
bool playflag; //有无文件打开的标志
CRect flashrect; //记录Shockwaveflash组件的矩形区域
WINDOWPLACEMENT m_FlashPos; //记录Shockwaveflash组件的状态
WINDOWPLACEMENT m_WndPos; //记录对话框窗口的状态
在对话框的构造函数中将所有bool变量赋值为FALSE。
2。在窗体上添加按钮(为了实现简单,俺的功能调用都是通过按钮实现的),设置Capture分别为:“打开” 、“播放”、“暂停”、“停止”、“重播”、“后退”、“前进”、“末帧”、“快退”、“快进”、“放大”、“缩小”、“还原”、“关闭”、“全屏”。
3。添加一个Shockwaveflash控件,为Shockwaveflash控件添加变量flash;
添加一个CSliderCtrl控件,ID为IDC_SLIDER1。
4。为各个按钮添加处理代码:
“打开”按钮代码:
char szFilters[]='MyType Files (*.swf)|*.swf||';
CFileDialog fileDlg (TRUE, 'swf', '*.swf',OFN_FILEMUSTEXIST| OFN_HIDEREADONLY,szFilters, this);
if( fileDlg.DoModal ()==IDOK )
{
CString pathName = fileDlg.GetPathName();
flash.put_Movie(pathName);
playflag=TRUE;
if(!timerflag)
{
m_nTimer=SetTimer(1,100,0); //开启计时器
timerflag=!timerflag;
}
}
“播放”按钮代码:
flash.Play();
“暂停”按钮代码:
flash.Stop();
“停止”按钮代码:
flash.Rewind();
flash.Stop();
“重播”按钮代码:
flash.Rewind();
flash.Play();
“后退”按钮代码:
flash.Back();
“前进”按钮代码:
flash.Forward();
“末帧”按钮代码:
flash.GotoFrame(flash.get_TotalFrames()-1);
“快退”按钮代码:
int current=flash.CurrentFrame();
if(current>4)
{
current-=5;
flash.GotoFrame(current);
}
else
{
flash.put_FrameNum(0);
}
“快进”按钮代码:
int current=flash.CurrentFrame();
int i=flash.get_FrameNum();
if(current<flash.get_TotalFrames()-5)
{
current+=5;
flash.GotoFrame(current);
}
else
{
flash.put_FrameNum(flash.get_TotalFrames()-1);
}
“放大”按钮代码:
flash.Zoom(50);
“缩小”按钮代码:
flash.Zoom(200);
“还原”按钮代码:
flash.Zoom(0);
“关闭”按钮代码:
flash.put_Movie('http://');
KillTimer(m_nTimer); //停止计时器
CSliderCtrl *m_pSlider=(CSliderCtrl*)GetDlgItem(IDC_SLIDER1);
m_pSlider->SetPos(0); //滑块置零
timerflag=FALSE;
playflag=FALSE;
5。添加Slider 控件的消息处理函数PreTranslateMessage()响应的消息NM_RELEASEDCAPTURE
CSliderCtrl *m_pSlider=(CSliderCtrl*)GetDlgItem(IDC_SLIDER1);
int num=m_pSlider->GetPos();
num=num*flash.get_TotalFrames()/100;
flash.GotoFrame(num);
将下面代码添加到,Dialog类的OnInitDialog()函数中
CSliderCtrl *m_pSlider=(CSliderCtrl*)GetDlgItem(IDC_SLIDER1);
m_pSlider->SetRange(0,100); //设定Slider的活动范围是0~100
6。添加Dialog类的OnTimer()函数响应消息WM_TIMER
在OnTimer()函数中添加代码:
CSliderCtrl *m_pSlider=(CSliderCtrl*)GetDlgItem(IDC_SLIDER1);
m_pSlider->SetPos(flash.CurrentFrame()*100/flash.get_TotalFrames());
7。在Dialog类的DestroyWindow()函数中添加代码:
if(timerflag)
KillTimer(m_nTimer);
8。“全屏”按钮代码:
if(!screenflag && playflag)
{
GetWindowPlacement(&m_WndPos);
flash.GetWindowPlacement(&m_FlashPos);
flash.GetWindowRect(flashrect);
CSliderCtrl *m_pSlider=(CSliderCtrl*)GetDlgItem(IDC_SLIDER1);
m_pSlider->ShowWindow(SW_HIDE );
HWND hwnd=this->GetSafeHwnd();
LONG style=GetWindowLongPtr(hwnd,GWL_STYLE);
SetWindowLongPtr(hwnd,GWL_STYLE,style-WS_CAPTION );
CClientDC dc(this);
this->MoveWindow(0,0,dc.GetDeviceCaps(HORZRES),dc.GetDeviceCaps(VERTRES));
flash.SetWindowPos(&CWnd::wndTop ,0,0,dc.GetDeviceCaps(HORZRES),dc.GetDeviceCaps(VERTRES),SWP_SHOWWINDOW);
screenflag=TRUE;
}
9。响应按键ESC消息,取消全屏。
重载对话框的PreTranslateMessage()函数,在函数中添加如下代码:
if(pMsg->message == WM_KEYDOWN)
{
if(pMsg->wParam==VK_ESCAPE)
{
if(screenflag)
{
HWND hwnd=this->GetSafeHwnd();
LONG style=GetWindowLongPtr(hwnd,GWL_STYLE);
SetWindowLongPtr(hwnd,GWL_STYLE,style+WS_CAPTION );
ShowWindow(SW_HIDE);
SetWindowPlacement(&m_WndPos);
flash.MoveWindow(flashrect.left,flashrect.top,flashrect.Width(),flashrect.Height(),1);
flash.SetWindowPlacement(&m_FlashPos);
screenflag=FALSE;
CSliderCtrl *m_pSlider=(CSliderCtrl*)GetDlgItem(IDC_SLIDER1);
m_pSlider->ShowWindow(SW_SHOW );
}
}
}
全屏和取消全屏的代码,是俺自己拼凑所得,充其量只是个模拟效果,而且还是个模拟的不好的效果,如果有高手见到,希望能够博您一笑。另外,在笑过之后还请您不吝赐教。俺一定以十二亿万分的热情接受。