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

来源：互联网发布：淘宝肛塞买家秀编辑：程序博客网时间：2024/06/05 10:08

一、问题提出

经常看到有网友文这样的问题：“如何实现复杂背景下的擦除效果？”也有很多网友回答：“如果背景很复杂比如说图片，实现的可能不大！.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+是非常好的东东哦！