Как сделать на форме видимой картинку во время ее перемещения мышью? - Visual Basic .NET

Формулировка задачи:

Здравствуйте. Есть код перемещения картинки (.gif) по форме.

Private Sub PictureBox1_MouseMove(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles PictureBox1.MouseMove
        WndProc(Message.Create(PictureBox1.Handle, &HA1, CType(2, IntPtr), 0))
        PictureBox1.Capture = False
    End Sub

При нажатии мыши и перемещении картинки видна только ее рамка. Как сделать картинку видимой при ее перемещении?

Решение задачи: «Как сделать на форме видимой картинку во время ее перемещения мышью?»

textual
                            Листинг программы 
                        

                                Private Sub PictureBox1_MouseDown(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles PictureBox1.MouseDown
        PictureBox1.Capture = False : Me.WndProc(Message.Create(PictureBox1.Handle, &HA1, 2, IntPtr.Zero))
    End Sub
                        

Оцени полезность:

13 голосов , оценка 3.923 из 5

Похожие ответы