Help me remove background color icon on tab.

[john123]

Hi everybody.

Please help me the way to remove white color from background icon on tab. I've searched in forum but have no result.

Thanks very much.

#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <TabConstants.au3>
#include <WindowsConstants.au3>

#Region ### START Koda GUI section ### Form=
$Form1 = GUICreate("Form1", 633, 447, 192, 124)
$Tab1 = GUICtrlCreateTab(176, 88, 289, 193)
GUICtrlSetResizing(-1, $GUI_DOCKWIDTH+$GUI_DOCKHEIGHT)
$TabSheet1 = GUICtrlCreateTabItem("TabSheet1")
$Icon1 = GUICtrlCreateIcon("D:\1.ico", 0, 344, 168, 72, 56, BitOR($SS_NOTIFY,$WS_GROUP))
GUICtrlCreateTabItem("")
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###

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

    EndSwitch
WEnd

http://farm4.static.flickr.com/3564/339608...3a1b8e366_m.jpg

1.ico

[MrMitchell]

Change the background color of the GUI Tabsheet to match that of the icon. Or, create a new icon with a background color that matches the GUI tabsheet. If this is even possible?? Help file time

Edit: Meant TabSheet not the GUI window.

Edited March 29, 2009 by MrMitchell

[MrMitchell]

Darn. Found "GUICtrlSetBkColor ( controlID, backgroundcolor )" but unfortunately it apparently doesn't work on tabs.

[Melba23]

john123,

If you look here you will see that the background colour of icons on tabs is always that of the default form colour. So even transparent icons will not behave when used on tabs - unless the colours match of course. ;-)

M23

[Yashied]

john123, I changed the function _DrawCombineBkIcon() to you. I think this is what you want.

#Include <SetBkIcon.au3>

Opt('PixelCoordMode', 2)

GUICreate('Test', 398, 424)
$Tab = GUICtrlCreateTab(7, 7, 386, 380)
GUICtrlSetFont(-1, 8.5, 400, 0, 'Tahoma')
GUICtrlCreateTabItem('Tab1')
$Icon = GUICtrlCreateIcon('', 0, 32, 66, 48, 48)
GUISetState()
_SetBkIcon($Icon, PixelGetColor(5, 15, GUICtrlGetHandle($Tab)), @SystemDir & '\shell32.dll', 130, 48, 48)

do
until GUIGetMsg() = -3

SetBkIcon.au3

Edited May 12, 2009 by Yashied

[Melba23]

Yashied,

Very nice.

M23

[Yashied]

I did change my post to better use.

_DrawBkIcon() -> _SetBkIcon()

[john123]

Thank you very much.

Have a nice day.

[Yashied]

Thank you very much.

Have a nice day.

Your welcome.

Let's try it, may be also be interesting.

http://www.autoitscript.com/forum/index.php?showtopic=89371