-
AutoIt
(
http://forum.oszone.net/forumdisplay.php?f=103)
как поменять цвет фона в GUICtrlCreateTab
$Tab = GUICtrlCreateTab(10, 10,300, 300)
GUISetBkColor(0x8491a4) - не работает, как оно меняеться?
|
Код:
#include <GUIConstantsEx.au3>
#include <GUITab.au3>
$Gui = GUICreate("_GUICtrlTab_SetBkColor() Demo", 320, 280)
$hTab = GUICtrlCreateTab(10, 20, 300, 250)
GUICtrlCreateTabItem("Tab 1")
_GUICtrlTab_SetBkColor($Gui, $hTab, 0xFF0000)
GUICtrlCreateButton("Some Button", 20, 50)
GUICtrlCreateTabItem("Tab 2")
_GUICtrlTab_SetBkColor($Gui, $hTab, 0x00CC00)
GUICtrlCreateCheckbox("Some Checkbox", 20, 50)
GUISetState()
While 1
$Msg = GUIGetMsg()
Switch $Msg
Case $GUI_EVENT_CLOSE
Exit
EndSwitch
WEnd
Func _GUICtrlTab_SetBkColor($hWnd, $hSysTab32, $sBkColor)
Local $aTabPos = ControlGetPos($hWnd, "", $hSysTab32)
Local $aTab_Rect = _GUICtrlTab_GetItemRect($hSysTab32, -1)
GUICtrlCreateLabel("", $aTabPos[0]+2, $aTabPos[1]+$aTab_Rect[3]+4, $aTabPos[2]-4, $aTabPos[3]-$aTab_Rect[3]-7)
GUICtrlSetBkColor(-1, $sBkColor)
GUICtrlSetState(-1, $GUI_DISABLE)
EndFunc
И ещё по теме: Решение проблемы цвета для элементов на Tab'ах
|
Время: 11:43.
© OSzone.net 2001-