国产一级a片免费看高清,亚洲熟女中文字幕在线视频,黄三级高清在线播放,免费黄色视频在线看

打開(kāi)APP
userphoto
未登錄

開(kāi)通VIP,暢享免費(fèi)電子書(shū)等14項(xiàng)超值服

開(kāi)通VIP
VC制作簡(jiǎn)易flash播放器
VC制作簡(jiǎn)易flash播放器
發(fā)布于:軟件開(kāi)發(fā)網(wǎng) 來(lái)源:互聯(lián)網(wǎng) 作者:佚名 時(shí)間:2009-02-26 00:03

 


近日朋友問(wèn)在VC中如何控制flash文件,俺也沒(méi)有做過(guò)以前,俺是新手再次聲明,很菜的,嘿嘿,但俺也期望成為大俠,能夠叱詫風(fēng)云,仗劍行走江湖,路遇不平排憂(yōu)解難,英雄美女,朝陽(yáng)晚霞,青山綠水。。。哈,不好意思,寫(xiě)著寫(xiě)著就歪了。但恐怕所有Man都有過(guò)這個(gè)理想吧。
轉(zhuǎn)入正題,嗯。。。對(duì)了,朋友有難不能不幫,況且還是位MM,哈。。。俺只好上網(wǎng)找資料了,在baidu搜了一下資料不是很多啊,后來(lái)看到有一個(gè)用VB做的DIY flash播放器的,就看了一下(就是下面貼的這個(gè))。實(shí)現(xiàn)步驟挺簡(jiǎn)單的,使用Shockwaveflash控件實(shí)現(xiàn),轉(zhuǎn)化成vc實(shí)現(xiàn)。
嚯嚯。。??梢韵騇M邀功了。。。
實(shí)現(xiàn)步驟如下:
1。新建一個(gè)基于對(duì)話(huà)框的程序,添加變量:
intm_nTimer; //Timer時(shí)間控制
booltimerflag; //Timer啟用的標(biāo)志
boolscreenflag; //全屏的標(biāo)志
boolplayflag; //有無(wú)文件打開(kāi)的標(biāo)志
CRectflashrect; //記錄Shockwaveflash組件的矩形區(qū)域
WINDOWPLACEMENTm_FlashPos; //記錄Shockwaveflash組件的狀態(tài)
WINDOWPLACEMENTm_WndPos; //記錄對(duì)話(huà)框窗口的狀態(tài)
在對(duì)話(huà)框的構(gòu)造函數(shù)中將所有bool變量賦值為FALSE。
2。在窗體上添加按鈕(為了實(shí)現(xiàn)簡(jiǎn)單,俺的功能調(diào)用都是通過(guò)按鈕實(shí)現(xiàn)的),設(shè)置Capture分別為:“打開(kāi)”、“播放”、“暫停”、“停止”、“重播”、“后退”、“前進(jìn)”、“末幀”、“快退”、“快進(jìn)”、“放大”、“縮小”、“還原”、“關(guān)閉”、“全屏”。
3。添加一個(gè)Shockwaveflash控件,為Shockwaveflash控件添加變量flash;
添加一個(gè)CSliderCtrl控件,ID為IDC_SLIDER1。
4。為各個(gè)按鈕添加處理代碼:

“打開(kāi)”按鈕代碼:
charszFilters[]="MyTypeFiles(*.swf)|*.swf||";
CFileDialogfileDlg(TRUE,"swf","*.swf",OFN_FILEMUSTEXIST|OFN_HIDEREADONLY,szFilters,this);
if(fileDlg.DoModal()==IDOK)
{
CStringpathName=fileDlg.GetPathName();
flash.put_Movie(pathName);
playflag=TRUE;

if(!timerflag)
{
m_nTimer=SetTimer(1,100,0); //開(kāi)啟計(jì)時(shí)器
timerflag=!timerflag;
}
}

“播放”按鈕代碼:
flash.Play();

“暫?!卑粹o代碼:
flash.Stop();

“停止”按鈕代碼:
flash.Rewind();
flash.Stop();

“重播”按鈕代碼:
flash.Rewind();
flash.Play();

“后退”按鈕代碼:
flash.Back();

“前進(jìn)”按鈕代碼:
flash.Forward();

“末幀”按鈕代碼:
flash.GotoFrame(flash.get_TotalFrames()-1);

“快退”按鈕代碼:
intcurrent=flash.CurrentFrame();
if(current>4)
{
current-=5;
flash.GotoFrame(current);
}
else
{
flash.put_FrameNum(0);
}

“快進(jìn)”按鈕代碼:
intcurrent=flash.CurrentFrame();
inti=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);

“關(guān)閉”按鈕代碼:
flash.put_Movie("http://");
KillTimer(m_nTimer); //停止計(jì)時(shí)器
CSliderCtrl*m_pSlider=(CSliderCtrl*)GetDlgItem(IDC_SLIDER1); 
m_pSlider->SetPos(0); //滑塊置零
timerflag=FALSE;////////////////////////////////
playflag=FALSE;////////////////////////////////

5。添加Slider控件的消息處理函數(shù)PreTranslateMessage()響應(yīng)的消息NM_RELEASEDCAPTURE
CSliderCtrl*m_pSlider=(CSliderCtrl*)GetDlgItem(IDC_SLIDER1); 
intnum=m_pSlider->GetPos();
num=num*flash.get_TotalFrames()/100;
flash.GotoFrame(num);

////////////////////////////////////////////////////////////////////////////////////
將下面代碼添加到,Dialog類(lèi)的OnInitDialog()函數(shù)中
CSliderCtrl*m_pSlider=(CSliderCtrl*)GetDlgItem(IDC_SLIDER1);
m_pSlider->SetRange(0,100); //設(shè)定Slider的活動(dòng)范圍是0~100

6。添加Dialog類(lèi)的OnTimer()函數(shù)響應(yīng)消息WM_TIMER
在OnTimer()函數(shù)中添加代碼:
CSliderCtrl*m_pSlider=(CSliderCtrl*)GetDlgItem(IDC_SLIDER1);
m_pSlider->SetPos(flash.CurrentFrame()*100/flash.get_TotalFrames());

7。在Dialog類(lèi)的DestroyWindow()函數(shù)中添加代碼:
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);
HWNDhwnd=this->GetSafeHwnd();
LONGstyle=GetWindowLongPtr(hwnd,GWL_STYLE);
SetWindowLongPtr(hwnd,GWL_STYLE,style-WS_CAPTION);
CClientDCdc(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。響應(yīng)按鍵ESC消息,取消全屏。
重載對(duì)話(huà)框的PreTranslateMessage()函數(shù),在函數(shù)中添加如下代碼:
if(pMsg->message==WM_KEYDOWN)
{
if(pMsg->wParam==VK_ESCAPE)
{
if(screenflag)
{
HWNDhwnd=this->GetSafeHwnd();
LONGstyle=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);
}

}
}

全屏和取消全屏的代碼,是俺自己拼湊所得,充其量只是個(gè)模擬效果,而且還是個(gè)模擬的不好的效果,如果有高手見(jiàn)到,希望能夠博您一笑。另外,在笑過(guò)之后還請(qǐng)您不吝賜教。俺一定以十二億萬(wàn)分的熱情接受。


 

本站僅提供存儲(chǔ)服務(wù),所有內(nèi)容均由用戶(hù)發(fā)布,如發(fā)現(xiàn)有害或侵權(quán)內(nèi)容,請(qǐng)點(diǎn)擊舉報(bào)。
打開(kāi)APP,閱讀全文并永久保存 查看更多類(lèi)似文章
猜你喜歡
類(lèi)似文章
slider控件移動(dòng)滑塊,動(dòng)態(tài)的顯示tooltip方法!
滑動(dòng)條控件(CSliderCtrl)使用說(shuō)明 - szflyming - 博客園
VC對(duì)話(huà)框隱藏運(yùn)行 (四)懸浮窗
設(shè)置鼠標(biāo)外觀(guān)
如何將視頻放到你的博客
vc++6.0使用串口控件例程
更多類(lèi)似文章 >>
生活服務(wù)
分享 收藏 導(dǎo)長(zhǎng)圖 關(guān)注 下載文章
綁定賬號(hào)成功
后續(xù)可登錄賬號(hào)暢享VIP特權(quán)!
如果VIP功能使用有故障,
可點(diǎn)擊這里聯(lián)系客服!

聯(lián)系客服