Codejock Tab Control Appearance

Message Topic Search Topic Options Post Reply Create New Topic Printable Version Translate Topic

   This is the current styling I have on a Codejock Tab Control

And this is the styling I would like where the height of the selected tab is slightly higher than the inactive tabs.

As you will notice there is a slight difference in the tab height of the selected tab and the inactive tabs. Is it possible to control the height of tabs like this while retaining the same styling as shown?

After adding a Suite Controls 16.2.0 Tab Control in a VB6 to a form, here is the code I am using to style the appearance of the tab control.

Private Sub Form_Load()

    TabPage1.BackColor = RGB(255, 255, 255)
    TabPage2.BackColor = RGB(255, 255, 255)

    TabControl1.DrawFocusRect = False

    TabControl1.PaintManager.HotTracking = True

    TabControl1.PaintManager.Appearance = xtpTabAppearanceFlat
    TabControl1.PaintManager.Color = xtpTabColorDefault

    TabControl1.PaintManager.ColorSet.FrameBorder = RGB(165, 172, 181)
    TabControl1.PaintManager.ColorSet.ButtonNormal = RGB(212, 216, 221)
    TabControl1.PaintManager.ColorSet.ButtonSelected = RGB(255, 255, 255)
    TabControl1.PaintManager.ColorSet.ButtonHighlighted = RGB(228, 233, 237)
    TabControl1.PaintManager.ColorSet.HighlightText = RGB(0, 0, 0)

    TabControl1.PaintManager.HeaderMargin.Top = 3
    TabControl1.PaintManager.HeaderMargin.Left = 3

    TabControl1.PaintManager.ButtonMargin.Top = 3
    TabControl1.PaintManager.ButtonMargin.Bottom = 3

End Sub

Author	Message Topic Search Topic Options Post Reply Create New Topic Printable Version Translate Topic
Skreen Members Profile Send Private Message Find Members Posts Add to Buddy List Groupie Joined: 23 March 2013 Status: Offline Points: 33	Post Options Post Reply Quote Skreen Report Post Thanks(0) Quote Reply Topic: Codejock Tab Control Appearance Posted: 02 August 2013 at 11:16am
	This is the current styling I have on a Codejock Tab Control And this is the styling I would like where the height of the selected tab is slightly higher than the inactive tabs. As you will notice there is a slight difference in the tab height of the selected tab and the inactive tabs. Is it possible to control the height of tabs like this while retaining the same styling as shown? After adding a Suite Controls 16.2.0 Tab Control in a VB6 to a form, here is the code I am using to style the appearance of the tab control. Private Sub Form_Load() TabPage1.BackColor = RGB(255, 255, 255) TabPage2.BackColor = RGB(255, 255, 255) TabControl1.DrawFocusRect = False TabControl1.PaintManager.HotTracking = True TabControl1.PaintManager.Appearance = xtpTabAppearanceFlat TabControl1.PaintManager.Color = xtpTabColorDefault TabControl1.PaintManager.ColorSet.FrameBorder = RGB(165, 172, 181) TabControl1.PaintManager.ColorSet.ButtonNormal = RGB(212, 216, 221) TabControl1.PaintManager.ColorSet.ButtonSelected = RGB(255, 255, 255) TabControl1.PaintManager.ColorSet.ButtonHighlighted = RGB(228, 233, 237) TabControl1.PaintManager.ColorSet.HighlightText = RGB(0, 0, 0) TabControl1.PaintManager.HeaderMargin.Top = 3 TabControl1.PaintManager.HeaderMargin.Left = 3 TabControl1.PaintManager.ButtonMargin.Top = 3 TabControl1.PaintManager.ButtonMargin.Bottom = 3 End Sub