タイトル | : 画像の上書き保存 |
記事No | : 4495 |
投稿日 | : 2006/11/05(Sun) 19:22 |
投稿者 | : 優 |
いつもお世話になっています。 下のようなコードで、上書き保存をしようと思います。 しかし、コードのbeforeimage.Save(afterimage)の部分で、externalexceptionのハンドルがスローされ、 「GDI+で汎用エラーが発生しました。」となってしまいます。 ファイルを削除するところまではできるのです。 普通に名前をつけて保存のほうでは、例外が出ません。 なぜ上書き保存のときだけ、エラーが出てしまうのでしょうか? 上書き保存と名前をつけて保存のコードを書いておきます。
'上書き保存 Private Sub 上書き保存SToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e _ As System.EventArgs) Handles 上書き保存SToolStripMenuItem.Click, ToolStripButton3.Click Dim beforeimage As Image = PictureBox1.Image Dim afterimage As String = OpenFileDialog1.FileName OpenFileDialog1.Dispose() OpenFileDialog1.FileName = Nothing PictureBox1.Image = Nothing File.Delete(afterimage) beforeimage.Dispose() beforeimage.Save(afterimage) End Sub
'名前をつけて保存 Private Sub 名前をつけて保存AoolStripMenuItem_Click(ByVal sender As System.Object, ByVal e _ As System.EventArgs) Handles 名前を付けて保存AoolStripMenuItem.Click, ToolStripButton2.Click If SaveFileDialog1.ShowDialog = Windows.Forms.DialogResult.OK Then PictureBox1.Image.Save(SaveFileDialog1.FileName) End If Application.DoEvents() End Sub
よろしくお願いします。
|