タイトル : 画像の上書き保存 投稿日 : 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 よろしくお願いします。 |