(VB.net)画像の一部を切り取って,拡大・縮小したい
内容を見ていただき,ありがとうございます。
タイトルのままですが,PictureBoxに画像を出して,その一部を切り取ったうえで拡大・縮小させるプログラムを作成しています。
今のところ,画像の一部を切り出すことはできたのですが,これを拡大・縮小させる方法をご存じないでしょうか。画像の一部を切り出すソースは以下のとおりです。
まず,フォームにピクチャボックス(PictureBox1)とコマンドボタン(Button1)を配置し,ソリューションを置いているフォルダ内のbinフォルダにWinter.jpg(WinXPのマイピクチャに入っているものです)を入れておきます。次に,Button1のコードとして,以下のものを打ち込みました。
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
'Bitmapオブジェクトの作成(切り取り元画像の指定)
Dim bmap = New Bitmap("winter.jpg")
'切り取る範囲をRectanleで指定
Dim rect As New Rectangle(10, 20, 100, 200)
'PictureBox1のGraphicsオブジェクトの作成
Dim g As Graphics = PictureBox1.CreateGraphics()
'元の画像の指定部分を切り取ってPictureboxの左上隅(x,y = 0,0)に表示する.単位はピクセル.
g.DrawImage(bmap, 0, 0, rect, GraphicsUnit.Pixel)
'Graphicsオブジェクトを破棄
g.Dispose()
End Sub
以上です。
おそらく,DrawImageの部分を変えればいけるのではないかと思われるのですが,いかがでしょうか。ご助言よろしくお願いいたします。