求帮助:在图上去掉一条线,再画上另一条线
我用vb的picture画了一个采集到的数据曲线,希望点一下鼠标就在鼠标的当前位置添加一个交叉线。我是在picture的mousemove中作的。但是当我新点击一个位置后,新的位置上出现了交叉线,但是旧的交叉线始终存在。
请问大家,如果希望每次点击都能去掉旧的交叉线,那该如何操作呢?我的数据曲线点很多,完全重绘一次很耗时间。
谢谢!
交叉线部分是在picture的mousemove中画的:
Dim retval As Long
Dim Pnt As POINTAPI
GetCursorPos Pnt
retval = ScreenToClient(Picture1.hwnd, Pnt)
MoveToEx Picture1.hdc, Pnt.x, 0, 0&
LineTo Picture1.hdc, Pnt.x, Picture1.Height
谢谢!
[解决办法]
偏方:
记住上一次的位置。在点击新位置时,先在上一次的位置用背景色重绘旧交叉线,然后在新位置用前景色绘制新线,保存新位置。
[解决办法]