Нарисуйте линию, которая следует за мышью - PullRequest
1 голос
/ 07 сентября 2011

Я хочу загрузить изображение (PNG, JPG, растровое изображение), а затем хочу нарисовать линию на своем изображении.

В данный момент я использую PictureBox для загрузки своего изображения:

Вот часть MouseMove моего кода:

If mClickOne = True Then
    If Not mSetDrawPictureAlready Then
        g = Graphics.FromImage(picFormular.Image)
        mRawPicture = picFormular.Image
            mSetDrawPictureAlready = True
    End If
    If mChoosenDrawFunction = DrawFunction.Ausrichten Then
        g.Clear(Color.Transparent)
        g.DrawImage(mRawPicture, picFormular.Location)
        g.DrawLine(Pens.Red, New Point(mClickOnePosX, mClickOnePosY), New Point(e.X, e.Y))
        picFormular.Refresh()
    ElseIf mChoosenDrawFunction = DrawFunction.FeldMakieren Then
        'Missing Code
    Else
        'Nothing
    End If
End If

На этом я могу нарисовать линию с помощью щелчка на PointOne и щелчка на PointTwo, но моя картинка исчезает, если вызывается событие MouseMove, поэтому я рисую линию на чистой поверхности.

При первой попытке исправить проблему у меня возникла другая проблема.Если я нарисую свою линию, моя старая линия не исчезла.Итак, моя полная поверхность была заполнена тысячами строк.

Кто-нибудь из вас знает, как решить мою проблему?

...