GrayScale Image in VB.NET

The PixelFormats class is used to represent image pixel formats. The class has about 2 dozens of static properties representing various pixel formsts such as BlackWhite, Gray16, Gray32Float, Gray8, Rgba64 and so on.
  • 6430

The PixelFormats class is used to represent image pixel formats. The class has about 2 dozens of static properties representing various pixel formsts such as BlackWhite, Gray16, Gray32Float, Gray8, Rgba64 and so on.

To apply pixel formatting of an image, we use DestinationFormat property of FormatConvertedBitmap. The Source property of FormatConvertedBitmap is the original BitmapImage that you would like to convert to gray scale.

Listing 43 creates a FormatConvertedBitmap from a BitmapImage and sets its DestinationFormat to Gray8.

    Private Sub ConvertImageToGrayScaleImage()
        ' Create an Image control
        Dim grayImage As New Image()
        ' Create a BitmapImage and sets its DecodePixelWidth and DecodePixelHeight
        Dim bmpImage As New BitmapImage()
        bmpImage.BeginInit()
        bmpImage.UriSource = New Uri("C:\Images\Garden.jpg", UriKind.RelativeOrAbsolute)
        bmpImage.EndInit()
        ' Create a new image using FormatConvertedBitmap and set DestinationFormat to GrayScale
        Dim grayBitmap As New FormatConvertedBitmap()
        grayBitmap.BeginInit()
        grayBitmap.Source = bmpImage
        grayBitmap.DestinationFormat = PixelFormats.Gray8
        grayBitmap.EndInit()
        ' Set Source property of Image
        grayImage.Source = grayBitmap
        LayoutRoot.Children.Add(grayImage)
    End Sub

Listing 43

The output of Listing 43 generates Figure 47 which is a gray image.

GrayScaleImg.jpg

Figure 47

Categories

More Articles

© 2019 DotNetHeaven. All rights reserved.