Back to Top

プログラムの覚書

VB.NET AForge 画像にぼかしを加える

AForgeを使用して、画像にぼかしを加える方法を記載します。

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

Blurクラスを使用して画像にぼかしを加える

Dim FilePath As String = "C:\work\imgsample01.jpg"
Dim img As System.Drawing.Image = System.Drawing.Image.FromFile(FilePath)
 
'ぼかしを加える
Dim blurFilter As Blur = New Blur()
Dim blurImage As Bitmap = blurFilter.Apply(img)

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

  

※ぼかしを加える際、Jitterクラス(ジッター)で揺らぎを加えるなどした後で行うと効果的です。

 

Posted in AForge | Leave a reply

VB.NET AForge 画像のジッター化

AForgeを使用して、画像に揺らぎ(ジッター)を加える方法を記載します。

ジッター は、信号波形の揺らぎ自身や、その揺らぎによって生じる映像などの乱れのことです。

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

Jitter クラスを使用して画像に揺らぎ(ジッター)を加える

Dim FilePath As String = "C:\work\imgsample01.jpg"
Dim img As System.Drawing.Image = System.Drawing.Image.FromFile(FilePath)
 
'ジッター画像に変換
Dim jitterFilter As Jitter = New Jitter()
Dim jitterImage As Bitmap = jitterFilter.Apply(img)
 
'ピクチャーボックスに表示
PictureBox1.Image = jitterImage

  

 

Posted in AForge | Leave a reply