Controls - Codejock Tab Control Appearance

Codejock Tab Control Appearance

Printed From: Codejock Forums
Category: Codejock Products
Forum Name: Controls
Forum Description: Topics Related to Codejock Controls
URL: http://forum.codejock.com/forum_posts.asp?TID=21830
Printed Date: 27 November 2024 at 4:49pm
Software Version: Web Wiz Forums 12.04 - http://www.webwizforums.com

Topic: Codejock Tab Control Appearance

Posted By: Skreen
Subject: Codejock Tab Control Appearance
Date 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