改一个老项目,想与把图像保存到本地磁盘,找来找去找到一个方法
Private Sub Print_Zuhyo_Rtn(ByVal sender As System.Object, ByVal e As System.Drawing.Printing.PrintPageEventArgs) Handles PrintDocument1.PrintPage
应该把e.Graphics保存下来就可以了,但是e.Graphics.save()没有参数,貌似没法保存本地,求助。
...全文
4525打赏收藏
Graphics中的图像怎样保存到磁盘上?
改一个老项目,想与把图像保存到本地磁盘,找来找去找到一个方法 Private Sub Print_Zuhyo_Rtn(ByVal sender As System.Object, ByVal e As System.Drawing.Printing.PrintPageEventArgs) Handles PrintDocument1.PrintPage 应该把e.Graphics保存下来就可以了,但是e.Graphics.save()没有参数,貌似没法保存本地,求助。
Dim bmp As New Bitmap(500, 550)
Dim g As Graphics = Graphics.FromImage(bmp)‘用这个画布替代打印过程中的绘图画布
’绘图过程比如
DrawText(g)
DrawLines(g)
' .............
bmp.Save("f:\a.bmp")
Dim newImage As Image = Image.FromFile("C:\Users\Dell\Desktop\aaa.jpg")
Dim ulCorner As New PointF(100.0F, 100.0F)
e.Graphics.DrawImage(newImage, ulCorner)
newImage.Save("C:\Users\Dell\Desktop\bbb.jpg")
直接save到原路径会报错,但是这样保存也是相当于aaa.jpg另存为,我是想把e.Graphics上画的图像保存下来
是这个意思吗?
Dim newImage As Image = Image.FromFile("C:\Users\Dell\Desktop\aaa.jpg")
Dim ulCorner As New PointF(100.0F, 100.0F)
e.Graphics.DrawImage(newImage, ulCorner)
这样是把指定的图片画到graphics上,但是我想保存e.Graphics上原来的图片啊