CSDN博客

img iBreathe

VC实现动画应用两则

发表于2001/5/19 9:23:00  1379人阅读

分类: Visual C++

VC实现动画应用两则

华北石油研究院
李莉莉

---- Windows(9x)支持的VC曾是应用最广的语言之一,现在仍然有着广大的用户。笔者是VC的“信徒”之一,在这上面耗费了不少时间,与将笔者的两则应用实例介绍给大家,希望能与大家共同交流。

---- 一.在VC中实现快速动画

---- 快速动画是指每隔一段很小的时间间隔就快速擦去原有画面,并重新画上新的画面的动画技术。快速动画成功的关键就在于擦去和重画的速度必须很快,否则画面就会有闪烁现象。

---- 在VB中制作快速动画比较简单,只要把窗体的AutoRedraw属性设置为true,再直接调用API函数BitBlt,画完一帧Refresh一次。但VC的窗体没有AutoRedraw属性,只要一使用BitBlt,窗体就会自动刷新,由于一帧画面往往要几次用到BitBlt,画面就闪烁起来了。解决的办法就是自己定义一个不可见的缓冲区,其大小应与目标窗体相同,先在缓冲区上把一帧的画面画完,再用一次BitBlt函数把缓冲区的图案贴到窗体上。请看下例: //在TForm1 *Form1;的后面添上这三句

Graphics::TBitmap *p;Graphics::TBitmap *q;
int xx=0;//---------------------
void __fastcall TForm1::FormCreate
(TObject *Sender)
{p=new Graphics::TBitmap;
//这存放的就是要贴到窗体上的小图案
p->Handle=LoadBitmap(HInstance,"aaa");
//从资源文件中载入小图案
q=new Graphics::TBitmap;//定义缓冲区qq- >Width=Width;
//使缓冲区的大小与窗体相同
q- >Height=Height;PatBlt(q- >Canvas- > 
Handle,0,0,q- >Width,q- >Height,0);
//把缓冲区的背景变为黑色}
//-------?
void __fastcall TForm1::FormDestroy
(TObject *Sender)
{//程序结束时释放内存delete p;
delete q;}//--------------------
void __fastcall TForm1::Timer1Timer
(TObject *Sender)
{//窗体上要加上一个Timer控件
xx+=2;PatBlt(q- >Canvas- >Handle,
0,0,Width,Height,0);
//把缓冲区的背景变为黑色,同时擦去了旧的画面

BitBlt(q- >Canvas- >Handle,xx,0,p- >
Width,p- >Height,
p- >Canvas- >Handle,0,0,SRCCOPY);
//正在缓冲区上制作一帧的画面,这几句是不可见的
BitBlt(q- >Canvas- >Handle,xx,50,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);
BitBlt(q- >Canvas- >Handle,xx,150,p- >
Width,p- >Height,
p- >Canvas- >Handle,0,0,SRCCOPY);
BitBlt(q- >Canvas- >Handle,xx,200,p- >
Width,p- >Height,
p- >Canvas- >Handle,0,0,SRCCOPY);
BitBlt(q- >Canvas- >Handle,xx,250,p- >
Width,p- >Height,
p- >Canvas- >Handle,0,0,SRCCOPY);
BitBlt(q- >Canvas- >Handle,xx,300,p- >
Width,p- >Height,
p- >Canvas- >Handle,0,0,SRCCOPY);
BitBlt(Canvas- >Handle,0,0,Width,
Height,q- >Canvas- >
Handle,0,0,SRCCOPY);
//把缓冲区的画面贴到窗体上}

---- 如果实际应用时,像上面的程序那样,把画动画的语句放在Timer控件的OnTimer事件中,就可能会有一个小问题。如果用户暂停了动画,窗体又正好产生了重画事件(比如窗体被最小化后又被恢复),那窗体上的画面就会消失。这是因为窗体被重画时,只画了窗体的通用部分,Windows并不知道原来的窗体上有自定义的画面。要想让Windows把画面恢复原样,必须把画动画的语句放在窗体的OnPaint事件中,Timer控件的OnTimer事件中只写决定图案位置的语句(如本例中的xx+=2;)和一句RePaint。修改后具体的程序我就省略了,大家可以自己完成。

---- 二.在VC程序中插入微型动画

---- 下面利用CImageList类保存数幅画面,利用Draw函数在一定的时间间隔播放出来,形成了类似GIF动画的效果。该方法可以在Window的客户区内、工具条上、状态条上播放动画。这里还给出了利用SetIcon函数在窗口标题栏上播放动画的方法。

---- (一)、原理

---- 在VC中有一个CImageList类可以以图像列表的方式管理图像,图像列表中的图像大小相同,索引以0为开始,每个图像都可以单独引用。Microsoft 的API提供了一系列的函数,您可以利用这些函数创建、销毁图像列表,可以显示图像、增加和删除图像,替代、合并和拖动图像。

---- CImageList 类提供了Windows图像列表通用控件功能。下面对本文用到的函数简要说明如下:

BOOL Create( int cx, int cy, UINT
 nFlags, int nInitial, intnGrow );

---- 该函数用于创建一个图像列表。 cx,cy 是每个图像的宽度和高度;nFlags是图像列表的类型,其值仅可包含一个ILC_COLOR值。其详细取值参见VC在线帮助。nInitial为图像列表最初含有的图像数目;nGrow为当图像数量需要改变时,每次动态增长的图像数。

BOOL Draw( CDC* pdc, int nImage, 
POINT pt, UINT nStyle );

---- 该函数用于显示一个图像。pdc为目标设备上下文的指针;nImage为要显示的图像索引;pt为图像显示的位置;nStyle为图像显示风格,详见在线帮助。

HICON ExtractIcon( int nImage );
利用该函数可以得到一函数的句柄:

int Add( HICON hIcon );
该函数把一个图像加入图像列表中。

---- (二)、编程与实现

---- 首先,建立图表资源。在VC6.0中利用资源编辑器,建立几幅图表,IDI_ICON1、IDI_ICON2、IDI_ICON3......在编辑图标时选择Custom,将图标设置成大小为64X32。由于Windows的各个部件不完全相同,其实现方法也不完全相同,下面对在窗口不同位置显示动画的方法分别加以介绍。

---- 1. 在View类客户区绘制动画

---- 在类的定义文件中加入下列变量:

POINT pt1;//图像显示的位置
int m_Play; //将要显示图像的索引
void CreateImageList();//创建图像列表的函数
CImageList m_ImageList1;//图像列表对象
int m_ImageNumber; //图像列表中图像的总数目
首先初始化pt1.m_Play、m_ImageNumber:
CImageView::CImageView()
{
// TODO: add construction code here
pt1.x =1;
pt1.y =1;
m_Play=0;
m_ImageNumber=0;
}
CreateImageList()的实现如下:
void CImageView::CreateImageList()
{
m_ImageList1.Create (64,32,ILC_COLOR,5,2);
HICON hIcon = ::LoadIcon(AfxGetResource-
Handle(),MAKEINTRESOURCE(IDI_ICON1));
m_ImageList1.Add(hIcon);
m_ImageNumber++;
hIcon = ::LoadIcon(AfxGetResourceHandle(),
MAKEINTRESOURCE(IDI_ICON2));
m_ImageList1.Add(hIcon);
m_ImageNumber++;
hIcon = ::LoadIcon(AfxGetResourceHandle(),
MAKEINTRESOURCE(IDI_ICON3));
m_ImageList1.Add(hIcon);
m_ImageNumber++;
//把您要播放的所有资源加入图像列表。
}
在OnCreate函数中设置计时器,并创建图像列表:
int CImageView::OnCreate(LPCREATESTRUCT
lpCreateStruct)
{
if (CView::OnCreate(lpCreateStruct) == -1)
return -1;
// TODO: Add your specialized creation code here
CreateImageList();
SetTimer(1,500,NULL);
return 0;
}
响应ON_TIMER消息,显示动画:
void CImageView::OnTimer(UINT nIDEvent)
{
// TODO: Add your message handler code
 here and/or call default
CDC *pDC=GetDC();
if(m_Play >m_ImageNumber)
m_Play=0;
m_ImageList1.Draw(pDC,m_Play,pt1,
ILD_TRANSPARENT);
m_Play++;
ReleaseDC(pDC);
CView::OnTimer(nIDEvent);
}

---- 最后别忘了在OnDestroy函数中,增加在窗口撤销时中止定时器的代码。

---- 2. 在状态条上显示动画

---- 由于状态条也是窗口,所以也可以在其上显示动画。在CMainFrame类中可以看到下列代码:

protected: // control bar embedded members
CStatusBar m_wndStatusBar;

---- 所以为了在状态条上显示动画,其编程代码应在CMainFrame类中加入。首先创建资源文件和图像列表类,具体方法和代码见View类客户区绘制动画一节,此处不再重复。下面给出ON_TIMER的响应函数:

void CMainFrame::OnTimer(UINT nIDEvent)
{
// TODO: Add your message handler code 
here and/or call default
if(m_Play >m_ImageNumber)
m_Play=0;//如果图画为最后一个,显示第一幅图片
CDC *pDC=this- >m_wndStatusBar. GetDC();
ASSERT(pDC!=NULL);
pt1.x=1;
pt1.y =1;
m_ImageList1.Draw(pDC,m_Play,pt1,
ILD_TRANSPARENT);
ReleaseDC(pDC);
m_Play++;
CFrameWnd::OnTimer(nIDEvent);
}

---- 上述代码将在状态条左上方播放动画。

---- 3. 在工具栏上播放动画

---- 由于工具栏的性质与状态条差不多,其播放动画的方法也相似,下面给出ON_TIMER的响应函数:

void CMainFrame::OnTimer(UINT nIDEvent)
{
// TODO: Add your message handler 
code here and/or call default
if(m_Play >m_ImageNumber)
m_Play=0;//如果图画为最后一个,显示第一幅图片
CRect rect;
CDC *pDC;
pDC=this- >m_wndToolBar.GetDC();
ASSERT(pDC!=NULL);
this- >m_wndToolBar.GetClientRect(&rect);
//获得显示有效区域
pt1.x =rect.right -64; //将显示位置定在最右边
pt1.y=1;
m_ImageList1.Draw(pDC,m_Play,pt1,ILD_TRANSPARENT);
ReleaseDC(pDC);
m_Play++;
CFrameWnd::OnTimer(nIDEvent);
}

---- 上述代码将在工具栏右上方播放动画。但如仔细观察,动画的位置并不是靠近窗口最右边,这是因为工具栏的窗口有边界,采用如下方法,可以把画面移到窗口右边:

pDC=GetDC ();//获得CMainFrame的画图设备指针
ASSERT(pDC!=NULL);
this- >GetClientRect(&rect);
pt1.x =rect.right-64 ;
pt1.y=rect.top+3 ;
m_ImageList1.Draw(pDC,m_Play,pt1,ILD_TRANSPARENT);
ReleaseDC(pDC);
这是因为工具栏占据的位置属于CMainFrame的客户区。

---- 4. 使图标变成动画

---- 在CWnd类中有一个函数:

HICON SetIcon( HICON hIcon, BOOL bBigIcon);
可以改变窗口的图标,所以您可以通过使用该
函数不断地改变图标使图标动起来,效果像GetRight
一样。 在OnTimer函数中加入下列代码:
SetIcon(m_ImageList1.ExtractIcon(m_Play),FALSE);

---- 就可以使图标动起来。当然为了使程序工作得更好,您最好重建一套图标资源。

0 0

相关博文

我的热门文章

img
取 消
img