Breadcrumbs

[Mark]

hello,

can anyone do a tutorial on a custom button and make it a dll.

[Napster1488]

I can Post one later ;)

[MrAksel]

You aint doing this for the competition, are you?

[Mark]

no for a personal project?.

[mandai]

You could just add a UserControl to the ClassLibrary project, then to use the control you just go to choose items in the toolbox and browse to the dll once you have compiled it.

[Mark]

can anyone make a tutorial for me?

[dj1437]

Well, since nobody is helpful anymore, I guess I should help you.

Button Tutorial, By DJ1437
Get a image for the button. Make a image for when the mouse is hovering and when it is clicked.
Make a form and delete it to make the system references needed.

Code: Select all

Imports System.Drawing
Imports System.windows.forms
Public Class BlackButton
    Inherits Windows.Forms.Button
    Public Sub New()
        Me.Size = New Point(90, 25)
        Me.FlatStyle = Windows.Forms.FlatStyle.Flat
        Me.FlatAppearance.BorderSize = 0
        Me.FlatAppearance.MouseDownBackColor = Color.Transparent
        Me.FlatAppearance.MouseOverBackColor = Color.Transparent
        Me.BackColor = System.Drawing.Color.Transparent
        Me.BackgroundImage = My.Resources.'regular image goes here
        Me.BackgroundImageLayout = Windows.Forms.ImageLayout.Stretch
    End Sub
Private Sub Class1_MouseDown(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles Me.MouseDown
        Me.BackgroundImage = My.Resources.'down
        Me.BackgroundImageLayout = ImageLayout.Stretch
    End Sub

    Private Sub Class1_MouseHover(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.MouseHover
        Me.BackgroundImage = My.Resources.'hover
        Me.BackgroundImageLayout = ImageLayout.Stretch
    End Sub

    Private Sub Class1_MouseLeave(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.MouseLeave
        Me.BackgroundImage = My.Resources.'Regular
        Me.BackgroundImageLayout = ImageLayout.Stretch
    End Sub

    Private Sub Class1_MouseUp(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles Me.MouseUp
        Me.BackgroundImage = My.Resources.'Regular
        Me.BackgroundImageLayout = ImageLayout.Stretch
    End Sub
End Class