ToolStripItem Highlight renderring

[TheUsed]

Hello.

I made a class that overrides the onpaint procedure of a menustrip.

I then made a class that overrides procedures of the ToolStripRenderer

This allowed me to get the look of the menu strip and context menu that I wanted.

However highlighting doesn't take place. How can I make it so when I move my mouse over a ToolStripItem i can render my own highlighting colors.

I need to beable to get the item that is currently being hovered over. Then I need to take that item and fill a rectangle. My issue is getting the item that is being hovered over.


Here is my code. I used MSDN examples to help.

Public Class cMenuBar
 
    Public Sub New()
 
        InitializeComponent()
        Dim renderer As New cToolStripRenderer
        Me.Renderer = renderer
 
    End Sub
 
    Protected Overrides Sub OnPaintBackground(ByVal e As System.Windows.Forms.PaintEventArgs)
        MyBase.OnPaintBackground(e)
 
        Dim Rect As New Rectangle(0, 0, Me.Width, Me.Height)
        Dim bgGradient As New LinearGradientBrush(Rect, Color.FromArgb(255, 235, 233, 237), Color.FromArgb(255, 251, 250, 251), LinearGradientMode.Horizontal)
        e.Graphics.FillRectangle(bgGradient, Rect)
 
    End Sub
 
End Class
 
 
Friend Class cToolStripRenderer
    Inherits ToolStripRenderer
 
       'The brush that paints the background of
    'the GridStrip control.
    Private backgroundBrush As Brush = Nothing
 
   
  
    'This method initializes an individual ToolStripButton
    'control. It copies a subimage from the ToolStripRenderer's
    'main image, according to the position and size of
    'the ToolStripButton.
    Protected Overrides Sub InitializeItem(ByVal item As System.Windows.Forms.ToolStripItem)
        MyBase.InitializeItem(item)
        Try
 
            Dim ms As MenuStrip = item.Owner
 
            'The empty cell does not receive a subimage.
            If (TypeOf (item) Is ToolStripButton) Then
                'Copy the subimage from the appropriate
                'part of the main image.
                Dim subImage As Bitmap = bmp.Clone(item.Bounds, Imaging.PixelFormat.Undefined)
 
                'assign the subimage to the ToolStripButton
                'control's Image property.
                item.Image = subImage
            End If
        Catch ex As Exception
 
 
        End Try
 
    End Sub
 
 
    'This method renders the MenuStrip control's background.
    Protected Overrides Sub OnRenderToolStripBackground(ByVal e As System.Windows.Forms.ToolStripRenderEventArgs)
        MyBase.OnRenderToolStripBackground(e)
 
        Dim rect As New Rectangle(2, 0, 28, e.ToolStrip.Size.Height)
        Dim b As Brush = New LinearGradientBrush(rect, Color.FromArgb(255, 235, 233, 237), Color.FromArgb(255, 183, 183, 184), LinearGradientMode.Vertical, True)
 
        Dim rec As New Rectangle(29, 0, 1, e.ToolStrip.Size.Height)
        Dim b1 As Brush = Brushes.Black
 
        Dim rec1 As New Rectangle(0, 0, 2, e.ToolStrip.Size.Height)
        Dim b2 As Brush = New LinearGradientBrush(rec1, Color.FromArgb(255, 235, 234, 238), Color.FromArgb(255, 235, 234, 238), LinearGradientMode.Horizontal, True)
 
        Dim r As New Rectangle(30, 0, e.ToolStrip.Size.Width, e.ToolStrip.Size.Height)
 
        'This late initialization is a workaround. The gradient depends on the bounds of the MenuStrip control. The bounds
        'are dependent on the layout engine, which hasn't fully performed layout by the time the Initialize method runs.
        If Me.backgroundBrush Is Nothing Then
            Me.backgroundBrush = New LinearGradientBrush(r, Color.FromArgb(255, 222, 221, 225), Color.FromArgb(255, 251, 250, 251), LinearGradientMode.Horizontal, True)
        End If
 
        'Paint the MenuStrip control's background
        e.Graphics.FillRectangle(b2, rec1)
        e.Graphics.FillRectangle(b, rect)
        e.Graphics.FillRectangle(b1, rec)
        e.Graphics.FillRectangle(Me.backgroundBrush, r)
 
    End Sub
End Class

[NickThissen]

There are many, many, many, many, (many) more methods you can override in the ToolStripRenderer class (you may also want to try inheriting the ToolStripProfessionalRenderer class, see which you think is best). I can't remember the name but there's one like OnRenderToolStripButton. Or maybe Item. Or Both. I've no idea, but they are there.

Now, if you just want to change the color, and not the shape, then it's a better idea to use a ProfessionalColorTable. You can assign an instance of a ProfessionalColorTable to a ToolStripProfessionalRenderer, and it will use those colors. You need to create a new class and let it inherit from ProfessionalColorTable. You can then override all properties and have them return the color you want. Assuming you called your color table "clrTable" then you can use just this code to have your toolstrip use the colors:

ToolStrip1.Renderer = New ToolStripProfessionalRenderer(New clrTable))

Using a ColorTable is MUCH easier to do, but it's also a little limited. You can only change colors, not shapes.


I also have a few codebank submissions on toolstrip renders if you want to take a look. There's a few that actually create a new Renderer like you are trying (to emulate VS2008 and Vista styles). There's also one that uses just a ColorTable to emulate Office 2007 style. Finally there's one that uses both, but you don't need to access them. Instead, I created a custom ToolStrip control that exposes all colors via properties. You can just change the properties during design-time and view the results right there. No need to code anything. This last one also includes a preset for each of the standard color schemes. These color schemes are usually chosen by the system to match the system color scheme, but using my ToolStrip you can force it to use the green theme even on Vista or on the blue XP theme for example.

So, to recap:
If you just need to change colors and not shapes Then
... If you want to create your own to learn something Then
... ... Take a look at my Office 2007 ToolStrip.
... ElseIf you just want to change the colors without thinking about it Then
... ... Use my custom ToolStrip control
... End If
ElseIf you also need to change shapes
... Take a look at the VS2008 and vista renders, as they show you how you can do it
End If

[TheUsed]

Thank you for the advice. Very kind. I wanna learn so i will be looking at your office 2007 one.