Breadcrumbs

[Bogoh67]

First mak a new project then make it
transparency color=red
forecolor=red
backcolor=red

then add a picture box with a gif


make the picturebox sizemode autosize


then right click the form and click veiw code

delete all code found and copy and paste this

Code: Select all

Public Class Form1
    Dim NewPoint As New System.Drawing.Point()
    Dim X, Y As Integer

    Private Sub PictureBox1_MouseDown(ByVal sender As System.Object, ByVal e As System.Windows.Forms.MouseEventArgs)
        X = Control.MousePosition.X - Me.Location.X
        Y = Control.MousePosition.Y - Me.Location.Y
    End Sub

    Private Sub PictureBox1_MouseMove(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs)
        If e.Button = MouseButtons.Left Then
            NewPoint = Control.MousePosition
            NewPoint.X -= (X)
            NewPoint.Y -= (Y)
            Me.Location = NewPoint
        End If
    End Sub
  End Class

and thats it

[Danny]

lol ^^, great

[NecroPhis]

hehe looks good cooll; ty

[zachman61]

Wont the Guy Be Partially not there since hes red?

[Bogoh67]

when i tried it.....no

[zachman61]

ok
i guess its for .pngs not .gif :P
that clears up why i thought it wouldnt work :P