Tab coloring?

Wiggyboy · July 27, 2011

Hey xD, look at this picture

Posted Image

u notice how it's gray behind the tabs, how can i change that to white??

(i have tried changing background color)

Chimaera · July 27, 2011

If you use the search button you can find this which may or may not help

Edited July 27, 2011 by Chimaera

dragan · July 27, 2011

I think this is the closest you can get (there are issues with different themes - the shadow to the right and below TAB control)

#include <GuiConstantsEx.au3>
#include <GuiTab.au3>

_Main1()

Func _Main1()
    Local $tRect, $hTab, $Form1, $ipos
    Local $Bk_Color = 0x00FF00

    $Form1 = GUICreate("Tab Color Background", 400, 300)
    GUISetBkColor($Bk_Color)
    $hTab = GUICtrlCreateTab(2, 2, 396, 296)
    GUISetState()

    _GUICtrlTab_InsertItem($hTab, 0, "Tab 1")
    _GUICtrlTab_InsertItem($hTab, 1, "Tab 2")
    _GUICtrlTab_InsertItem($hTab, 2, "Tab 3")

    $tRect = _GUICtrlTab_GetItemRect($hTab, _GUICtrlTab_GetItemCount($hTab)-1)
    $ipos = ControlGetPos($Form1, "", $hTab)
    Local $iX = $tRect[2]
    Local $iY = $tRect[1]
    Local $iWidth = $ipos[2]-$iX
    Local $iHeight = $tRect[3]
    GUICtrlCreateLabel('', $iX, $iY, $iWidth, $iHeight)
    GUICtrlSetState(-1, $GUI_DISABLE)
    GUICtrlSetBkColor(-1, $Bk_Color)
    Do
    Until GUIGetMsg() = $GUI_EVENT_CLOSE
    GUIDelete()
EndFunc   ;==>_Main

Wiggyboy · July 27, 2011

I think this is the closest you can get (there are issues with different themes - the shadow to the right and below TAB control)

#include <GuiConstantsEx.au3>
#include <GuiTab.au3>

_Main1()

Func _Main1()
    Local $tRect, $hTab, $Form1, $ipos
    Local $Bk_Color = 0x00FF00

    $Form1 = GUICreate("Tab Color Background", 400, 300)
    GUISetBkColor($Bk_Color)
    $hTab = GUICtrlCreateTab(2, 2, 396, 296)
    GUISetState()

    _GUICtrlTab_InsertItem($hTab, 0, "Tab 1")
    _GUICtrlTab_InsertItem($hTab, 1, "Tab 2")
    _GUICtrlTab_InsertItem($hTab, 2, "Tab 3")

    $tRect = _GUICtrlTab_GetItemRect($hTab, _GUICtrlTab_GetItemCount($hTab)-1)
    $ipos = ControlGetPos($Form1, "", $hTab)
    Local $iX = $tRect[2]
    Local $iY = $tRect[1]
    Local $iWidth = $ipos[2]-$iX
    Local $iHeight = $tRect[3]
    GUICtrlCreateLabel('', $iX, $iY, $iWidth, $iHeight)
    GUICtrlSetState(-1, $GUI_DISABLE)
    GUICtrlSetBkColor(-1, $Bk_Color)
    Do
    Until GUIGetMsg() = $GUI_EVENT_CLOSE
    GUIDelete()
EndFunc   ;==>_Main

I'm sorry i didn't rly get this to work, anyway i do have another solution, i could maximum the tabs?(make the tabs bigger to fit the whole maintab) how could i do that?

i found this function but it doesn't seem to work probberly

_GUICtrlTab_SetItemSize($gui_tab, 100, 18) ;only the heigh changes not the width... did i do it wrong?

Edited July 27, 2011 by Wiggyboy

smartee · July 27, 2011

Hi Wiggyboy,

Take a look at it addresses this exact issue.

Hope this helps,

-smartee

Wiggyboy · July 27, 2011

Hi Wiggyboy,
Take a look at it addresses this exact issue.
Hope this helps,
-smartee

Would u help me out? i think i did something terribly wrong... as soon as i started it it just start saying "Autoit3.exe" Does not response, woul du like to wait for the program or quit it?

smartee · July 27, 2011

Would u help me out? i think i did something terribly wrong... as soon as i started it it just start saying "Autoit3.exe" Does not response, woul du like to wait for the program or quit it?

Sure, post your code, lets get to the bottom of this

ReFran · July 27, 2011

If you also looking here for a simple solution,

you may do it simple using a label (how UEZ remarked in the thread smartee stated).

Attached a quick example.

best regards, Reinhard

#Include <Constants.au3>
#Include <GUITab.au3>
#Include <WinAPIEx.au3>
#include <TabConstants.au3>
#include <WindowsConstants.au3>
GUICreate('MyGUI', 300, 300)
GUISetBkColor(0xAACCFF)
GUICtrlCreateTab(20, 20, 262, 261, $TCS_FOCUSONBUTTONDOWN)
GUICtrlCreateTabItem('Tab 1')
GUICtrlCreateTabItem('Tab 2')
GUICtrlCreateTabItem('Tab 3')
GUICtrlCreateTabItem('')
GUICtrlCreateLabel("",149,20,260,20)
GUICtrlSetBkColor(-1,0xAACCFF)
GUISetState()
Do
Until GUIGetMsg() = -3

Wiggyboy · July 27, 2011

If you also looking here for a simple solution,
you may do it simple using a label (how UEZ remarked in the thread smartee stated).

Attached a quick example.

best regards, Reinhard

Before Edit

;Scripts
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
#include <GuiTab.au3>

;Variables
Dim $herolist[101][4]
    $herolist[1][0] = "Accursed"
Dim $herorec[101][21]

;Functions
Func WM_NOTIFY($hWnd, $iMsg, $iwParam, $ilParam)
    #forceref $hWnd, $iMsg, $iwParam
    Local $hWndFrom, $iIDFrom, $iCode, $tNMHDR, $hWndTab
    $tNMHDR = DllStructCreate($tagNMHDR, $ilParam)
    $hWndFrom = HWnd(DllStructGetData($tNMHDR, "hWndFrom"))
    $iIDFrom = DllStructGetData($tNMHDR, "IDFrom")
    $iCode = DllStructGetData($tNMHDR, "Code")
    Switch $hWndFrom
        Case $gui_tab
            Switch $iCode
                Case $TCN_SELCHANGE; The Selected Tab has change
                    $CurSel = _GUICtrlTab_GetCurSel($hWndFrom)
                    ConsoleWrite('@@ Debug(' & @ScriptLineNumber & ') : $CurSel = ' & $CurSel & @CRLF & '>Error code: ' & @error & @CRLF) ;### Debug Console
                    Switch $CurSel
                        Case $gui_tab1

                            GUISetState(@SW_SHOW, $gui_hero)
                            $CurSel = _GUICtrlTab_GetCurSel($gui_hero_tab)
                            Switch $CurSel
                                Case $gui_hero_tab1
                                    GUISetState(@SW_SHOW, $gui_hero_althero)
                                    GUISetState(@SW_HIDE, $gui_hero_recshop)

                                Case $gui_hero_tab2
                                    GUISetState(@SW_HIDE, $gui_hero_althero)
                                    GUISetState(@SW_SHOW, $gui_hero_recshop)
                            EndSwitch
                            GUISetState(@SW_HIDE, $gui_annonce)
                            GUISetState(@SW_HIDE, $gui_taunt)
                            Return $GUI_RUNDEFMSG
                        Case $gui_tab2
                            GUISetState(@SW_HIDE, $gui_hero)
                            GUISetState(@SW_HIDE, $gui_hero_althero)
                            GUISetState(@SW_HIDE, $gui_hero_recshop)
                            GUISetState(@SW_SHOW, $gui_annonce)
                            GUISetState(@SW_HIDE, $gui_taunt)
                            Return $GUI_RUNDEFMSG
                        Case $gui_tab3
                            GUISetState(@SW_HIDE, $gui_hero)
                            GUISetState(@SW_HIDE, $gui_hero_althero)
                            GUISetState(@SW_HIDE, $gui_hero_recshop)
                            GUISetState(@SW_HIDE, $gui_annonce)
                            GUISetState(@SW_SHOW, $gui_taunt)
                            Return $GUI_RUNDEFMSG
                    EndSwitch
            EndSwitch
        Case $gui_hero_tab
            Switch $iCode
                Case $TCN_SELCHANGE; The Selected Tab has change
                    $CurSel = _GUICtrlTab_GetCurSel($hWndFrom)
                    ConsoleWrite('@@ Debug(' & @ScriptLineNumber & ') : $CurSel = ' & $CurSel & @CRLF & '>Error code: ' & @error & @CRLF) ;### Debug Console
                    Switch $CurSel
                        Case $gui_hero_tab1
                            GUISetState(@SW_SHOW, $gui_hero_althero)
                            GUISetState(@SW_HIDE, $gui_hero_recshop)
                            Return $GUI_RUNDEFMSG
                        Case $gui_hero_tab2
                            GUISetState(@SW_HIDE, $gui_hero_althero)
                            GUISetState(@SW_SHOW, $gui_hero_recshop)
                            Return $GUI_RUNDEFMSG
                    EndSwitch
            EndSwitch
    EndSwitch
    Return $GUI_RUNDEFMSG
EndFunc

;Start of script
$gui = GUICreate("CustomIt", 600, 400)
GUIRegisterMsg($WM_NOTIFY, "WM_NOTIFY")
    $gui_tab = _GUICtrlTab_Create($gui,0,0, 580, 250)
        $gui_tab1 = _GUICtrlTab_InsertItem($gui_tab, 1, "Hero")
        $gui_tab2 = _GUICtrlTab_InsertItem($gui_tab, 2, "Annoncement")
        $gui_tab3 = _GUICtrlTab_InsertItem($gui_tab, 3, "Item 1-3")
$gui_hero = GUICreate("Hero",560,220,0,21, $WS_POPUP, $WS_EX_MDICHILD, $gui)
GUISetBkColor(0xFFFFFF)
    $gui_hero_list = GUICtrlCreateList("",5,5,100,100)
        For $i = 1 To 80
            GUICtrlSetData($gui_hero_list,$i &"|")
        Next
    $gui_hero_tab = _GUICtrlTab_Create($gui_hero,110,5, 580, 250)
    GUICtrlSetBkColor(-1,0xFFFFFF)
        $gui_hero_tab1 = _GUICtrlTab_InsertItem($gui_hero_tab, 1, "Alt heroes")
        $gui_hero_tab2 = _GUICtrlTab_InsertItem($gui_hero_tab, 1, "Recommended")
$gui_hero_althero = GUICreate("Alt heroes",560,220,114,29, $WS_POPUP, $WS_EX_MDICHILD, $gui_hero)
GUISetBkColor(0xFFFFFF)
$gui_hero_recshop = GUICreate("Recommended",560,220,114,29, $WS_POPUP, $WS_EX_MDICHILD, $gui_hero)
GUISetBkColor(0xFFFFFF)
GUICtrlCreatePic("textures\shop\recbg.jpg",0,0,216,198)
$gui_hero_recshop_shop1_tab = GUICtrlCreateTab(216,0,350)
$gui_hero_recshop_shop1_tab1 =GUICtrlCreateTabItem("Supplies")
$gui_hero_recshop_shop1_tab2 =GUICtrlCreateTabItem("Accessories")
$gui_hero_recshop_shop1_tab2 =GUICtrlCreateTabItem("Weapons")
$gui_hero_recshop_shop1_tab2 =GUICtrlCreateTabItem("Relics")
$gui_hero_recshop_shop1_tab2 =GUICtrlCreateTabItem("Legendary")
$gui_hero_recshop_shop1_tab2 =GUICtrlCreateTabItem("Outpost")
GUICtrlCreateTabItem("")
$gui_annonce = GUICreate("Annoncement",560,220,0,21, $WS_POPUP, $WS_EX_MDICHILD, $gui)
    
$gui_taunt = GUICreate("Taunt",560,220,0,21, $WS_POPUP, $WS_EX_MDICHILD, $gui)
GUISetState(@SW_SHOW, $gui)
GUISetState(@SW_SHOW, $gui_hero)
GUISetState(@SW_SHOW, $gui_hero_althero)

;Main loop!
While True
$msg = GUIGetMsg()
Switch $msg
    case $GUI_EVENT_CLOSE
        Exit
EndSwitch

WEnd

After(not working, btw i didn't have <WinAPIEx.au3> so i downloaded it

;Scripts
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
#Include <Constants.au3>
#Include <GUITab.au3>
#Include <WinAPIEx.au3>

;Variables
Dim $herolist[101][4]
    $herolist[1][0] = "Accursed"
Dim $herorec[101][21]

;Functions
Func WM_NOTIFY($hWnd, $iMsg, $iwParam, $ilParam)
    #forceref $hWnd, $iMsg, $iwParam
    Local $hWndFrom, $iIDFrom, $iCode, $tNMHDR, $hWndTab
    $tNMHDR = DllStructCreate($tagNMHDR, $ilParam)
    $hWndFrom = HWnd(DllStructGetData($tNMHDR, "hWndFrom"))
    $iIDFrom = DllStructGetData($tNMHDR, "IDFrom")
    $iCode = DllStructGetData($tNMHDR, "Code")
    Switch $hWndFrom
        Case $gui_tab
            Switch $iCode
                Case $TCN_SELCHANGE; The Selected Tab has change
                    $CurSel = _GUICtrlTab_GetCurSel($hWndFrom)
                    ConsoleWrite('@@ Debug(' & @ScriptLineNumber & ') : $CurSel = ' & $CurSel & @CRLF & '>Error code: ' & @error & @CRLF) ;### Debug Console
                    Switch $CurSel
                        Case $gui_tab1

                            GUISetState(@SW_SHOW, $gui_hero)
                            $CurSel = _GUICtrlTab_GetCurSel($gui_hero_tab)
                            Switch $CurSel
                                Case $gui_hero_tab1
                                    GUISetState(@SW_SHOW, $gui_hero_althero)
                                    GUISetState(@SW_HIDE, $gui_hero_recshop)

                                Case $gui_hero_tab2
                                    GUISetState(@SW_HIDE, $gui_hero_althero)
                                    GUISetState(@SW_SHOW, $gui_hero_recshop)
                            EndSwitch
                            GUISetState(@SW_HIDE, $gui_annonce)
                            GUISetState(@SW_HIDE, $gui_taunt)
                            Return $GUI_RUNDEFMSG
                        Case $gui_tab2
                            GUISetState(@SW_HIDE, $gui_hero)
                            GUISetState(@SW_HIDE, $gui_hero_althero)
                            GUISetState(@SW_HIDE, $gui_hero_recshop)
                            GUISetState(@SW_SHOW, $gui_annonce)
                            GUISetState(@SW_HIDE, $gui_taunt)
                            Return $GUI_RUNDEFMSG
                        Case $gui_tab3
                            GUISetState(@SW_HIDE, $gui_hero)
                            GUISetState(@SW_HIDE, $gui_hero_althero)
                            GUISetState(@SW_HIDE, $gui_hero_recshop)
                            GUISetState(@SW_HIDE, $gui_annonce)
                            GUISetState(@SW_SHOW, $gui_taunt)
                            Return $GUI_RUNDEFMSG
                    EndSwitch
            EndSwitch
        Case $gui_hero_tab
            Switch $iCode
                Case $TCN_SELCHANGE; The Selected Tab has change
                    $CurSel = _GUICtrlTab_GetCurSel($hWndFrom)
                    ConsoleWrite('@@ Debug(' & @ScriptLineNumber & ') : $CurSel = ' & $CurSel & @CRLF & '>Error code: ' & @error & @CRLF) ;### Debug Console
                    Switch $CurSel
                        Case $gui_hero_tab1
                            GUISetState(@SW_SHOW, $gui_hero_althero)
                            GUISetState(@SW_HIDE, $gui_hero_recshop)
                            Return $GUI_RUNDEFMSG
                        Case $gui_hero_tab2
                            GUISetState(@SW_HIDE, $gui_hero_althero)
                            GUISetState(@SW_SHOW, $gui_hero_recshop)
                            Return $GUI_RUNDEFMSG
                    EndSwitch
            EndSwitch
    EndSwitch
    Return $GUI_RUNDEFMSG
EndFunc

;Start of script
$gui = GUICreate("CustomIt", 600, 400)
GUIRegisterMsg($WM_NOTIFY, "WM_NOTIFY")
    $gui_tab = _GUICtrlTab_Create($gui,0,0, 580, 250)
    $hDll = DllCallbackRegister('_WinProc', 'ptr', 'hwnd;uint;wparam;lparam')
    $pDll = DllCallbackGetPtr($hDll)
    $hProc = _WinAPI_SetWindowLongEx($gui_tab, $GWL_WNDPROC, $pDll)
        $gui_tab1 = _GUICtrlTab_InsertItem($gui_tab, 1, "Hero")
        $gui_tab2 = _GUICtrlTab_InsertItem($gui_tab, 2, "Annoncement")
        $gui_tab3 = _GUICtrlTab_InsertItem($gui_tab, 3, "Item 1-3")
$gui_hero = GUICreate("Hero",560,220,0,21, $WS_POPUP, $WS_EX_MDICHILD, $gui)
GUISetBkColor(0xFFFFFF)
    $gui_hero_list = GUICtrlCreateList("",5,5,100,100)
        For $i = 1 To 80
            GUICtrlSetData($gui_hero_list,$i &"|")
        Next
    $gui_hero_tab = _GUICtrlTab_Create($gui_hero,110,5, 580, 250)
    GUICtrlSetBkColor(-1,0xFFFFFF)
        $gui_hero_tab1 = _GUICtrlTab_InsertItem($gui_hero_tab, 1, "Alt heroes")
        $gui_hero_tab2 = _GUICtrlTab_InsertItem($gui_hero_tab, 1, "Recommended")
$gui_hero_althero = GUICreate("Alt heroes",560,220,114,29, $WS_POPUP, $WS_EX_MDICHILD, $gui_hero)
GUISetBkColor(0xFFFFFF)
$gui_hero_recshop = GUICreate("Recommended",560,220,114,29, $WS_POPUP, $WS_EX_MDICHILD, $gui_hero)
GUISetBkColor(0xFFFFFF)
GUICtrlCreatePic("textures\shop\recbg.jpg",0,0,216,198)
$gui_hero_recshop_shop1_tab = GUICtrlCreateTab(216,0,350)
$gui_hero_recshop_shop1_tab1 =GUICtrlCreateTabItem("Supplies")
$gui_hero_recshop_shop1_tab2 =GUICtrlCreateTabItem("Accessories")
$gui_hero_recshop_shop1_tab2 =GUICtrlCreateTabItem("Weapons")
$gui_hero_recshop_shop1_tab2 =GUICtrlCreateTabItem("Relics")
$gui_hero_recshop_shop1_tab2 =GUICtrlCreateTabItem("Legendary")
$gui_hero_recshop_shop1_tab2 =GUICtrlCreateTabItem("Outpost")
GUICtrlCreateTabItem("")
$gui_annonce = GUICreate("Annoncement",560,220,0,21, $WS_POPUP, $WS_EX_MDICHILD, $gui)
    
$gui_taunt = GUICreate("Taunt",560,220,0,21, $WS_POPUP, $WS_EX_MDICHILD, $gui)
GUISetState(@SW_SHOW, $gui)
GUISetState(@SW_SHOW, $gui_hero)
GUISetState(@SW_SHOW, $gui_hero_althero)

;Main loop!
While True
$msg = GUIGetMsg()
Switch $msg
    case $GUI_EVENT_CLOSE
        Exit
EndSwitch

WEnd

;edit
Func _CreateClipRgn($hWnd)

    Local $tRect
    Local $Count = _GUICtrlTab_GetItemCount($hWnd)
    Local $Sel = _GUICtrlTab_GetCurSel($hWnd)
    Local $hRgn = _WinAPI_CreateRectRgn(0, 0, 0, 0)
    Local $hTmp, $Ht

    For $i = 0 To $Count - 1
        $tRect = _GUICtrlTab_GetItemRectEx($hWnd, $i)
        If $i = $Sel Then
            $hTmp = _WinAPI_CreateRectRgn(DllStructGetData($tRect, 1) - 2, DllStructGetData($tRect, 2) - 2, DllStructGetData($tRect, 3) + 2, DllStructGetData($tRect, 4))
            $Ht = DllStructGetData($tRect, 4) - DllStructGetData($tRect, 2) + 2
        Else
            If $i = $Count - 1 Then
                $hTmp = _WinAPI_CreateRectRgn(DllStructGetData($tRect, 1), DllStructGetData($tRect, 2), DllStructGetData($tRect, 3) - 2, DllStructGetData($tRect, 4))
            Else
                $hTmp = _WinAPI_CreateRectRgn(DllStructGetData($tRect, 1), DllStructGetData($tRect, 2), DllStructGetData($tRect, 3), DllStructGetData($tRect, 4))
            EndIf
        EndIf
        _WinAPI_CombineRgn($hRgn, $hRgn, $hTmp, $RGN_OR)
        _WinAPI_DeleteObject($hTmp)
    Next
    $tRect = _WinAPI_GetClientRect($hWnd)
    $hTmp = _WinAPI_CreateRectRgn(DllStructGetData($tRect, 1), DllStructGetData($tRect, 2) + $Ht, DllStructGetData($tRect, 3) - 2, DllStructGetData($tRect, 4) - 1)
    _WinAPI_CombineRgn($hRgn, $hRgn, $hTmp, $RGN_OR)
    _WinAPI_DeleteObject($hTmp)
    Return $hRgn
EndFunc   ;==>_CreateClipRgn

Func _WinProc($hWnd, $iMsg, $wParam, $lParam)
    If _WinAPI_IsThemeActive() Then
        Switch $iMsg
            Case $WM_ERASEBKGND
                Local $tRect[2]
                Local $hParent = _WinAPI_GetParent($hWnd)
                Local $hRgn = _CreateClipRgn($hWnd)
                Local $hPrev = _WinAPI_GetClipRgn($wParam)
                $tRect[0] = _WinAPI_GetWindowRect($hParent)
                $tRect[1] = _WinAPI_GetWindowRect($hWnd)
                _WinAPI_ExtSelectClipRgn($wParam, $hRgn, $RGN_DIFF)
                _WinAPI_DrawBitmap($wParam, DllStructGetData($tRect[0], 1) - DllStructGetData($tRect[1], 1), DllStructGetData($tRect[0], 2) - DllStructGetData($tRect[1], 2), _SendMessage($hParent, $STM_GETIMAGE))
                _WinAPI_SelectClipRgn($wParam, $hPrev)
                _WinAPI_DeleteObject($hRgn)
                Return 1
            Case $WM_PAINT
                Local $tPaint
                Local $hDC = _WinAPI_BeginPaint($hWnd, $tPaint)
                Local $hRgn = _CreateClipRgn($hWnd)
                _WinAPI_ExtSelectClipRgn($hDC, $hRgn, $RGN_AND)
                _WinAPI_CallWindowProc($hProc, $hWnd, $WM_PRINTCLIENT, $hDC, $PRF_CLIENT)
                _WinAPI_DeleteObject($hRgn)
                _WinAPI_EndPaint($hWnd, $tPaint)
                Return 0
        EndSwitch
    EndIf
    Return _WinAPI_CallWindowProc($hProc, $hWnd, $iMsg, $wParam, $lParam)
EndFunc   ;==>_WinProc

Func AutoItExit()
    _WinAPI_SetWindowLongEx($hTab, $GWL_WNDPROC, $hProc)
    DllCallbackFree($hDll)
EndFunc   ;==>AutoItExit

monoscout999 · July 27, 2011

you didn`t do anything

It is not working because you didnt register the callback function.

maybe you should use the label as @ReFran says.

Edited July 27, 2011 by monoscout999

Wiggyboy · July 27, 2011

Hey guys, how can u make ur tab look like this

Posted Image

smartee · July 27, 2011

$TCS_MULTILINE is the style you're looking for

Look at this demo:

#include <GUIConstantsEx.au3>
#include <TabConstants.au3>
#include <WindowsConstants.au3>
#Region ### START Koda GUI section ### Form=
$Form1 = GUICreate("Form1", 400, 400)
$Tab1 = GUICtrlCreateTab(10, 10, 380, 380, $TCS_MULTILINE)
GUICtrlSetResizing(-1, $GUI_DOCKWIDTH+$GUI_DOCKHEIGHT)
$TabSheet1 = GUICtrlCreateTabItem("TabSheet1")
$TabSheet2 = GUICtrlCreateTabItem("TabSheet2")
$TabSheet3 = GUICtrlCreateTabItem("TabSheet3")
$TabSheet4 = GUICtrlCreateTabItem("TabSheet4")
$TabSheet5 = GUICtrlCreateTabItem("TabSheet5")
$TabSheet6 = GUICtrlCreateTabItem("TabSheet6")
GUICtrlSetState(-1,$GUI_SHOW)
GUICtrlCreateTabItem("")
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###

While 1
    $nMsg = GUIGetMsg()
    Switch $nMsg
        Case $GUI_EVENT_CLOSE
            Exit

    EndSwitch
WEnd

monoscout999 · July 27, 2011

Hey guys, how can u make ur tab look like this

add $TCS_MULTILINE style when you create the tab

monoscout999 · July 27, 2011

$TCS_MULTILINE is the style you're looking for

Look at this demo:

#include <GUIConstantsEx.au3>
#include <TabConstants.au3>
#include <WindowsConstants.au3>
#Region ### START Koda GUI section ### Form=
$Form1 = GUICreate("Form1", 400, 400)
$Tab1 = GUICtrlCreateTab(10, 10, 380, 380, $TCS_MULTILINE)
GUICtrlSetResizing(-1, $GUI_DOCKWIDTH+$GUI_DOCKHEIGHT)
$TabSheet1 = GUICtrlCreateTabItem("TabSheet1")
$TabSheet2 = GUICtrlCreateTabItem("TabSheet2")
$TabSheet3 = GUICtrlCreateTabItem("TabSheet3")
$TabSheet4 = GUICtrlCreateTabItem("TabSheet4")
$TabSheet5 = GUICtrlCreateTabItem("TabSheet5")
$TabSheet6 = GUICtrlCreateTabItem("TabSheet6")
GUICtrlSetState(-1,$GUI_SHOW)
GUICtrlCreateTabItem("")
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###

While 1
    $nMsg = GUIGetMsg()
    Switch $nMsg
        Case $GUI_EVENT_CLOSE
            Exit

    EndSwitch
WEnd

ha! one second earlier, anyway you put a nice example

Next time i will beat you.. XD

Tab coloring?

Recommended Posts

Link to comment

Share on other sites

Link to comment

Share on other sites

Link to comment

Share on other sites

Link to comment

Share on other sites

Link to comment

Share on other sites

Link to comment

Share on other sites

Link to comment

Share on other sites

Link to comment

Share on other sites

Link to comment

Share on other sites

Link to comment

Share on other sites

Link to comment

Share on other sites

Link to comment

Share on other sites

Link to comment

Share on other sites

Link to comment

Share on other sites

Create an account or sign in to comment

Create an account

Sign in

Recently Browsing 0 members