vb.net 教程 5-16 图像处理之ImageAttributes 类1 伽玛、阈值和颜色替换

前端之家收集整理的这篇文章主要介绍了vb.net 教程 5-16 图像处理之ImageAttributes 类1 伽玛、阈值和颜色替换前端之家小编觉得挺不错的,现在分享给大家,也给大家做个参考。
ImageAttributes 类:包含有关在呈现时如何操作位图和图元文件颜色的信息
ImageAttributes使用简单,先是通过ImageAttributes 提供的方法快速处理图片颜色,再使用Graphics的DrawImage()方法指定imageAttributes参数即可。

以下用代码方式来说明ImageAttributes 的一些方法使用代码前,必须 Imports System.Drawing.Imaging

改变图像伽玛值,注意 典型值为 gamma 参数是从 1.0 到 2.2 ; 但是,往往在 0.1 到 5.0 的值可能会证明在某些情况下很有用,代码中使用的是0.5
    '伽玛
    Private Sub Button2_Click(sender As Object,e As EventArgs) Handles Button2.Click
        Dim destImg As New Bitmap(sourceImg.Width,sourceImg.Height)

        Dim imageAttributes As New ImageAttributes()
        imageAttributes.SetGamma(0.5F)
        Dim g As Graphics = Graphics.FromImage(destImg)
        g.DrawImage(sourceImg,New Rectangle(0,sourceImg.Width,sourceImg.Height),sourceImg.Height,GraphicsUnit.Pixel,imageAttributes)

        picDest.Image = destImg
    End Sub
运行效果


改变图像阈值, 阈值大小应介于 0 和 1,代码中使用的是0.7
    Private Sub Button3_Click(sender As Object,e As EventArgs) Handles Button3.Click
        Dim destImg As New Bitmap(sourceImg.Width,sourceImg.Height)

        Dim imageAttributes As New ImageAttributes()
        imageAttributes.SetThreshold(0.7F)
        Dim g As Graphics = Graphics.FromImage(destImg)
        g.DrawImage(sourceImg,imageAttributes)

        picDest.Image = destImg
    End Sub
运行效果


颜色替换:
    '颜色替换
    Private Sub Button1_Click(sender As Object,e As EventArgs) Handles Button1.Click
        Dim destImg As New Bitmap(sourceImg.Width,sourceImg.Height)

        Dim mycolormap(0) As ColorMap
        mycolormap(0) = New ColorMap()

        mycolormap(0).OldColor = Color.Black
        mycolormap(0).NewColor = Color.Red

        Dim imageAttributes As New ImageAttributes()
        imageAttributes.SetRemapTable(mycolormap)
        Dim g As Graphics = Graphics.FromImage(destImg)
        g.DrawImage(sourceImg,imageAttributes)

        picDest.Image = destImg
    End Sub
运行效果

由于.net平台下C#和vb.NET很相似,本文也可以为C#爱好者提供参考。

学习更多vb.net知识,请参看 vb.net 教程 目录

原文链接:https://www.f2er.com/vb/256638.html

猜你在找的VB相关文章