vc實(shí)現(xiàn)動(dòng)畫應(yīng)用兩則-展示頁(yè)
2024-09-16 16:49本頁(yè)面
【正文】 Handle， 0， 0， SRCCOPY)。 //正在緩沖區(qū)上制作一幀的畫面，這幾句是不可見的 BitBlt(q Canvas Handle， xx， 50， p Width， p Height， p Canvas Handle， 0， 0， SRCCOPY)。PatBlt(q Canvas Handle， 0， 0， Width， Height， 0)。 delete q。PatBlt(q Canvas Handle， 0， 0， q Width， q Height， 0)。//定義緩沖區(qū) qq Width=Width。 //這存放的就是要貼到窗體上的小圖案 pHandle=LoadBitmap(HInstance， aaa)。 int xx=0。的后面添上這三句 Graphics::TBitmap *p。解決的辦法就是自己定義一個(gè)不可見的緩沖區(qū)，其大小應(yīng)與目標(biāo)窗體相同，先在緩沖區(qū)上把一幀的畫面畫完，再用一次 BitBlt函數(shù)把緩沖區(qū)的圖案貼到窗體上。 在 VB 中制作快速動(dòng)畫比較簡(jiǎn)單，只要把窗體的 AutoRedraw 屬性設(shè)置為 true，再直接調(diào)用 API函數(shù) BitBlt，畫完一幀 Refresh一次。VC 實(shí)現(xiàn)動(dòng)畫應(yīng)用兩則 一 .在 VC 中實(shí)現(xiàn)快速動(dòng)畫 快速動(dòng)畫是指每隔一段很小的時(shí)間間隔就快速擦去原有畫面，并重新畫上新的畫面的動(dòng)畫技術(shù)。快速動(dòng)畫成功的關(guān)鍵就在于擦去和重畫的速度必須很快，否則畫面就會(huì)有閃爍現(xiàn)象。但 VC 的窗體沒有 AutoRedraw屬性，只要一使用 BitBlt，窗體就會(huì)自動(dòng)刷新，由于一幀畫面往往要幾次用到 BitBlt，畫面就閃爍起來了。請(qǐng)看下例： //在 TForm1 *Form1。Graphics::TBitmap *q。// void __fastcall TForm1::FormCreate (TObject *Sender) {p=new Graphics::TBitmap。 //從資源文件中載入小圖案 q=new Graphics::TBitmap。 //使緩沖區(qū)的大小與窗體相同 q Height=Height。 //把緩沖區(qū)的背景變?yōu)楹谏?} // ? void __fastcall TForm1::FormDestroy (TObject *Sender) {//程序結(jié)束時(shí)釋放內(nèi)存 delete p。}// void __fastcall TForm1::Timer1Timer (TObject *Sender) {//窗體上要加上一個(gè) Timer控件 xx＋ =2。 //把緩沖區(qū)的背景變?yōu)楹谏?，同時(shí)擦去 了舊的畫面 BitBlt(q Canva
公司管理相關(guān)推薦
鄂ICP備17016276號(hào)-1