|
分類:[VB.NET/VB2005 以降]
2015/09/18(Fri) 17:01:55 編集(投稿者) 2015/09/18(Fri) 17:01:44 編集(投稿者)
VB2010 Windows7 で開発をしています。
【画像の任意座標部分の切り取りについて】で教えて頂いたコードから、
今回は、その処理を繰り返し使用しようとしています。 画像の大きさは3300×2334ピクセルです。
Imports System.Drawing.Drawing2D
Public Class Form1
Private Sub Button1_Click(sender As System.Object, e As System.EventArgs) Handles Button1.Click
for i = 1 to 100 Dim canvas As New Bitmap(PictureBox1.Width, PictureBox1.Height) '☆☆☆ Dim g As Graphics = Graphics.FromImage(canvas)
Dim bmp As New Bitmap("e:\~01_VisualBasicサンプルPG作成\20150907_vb2010_画像Clip\clip_Bmp.bmp") g.DrawImage(bmp, 0, 0, bmp.Width, bmp.Height) bmp.Dispose()
' <<<<-------画像を部分的に切り取ったり、ピクセル数を数えたりする処理
' ----- 描画先 Dim cut_canvas As New Bitmap(PictureBox2.Width, PictureBox2.Height) '☆☆☆ Dim cut_g As Graphics = Graphics.FromImage(cut_canvas)
cut_g.Clip = rgn cut_g.DrawImage(canvas, 0, 0)
PictureBox2.Image = cut_canvas cut_g.Dispose() rgn.Dispose() g.Dispose() next i
End Sub End Class
一部省略したりしていますが、このような流れで処理を行っています。 '☆☆☆ の部分の箇所で、メモリ不足であったり、使用されたパラメーターが有効ではありません。の メッセージを表示します。
dispose()も実行していますが、サイズが大きい画像を繰り返し表示するのは難しいのでしょうか?
|