Tabs without labels

[SoulBlade]

Hi!

Is it possible to create tabs with GUICtrlCreateTab but without labels?

Icons would be used to navigate between tabs.

I managed to hide labels using this trick:

CODE

#include <GUIConstants.au3>

#include <TABConstants.au3>

$gui=GUICreate("GUI", 522, 348, -1, -1)

GUISetBkColor(0xffffff)

$p1 = GUICtrlCreatePic("ICONS\cleanup.bmp", 20, 70, 32, 32)

$tab = GUICtrlCreateTab(60, 20, 418, 350,$TCS_BOTTOM )

$tab0 = GUICtrlCreateTabItem(" ")

$tab1 = GUICtrlCreateTabItem(" 11")

$p2 = GUICtrlCreatePic("ICONS\dialafix.bmp", 80, 120, 32, 32)

GUICtrlSetCursor(-1, 0)

$tab2 = GUICtrlCreateTabItem(" ")

GUICtrlSetLimit ($tab1,1)

GUISetState()

Do

$msg = GUIGetMsg()

Select

Case $msg=$p1

GUICtrlSetState($tab1,$GUI_SHOW)

EndSelect

Until $msg = $GUI_EVENT_CLOSE

I believe there is a better way...

Any ideias?

Thx!

Edited June 9, 2009 by SoulBlade

[dantay9]

Try this. It allows you to draw the tab yourself. If you don't draw anything, nothing will be shown on the tab.

#include <TabConstants.au3>
GUICreate("Test", 500, 500)

GUICtrlCreateTab(16, 0, 409, 318, $TCS_OWNERDRAWFIXED)
GUICtrlCreateTabItem("")

GUISetState()

Sleep(5000)

[SoulBlade]

Try this. It allows you to draw the tab yourself. If you don't draw anything, nothing will be shown on the tab.

#include <TabConstants.au3>
GUICreate("Test", 500, 500)

GUICtrlCreateTab(16, 0, 409, 318, $TCS_OWNERDRAWFIXED)
GUICtrlCreateTabItem("")

GUISetState()

Sleep(5000)

Well,

GUICtrlCreateTabItem("") terminates the tab control.

Unfortunally it doesn't work.

[Yashied]

#Include <TabConstants.au3>

GUICreate('Test', 400, 300)
$Tab = GUICtrlCreateTab(0, 0 - 22, 400, 300 + 22, $TCS_BUTTONS)
GUICtrlCreateTabItem('1')
GUICtrlCreateTabItem('2')
GUISetState()
Do
Until GUIGetMsg() = -3