ぷろぐらむノート

AForgeを使用して、画像のHSL色空間で彩度値を調整するフィルタの使用方法を記載します。

AForge.Imaging.Filters をインポートします。

SaturationCorrectionクラスを使用して彩度調整する

彩度調整は、HSL色空間で、ピクセルの彩度値を調整します。

彩度値は指定された割合で増加・減少します。

Dim FilePath As String = "C:\work\imgsample01.jpg"
Dim img As System.Drawing.Image = System.Drawing.Image.FromFile(FilePath)
 
'HSL色空間での彩度調整
Dim scFilter As SaturationCorrection = New SaturationCorrection(-0.3)
Dim scImage As Bitmap = scFilter.Apply(img)
 
'ピクチャーボックスに表示
PictureBox1.Image = scImage

AForgeを使用して、画像簡単にグレース化する方法を記載します。

AForge.Imaging.Filters をインポートします。

Grayscale クラスを使用してグレース化

Dim FilePath As String = "C:\work\imgsample01.jpg"
Dim img As System.Drawing.Image = System.Drawing.Image.FromFile(FilePath)

'グレース画像を作成するフィルターを作成する
Dim GrayFilter As Grayscale = New Grayscale(0.2125, 0.7154, 0.0721)

'グレース画像を取得する
Dim GryImage As Bitmap = GrayFilter.Apply(img)

'ピクチャーボックスに表示
PictureBox1.Image = GryImage

Grayscale クラスのパラメータは、色変換の係数で、左からR・G・Bです。

上記では、BT.709のグレースケール 赤：0.2125　緑：0.7154　青：0.0721　に設定しています。

BT.601 の場合は、赤：0.299　緑：0.587　青：0.114　などあります。