GDI+讲座系列一：如何实现复杂背景下的擦除效果

一、问题提出
经常看到有网友文这样的问题：“如何实现复杂背景下的擦除效果？”也有很多网友回答：“如果背景很复杂比如说图片，实现的可能不大！.NET提供的例子也是单色背景下的擦除啊！”
二、解决思路
先把原始image对象保存到一个临时的对象当中，随着鼠标的移动，截取图片上的一块区域，然后绘制到目标图形相同区域的位置上去。
三、实现方法
用过VB6.0的都知道API函数Bitblt吧，这个函数提供了复制源图形到目标图形指定位置的功能。利用该函数完全可以按照上述思路实现复杂背景下的擦除效果。
可是新的问题又出来了，因为.NET不支持hDC（设备上下文）了！当然我们也可以利用其他方法使得.NET支持hDC，在利用Bitblt函数实现该功能。难道强大的.NET就没有简单的方法实现这样一个在图形处理中常用的方法吗？回答是：“有！”
让我们来了解一下GDI+的工作过程吧！在GDI+中要绘制图形首先要创建Graphics（图形）对象，然后再利用Draw...（绘制方法，有很多）在Graphics对象上绘制。在众多的Draw...中有没有类似Bitblt函数的方法呢？有！就是DrawImage方法！！在DrawImage方法的众多重载中这样一个：
Overloads Public Sub DrawImage(Image, Rectangle, Single, Single, Single, Single, GraphicsUnit)
“在指定位置并且按指定大小绘制指定的Image 对象的指定部分。”
利用这个重载，我们完全可以实现复杂背景下的擦除功能！
四、例子
1，首先创建一个临时Image对象，用于保存原始背景图形
Dim imgBack As Image '用于保存背景图形的临时对象
imgBack = PictureBox1.Image '保存原始图形
2，在PictureBox1的MouseMove事件中实现擦除功能
Private Sub PictureBox1_MouseMove(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles PictureBox1.MouseMove

If e.Button = MouseButtons.Left Then
'根据鼠标移动位置确定目标区域
Dim dx, dy, dw, dh As Integer
dx = e.X : dy = e.Y : dw = 5 : dh = 5
'创建矩形目标区域
Dim destRect As New Rectangle(dx, dy, dw, dh)
'确定矩形度量单位
Dim units As GraphicsUnit = GraphicsUnit.Pixel
'实现擦除功能
PictureBox1.CreateGraphics.DrawImage(imgBack, destRect, dx, dy, dw, dh, units)
PictureBox1.Refresh()
End If
End Sub
五、后话
讲到这里很多人就要说：“原来这么简单啊！”其实真的就这么简单，.NET提供的GDI+对图形处理是相当强大的。只要大家肯动手钻研，多方面考虑问题，你就会发现GDI+是非常好的东东哦！