Results 1 to 15 of 15

Thread: Customizable TabControl

Threaded View

  1. #14

    Thread Starter
    Stack Overflow mod​erator
    Join Date
    May 2008
    Location
    British Columbia, Canada
    Posts
    2,824

    Re: Customizable TabControl

    For people who don't like the color (not a huge suprise), you can make your own header renderer! Here's how:

    Either implement IHeaderRenderer (harder) or inherit DefaultHeaderRenderer (easy, but less control).

    Inheriting DefaultHeaderRenderer (implementing coming soon, but you should be able to figure it out):

    Code:
    Public Class MyHR : Inherits XTabStyle.DefaultHeaderRenderer
    End Class
    Change the border color by overriding:
    Code:
    Public Class MyHR : Inherits XTabStyle.DefaultHeaderRenderer
         Protected Overrides Function GetBorderColor() As Color
              Return Color.White
         End Function
    End Class
    Change the text color, again by overriding:
    Code:
    Public Class MyHR : Inherits XTabStyle.DefaultHeaderRenderer
         Protected Overrides Function GetBorderColor() As Color
              Return Color.White
         End Function
         Protected Overrides Function GetTextColor() As Color
              Return Color.DarkGreen
         End Function
    End Class
    Change the font:
    Code:
    Public Class MyHR : Inherits XTabStyle.DefaultHeaderRenderer
         Protected Overrides Function GetBorderColor() As Color
              Return Color.White
         End Function
         Protected Overrides Function GetTextColor() As Color
              Return Color.DarkGreen
         End Function
         Protected Overrides Function GetFont() As Font
              Return New Font("Verdana",11.0!)
         End Function
    End Class
    Change the tab background:
    Code:
    Public Class MyHR : Inherits XTabStyle.DefaultHeaderRenderer
         Protected Overrides Function GetBorderColor() As Color
              Return Color.White
         End Function
         Protected Overrides Function GetTextColor() As Color
              Return Color.DarkGreen
         End Function
         Protected Overrides Function GetFont() As Font
              Return New Font("Verdana",11.0!)
         End Function
         Protected Overrides Function GetBrush(ByVal size As Size) As Brush
              Return New SolidBrush(Color.Black) 'In this example, I change the background to solid black.
         End Function
    End Class
    Finally, set the XTabControl's HeaderRenderer property to an instance of your class.

    Code:
    Me.XTabControl1.HeaderRenderer = New MyHR()
    Last edited by minitech; May 10th, 2010 at 07:04 PM.

Posting Permissions

  • You may not post new threads
  • You may not post replies
  • You may not post attachments
  • You may not edit your posts
  •  



Click Here to Expand Forum to Full Width