以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  绘图问题  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=65463)

--  作者:pcxjxjhkw
--  发布时间:2015/3/16 21:24:00
--  绘图问题
帮助中有在绘图板中绘图或加文字, 问题:在图片框中如何绘图或加文字?谢谢了!
--  作者:有点甜
--  发布时间:2015/3/16 21:29:00
--  

一样 Dim g As Graphics = 图片控件.BaseControl.CreateGraphics

 

得到g对象以后,随便画


--  作者:pcxjxjhkw
--  发布时间:2015/3/16 21:39:00
--  
甜老师,如何显示出来呢?
--  作者:pcxjxjhkw
--  发布时间:2015/3/16 21:44:00
--  
无法用repaint
--  作者:有点甜
--  发布时间:2015/3/16 21:57:00
--  

 或者

 

Dim pic = e.Form.Controls("PictureBox1")
Dim g = Graphics.FromImage(pic.Image)
g.DrawLine(Pens.Red,30,0,30,60)
g.DrawLine(Pens.Red,0,30,60,30)
pic.basecontrol.refresh


--  作者:pcxjxjhkw
--  发布时间:2015/3/16 22:00:00
--  
甜老师,仍未显示出来!
--  作者:有点甜
--  发布时间:2015/3/16 22:04:00
--  
 那看5楼
--  作者:pcxjxjhkw
--  发布时间:2015/3/16 22:09:00
--  
甜老师,那又删除已绘制的呢?
--  作者:有点甜
--  发布时间:2015/3/16 22:10:00
--  
以下是引用pcxjxjhkw在2015/3/16 22:09:00的发言:
甜老师,那又删除已绘制的呢?

 

画之前,先保存一份。