API实现完美的图片出现效果

《API实现完美的图片出现效果》由会员上传分享，免费在线阅读，更多相关内容在教育资源-天天文库。

1、API实现完美的图片出现效果作者：罗玉强在用VisualBasic编程的时候，通常要调用图片，如果图片出现的时候是以各种完美的效果出现的，（如马赛克效果，百叶窗效果等）则你的程序就会显得更加灵活，你的程序就会更加专业化。本文讲述了VisualBasic中如何调用API函数，以及用API函数中的BitBlt函数实现各种完美的图片出现效果的过程。§1一般的图片出现效果　　一般情况下，要使VisualBasic中的图片出现，例如，要显示Picture1中的图片，只需一句代码：Picture1.Visible=True　　使用以上方法时，图片是突然出现

2、的。也可以编复杂一点的代码，使图片从左到右、从上到下或从中间向四周扩大。例如，使Picture1中的图片从左到右出现，其代码为：Picture1.Width=0Picture1.Visible=TrueFori=0To5000Step50注释：5000代表图片的高度Picture1.Width=iNexti使Picture1中的图片从上到下出现的代码为：Picture1.Height=0Picture1.Visible=TrueFori=0To4000Step40注释：4000代表图片的宽度Picture1.Height=iNexti使Pict

3、ure1中的图片从中间向四周扩大的代码为：Picture1.Width=0Picture1.Height=0Picture1.Visible=TrueFori=0To100Picture1.Width=Picture1.Width+50Picture1.Height=Picture1.Height+40Picture1.Left=Picture1.Left-100Picture1.Top=Picture1.Top-80Nexti　　当然，你可以灵活地应用以上办法实现其他更加好看的图片出现效果。然而，同Authorware等其他软件编制的程序相比

4、，你的图片出现效果仍然会黯然失色，因为Authorware编程时，可以很容易地实现从上到下、从左到右、百叶窗、开门、关门等完美的图片出现效果，要在VisualBasic中做到这些效果并非易事。但“天无绝人之路”，强大的WindowsAPI函数中的BitBlt函数将帮助您实现这一愿望。§2BitBlt函数一、BitBlt函数的功能BitBltAPI函数的功能是将屏幕上任何一块拷贝到屏幕上其它任何一个地方。二、声明BitBlt函数1.运行VisualBasic4.0程序组中的APITextViewer程序项。2.在APITextViewer中，单击

5、File菜单下的LoadTextFile...命令。3.在出现的SelectaTextAPIFile对话框中，选择Win32api.txt文件。4.为了使以后拷贝WindowsAPI函数更快，你可以将Win32api.txt文件转换成为一个数据库。如图，单击“是（Y）”。5.在APIType下拉框中选择Declare。6.在AvailableItems中选择BitBlt，如图，单击Add按纽，于是BitBlt便出现在SelectedItems框中，单击Copy按纽。BitBlt函数变拷贝到剪贴板上。7.关闭APITextViewer，打开Vis

6、ualBasic程序，使用Insert菜单下的Module命令新建一个Module1，使用Edit菜单下的Paste命令，将剪贴板上的BitBlt函数拷贝到Module1中。这样，在您的程序中，就可以使用BitBlt函数了。三、BitBlt函数中各参数简介DeclareFunctionBitBltLib"gdi32"(ByValhDestDCAsLong,ByValXAsLong,ByValYAsLong,ByValnWidthAsLong,ByValnHeightAsLong,ByValhSrcDCAsLong,ByValxSrcAsLong

7、,ByValySrcAsLong,ByValdwRopAsLong)AsLong　　以上是BitBlt函数的声明格式，其中，各参数定义如下：参数描述hDestDC接收位图的设备描述表X目标矩形左上角的逻辑X坐标Y目标矩形左上角的逻辑Y坐标nWidth目标矩形的宽度nHeight目标矩形的高度hSrcDC源设备描述表xSrc源位图左上角的逻辑X坐标ySrc源位图左上角的逻辑Y坐标dwRop拷贝模式dwRop的各种可能值为：&HCC0020dest=source&HEE0086dest=sourceORdest&H8800C6dest=source

8、ANDdest&H660046dest=sourceXORdest&H440328dest=sourceAND(NOTdest)&H330008des