以文本方式查看主题 - Foxtable(狐表) (http://foxtable.net/bbs/index.asp) -- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2) ---- painter图片保存 (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=123659) |
-- 作者:colink -- 发布时间:2018/8/20 16:33:00 -- painter图片保存 我在painter画图,用p.Save()保存图片,但是保存的图片清晰度很低,有什么办法保存成清晰度高的图片吗? |
-- 作者:有点蓝 -- 发布时间:2018/8/20 16:55:00 -- 绘图分辨率设置大一点,不要保存为gif |
-- 作者:colink -- 发布时间:2018/8/20 17:02:00 -- 用g.FillRectangle(Brushes.Red,10,10,100,50)画的,分辨率怎么设置,我保存的是png |
-- 作者:有点蓝 -- 发布时间:2018/8/20 17:28:00 -- 请上传实例测试 |
-- 作者:colink -- 发布时间:2018/8/20 18:09:00 -- Dim p As WinForm.Painter = e.Form.Controls("Painter1") Dim g As Graphics = p.Graphics Dim br As Brush = Brushes.black Dim i,i1,x,y As Integer For i=0 To 41 For i1=0 To 41 x=6*i1+1+2 y=6*i+1+2 g.FillRectangle(Brushes.black ,x,y,3,3) Next Next p.repaint() p.Save("C:\\Users\\lance\\Desktop\\模板.png") |
-- 作者:有点蓝 -- 发布时间:2018/8/20 20:22:00 -- 也就这种效果了。狐表毕竟不是专业用来绘图的 |