我正在尝试向我的程序添加一项功能,以便在用户单击按钮时获取用户屏幕的完整屏幕截图。我让程序截取屏幕截图并打开文件对话框来保存它,保存有效。问题是,无论我如何保存屏幕截图,保存的图像都会出现显着的质量损失,并且文本和内容周围会出现像素化。这是一个大问题,因为我需要将图像保存为与用户屏幕上看到的完全一样,我根本不能有任何质量损失。我尝试将图像另存为 jpg 和 png,但两者都给我带来了质量损失。我想知道是否有人可以向我指出一些代码或方法,使我能够以与用户屏幕相同的质量保存屏幕截图。如果可能的话,我想将图像保存为 JPG 或 PNG 格式。任何帮助将不胜感激!
获取 Bitmap 格式的图像并将其另存为 bmp。
Private Function TakeScreenShot() As Bitmap
Dim screenSize As Size = New Size(My.Computer.Screen.Bounds.Width, My.Computer.Screen.Bounds.Height)
Dim screenGrab As New Bitmap(My.Computer.Screen.Bounds.Width, My.Computer.Screen.Bounds.Height)
Dim g As Graphics = Graphics.FromImage(screenGrab)
g.CopyFromScreen(New Point(0, 0), New Point(0, 0), screenSize)
Return screenGrab
End Function
本文内容由网友自发贡献,版权归原作者所有,本站不承担相应法律责任。如您发现有涉嫌抄袭侵权的内容,请联系:hwhale#tublm.com(使用前将#替换为@)