Sign in to follow this  
Followers 0
Wiggyboy

Tab coloring?

14 posts in this topic

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)

Share this post


Link to post
Share on other sites



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

Share this post


Link to post
Share on other sites

#4 ·  Posted (edited)

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 by Wiggyboy

Share this post


Link to post
Share on other sites

Hi Wiggyboy,

Take a look at it addresses this exact issue.

Hope this helps, :)

-smartee

Share this post


Link to post
Share on other sites

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?

Share this post


Link to post
Share on other sites

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 :)

Share this post


Link to post
Share on other sites

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

Share this post


Link to post
Share on other sites

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

Share this post


Link to post
Share on other sites

#10 ·  Posted (edited)

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 by monoscout999

Share this post


Link to post
Share on other sites

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

Posted Image

Share this post


Link to post
Share on other sites

$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

Share this post


Link to post
Share on other sites

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

Posted Image

add $TCS_MULTILINE style when you create the tab

Share this post


Link to post
Share on other sites

$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

Share this post


Link to post
Share on other sites

Create an account or sign in to comment

You need to be a member in order to leave a comment

Create an account

Sign up for a new account in our community. It's easy!


Register a new account

Sign in

Already have an account? Sign in here.


Sign In Now
Sign in to follow this  
Followers 0