탭(TAB)에 배경색 넣기

colorTab.au3

 

보통, GUI Control에 색을 넣으려면, GUICtrlSetBkColor을 이용하면 되지만, 탭은 되지 않습니다.

그래서 사용했던 방법이 탭을 만들고, 탭과 크기가 같은 라벨을 만들어서 덮는 방법이었는데요.

Func XSkinColorTabCreate($XTleft, $XTtop, $XTwidth, $XTlength, $XTcolor)
	Local $XTab1 = GUICtrlCreateTab($XTleft, $XTtop, $XTwidth, $XTlength) ;, BitOR($TCS_MULTILINE, $TCS_RIGHTJUSTIFY))
	GUICtrlCreateLabel("", $XTleft + 2, $XTtop + 20, $XTwidth - 6, $XTlength - 24)
	GUICtrlSetBkColor(-1, $XTcolor)
	GUICtrlSetState(-1, $GUI_DISABLE)
	Return $XTab1
EndFunc   ;==>XSkinColorTabCreate

탭에 배경색을 넣을 수 있지만, 탭 제목과 색이 맞지 않습니다.

하지만, 이걸 조금만 더 발전시키면, 각 탭별로 다른 색을 넣을 수도 있고, 탭 제목에도 각 탭과 같은 색을 넣을 수 있습니다.

포럼에 있는 소스를 약간 변형한 건데, 주소를 찾을 수가 없네요.

아래 사진입니다.

Tab에 라벨을 만드는 것이 아니라 TabItem에 배경으로 사용할 라벨을 만드는 겁니다.

또 라벨을 만들어서 탭 제목을 대신하게 하고, 라벨을 클릭했을 때, 해당 TabItem을 보여주는 방법을 이용했습니다.

눈에 잘 띄게 하려고 색을 원색으로 했더니, 눈이 아프네요.