在Painter1的mousemove里面做了这个事件代码:
Dim p As WinForm.Painter = e.Form.Controls("Painter1")
Dim g As Graphics = p.Graphics
g.Clear(Color.Transparent)
g.DrawLine(Pens.yellow, e.x, 0, e.x, 1000)
g.DrawLine(Pens.yellow, 0, e.y, 1000, e.y)
p.Repaint()
后续我想在mousedown里面加入代码,点击左键将红色十字线永久绘制到painter中,点击右键将绿色十字线永久绘制到painter中,鼠标移动的时候就不会清除这两个鼠标按钮点上去的十字线。
另外还有一个问题,不管是在painter中还是在panel中,我想将背景加载为硬盘中的一个图片文件,然后在这个图片文件上进行绘制。这个在哪个控件中可以实现?
[此贴子已经被作者于2023/11/15 0:14:13编辑过]