(UserControl) Section. If you are developing your own control, you have to
"Michael Palmer" <mpalmer78@nospam.nospam> wrote in message
news:OJvXW8KUFHA.2420@TK2MSFTNGP12.phx.gbl...
> Hey Joey...
>
> The control won't show up in the toolbox by itself like other custom
> controls do... I'm not sure why. I have to explicitly add it. Any idea
why?
>
> "joeycalisay" <hcalisay@_spamkiller_codex-systems.com> wrote in message
> news:OyfzkKGUFHA.2172@tk2msftngp13.phx.gbl...
> > were you able to add it in the toolbox?
> >
> > --
> > Joey Calisay
> >
http://spaces.msn.com/members/joeycalisay/ > >
> >
> > "Michael Palmer" <mpalmer78@nospam.nospam> wrote in message
> > news:%23Z7Tpp$TFHA.228@TK2MSFTNGP12.phx.gbl...
> >> I'm trying to inherit/extend the standard LinkLabel control so I can
add
> >> a
> >> couple of additional things to it... but, I can't get it to display on
> >> any
> >> forms. Do I need a custom designer? What am I missing? Here's my
code...
> >>
> >>
> >> Public Class HoverLinkLabel
> >>
> >> Inherits System.Windows.Forms.LinkLabel
> >>
> >> #Region " Windows Form Designer generated code "
> >>
> >> Public Sub New()
> >>
> >> MyBase.New()
> >>
> >> 'This call is required by the Windows Form Designer.
> >>
> >> InitializeComponent()
> >>
> >> 'Add any initialization after the InitializeComponent() call
> >>
> >> End Sub
> >>
> >> 'UserControl overrides dispose to clean up the component list.
> >>
> >> Protected Overloads Overrides Sub Dispose(ByVal disposing As Boolean)
> >>
> >> If disposing Then
> >>
> >> If Not (components Is Nothing) Then
> >>
> >> components.Dispose()
> >>
> >> End If
> >>
> >> End If
> >>
> >> MyBase.Dispose(disposing)
> >>
> >> End Sub
> >>
> >> 'Required by the Windows Form Designer
> >>
> >> Private components As System.ComponentModel.IContainer
> >>
> >> 'NOTE: The following procedure is required by the Windows Form Designer
> >>
> >> 'It can be modified using the Windows Form Designer.
> >>
> >> 'Do not modify it using the code editor.
> >>
> >> <System.Diagnostics.DebuggerStepThrough()> Private Sub
> > InitializeComponent()
> >>
> >> End Sub
> >>
> >> #End Region
> >>
> >> Private _hoverColor As Color = ControlsHelper.GetHoverLinkColor
> >>
> >> Private _linkColor As Color = Me.LinkColor
> >>
> >> Public Property HoverColor() As Color
> >>
> >> Get
> >>
> >> Return _hoverColor
> >>
> >> End Get
> >>
> >> Set(ByVal Value As Color)
> >>
> >> _hoverColor = Value
> >>
> >> End Set
> >>
> >> End Property
> >>
> >> Protected Overrides Sub OnMouseEnter(ByVal e As System.EventArgs)
> >>
> >> MyBase.OnMouseEnter(e)
> >>
> >> Me.LinkColor = _hoverColor
> >>
> >> End If
> >>
> >> End Sub
> >>
> >> Protected Overrides Sub OnMouseLeave(ByVal e As System.EventArgs)
> >>
> >> MyBase.OnMouseLeave(e)
> >>
> >> Me.LinkColor = _linkColor
> >>
> >> End If
> >>
> >> End Sub
> >>
> >> End Class
> >>
> >>
> >>
> >
> >
>
>