vc實現(xiàn)動畫應(yīng)用兩則-wenkub
2022-09-15 16:49:02 本頁面
【正文】 q Canvas Handle， xx， 300， p Width， p Height， p Canvas Handle， 0， 0， SRCCOPY)。 BitBlt(q Canvas Handle， xx， 100， p Width， p Height， p Canvas Handle， 0， 0， SRCCOPY)。}// void __fastcall TForm1::Timer1Timer (TObject *Sender) {//窗體上要加上一個 Timer控件 xx＋ =2。 //使緩沖區(qū)的大小與窗體相同 q Height=Height。// void __fastcall TForm1::FormCreate (TObject *Sender) {p=new Graphics::TBitmap。請看下例： //在 TForm1 *Form1?？焖賱赢嫵晒Φ年P(guān)鍵就在于擦去和重畫的速度必須很快，否則畫面就會有閃爍現(xiàn)象。 在 VB 中制作快速動畫比較簡單，只要把窗體的 AutoRedraw 屬性設(shè)置為 true，再直接調(diào)用 API函數(shù) BitBlt，畫完一幀 Refresh一次。的后面添上這三句 Graphics::TBitmap *p。 //這存放的就是要貼到窗體上的小圖案 pHandle=LoadBitmap(HInstance， aaa)。PatBlt(q Canvas Handle， 0， 0， q Width， q Height， 0)。PatBlt(q Canvas Handle， 0， 0， Width， Height， 0)。 BitBlt(q Canvas Handle， xx， 150， p Width， p Height， p Canvas Handle， 0， 0， SRCCOPY)。 BitBlt(Canvas Handle， 0， 0， Width， Height， q Canvas Handle， 0， 0， SRCCOPY)。要想讓 Windows 把畫面恢復(fù)原樣，必須把畫動畫的語句放在窗體的 OnPaint事件中， Timer控件的 OnTimer事件中只寫決定圖案位置的語句 (如本例中的 xx＋ =2； )和一句 RePaint。這里還給出了利用 SetIcon函數(shù)在窗口標題欄上播放動畫的方法。下面對本文用到的函數(shù)簡要說明如下 : BOOL Create( int cx, int cy, UINT nFlags, int nInitial, intnGrow )。其詳細取值參見 VC 在線幫助。 該函數(shù)用于顯示一個圖像。nStyle為圖像顯示風(fēng)格 ,詳見在線幫助。
公司管理相關(guān)推薦
鄂ICP備17016276號-1