Tabitem mit [.ico/.png/.gif]-Icon (und Transparenz)

  • Hallo!
    Ich steh wieder vor ner Wand - vielleicht könnt ihr mir helfen.

    Kurz und knapp: Ich möchte meine TabItems mit einem Icon versehen. Dieses hat Transparenz (Logisch, sonst siehts ja scheiße aus)
    Allerdings klappt es nicht. Wenn ich es mit einem .ico probiere, bleibt ein schwarzer hintergrund um das Icon. PNG und Gif werden garnicht angezeigt.
    Dabei ist es in der Hilfe zu z.B.: _GUICtrlButton_SetImageList() so schön :(

    Was mache ich falsch!?

    Spoiler anzeigen
    [autoit]

    #include <GDIPlus.au3>
    #include <GuiImageList.au3>
    #include <GuiTab.au3>
    $hGUI = GUICreate("", 800, 400)
    GUISetFont(14)
    $MenuMain1 = GUICtrlCreateMenu("&Datei")
    $Menu1Sub1 = GUICtrlCreateMenuItem("Beenden", $MenuMain1)
    $MenuMain2 = GUICtrlCreateMenu("&Hilfe")
    $TabParent = GUICtrlCreateTab(20, 60, 760, 280,BitOR(0x0040,0x0008))
    For $i = 0 to 4
    $hImageList = _GUIImageList_Create(32,32)
    _GDIPlus_Startup()
    ;~ _GUIImageList_Add($hImageList,_GDIPlus_ImageLoadFromFile(@ScriptDir&"\head.png"))
    ;~ _GUIImageList_Add($hImageList,_GDIPlus_ImageLoadFromFile(@ScriptDir&"\head.gif"))
    _GUIImageList_AddIcon($hImageList,@ScriptDir&"\head.ico")
    _GUICtrlTab_SetImageList($TabParent,$hImageList)
    _GUICtrlTab_InsertItem($TabParent,$i,"TabItem",0)
    _GDIPlus_Shutdown()
    Next
    GUICtrlCreateTabItem("")
    $guiLog = GUICtrlCreateLabel("", 20, 340, 760, 40,BitOR(0x0200,0x01))
    GUICtrlSetFont(-1,15)
    $Button = GUICtrlCreateButton("Button", 500, 0, 275, 40)
    GUISetState(@SW_SHOW)
    While GUIGetMsg() <> -3
    Sleep(10)
    WEnd

    [/autoit] [autoit][/autoit] [autoit][/autoit]

    Im Anhang ist das archiv mit den 3 verschiedenen Bildern

    EDIT: Rechtschreibfehler ausgebessert! Ich hasse die Dinger!

    • Offizieller Beitrag

    Mach es doch einfach so: ;)

    Spoiler anzeigen
    [autoit]

    #include <GDIPlus.au3>
    #include <GuiImageList.au3>
    #include <GuiTab.au3>
    $hGUI = GUICreate("", 800, 400)
    GUISetFont(14)
    $MenuMain1 = GUICtrlCreateMenu("&Datei")
    $Menu1Sub1 = GUICtrlCreateMenuItem("Beenden", $MenuMain1)
    $MenuMain2 = GUICtrlCreateMenu("&Hilfe")
    $TabParent = GUICtrlCreateTab(20, 60, 760, 280,BitOR(0x0040,0x0008))
    For $i = 0 to 4
    $hImageList = _GUIImageList_Create(32,32,4,3)
    _GDIPlus_Startup()
    ;~ _GUIImageList_Add($hImageList,_GDIPlus_ImageLoadFromFile(@ScriptDir&"\head.png"))
    ;~ _GUIImageList_Add($hImageList,_GDIPlus_ImageLoadFromFile(@ScriptDir&"\head.gif"))
    _GUIImageList_AddIcon($hImageList,@ScriptDir&"\head.ico")
    _GUICtrlTab_SetImageList($TabParent,$hImageList)
    _GUICtrlTab_InsertItem($TabParent,$i,"TabItem",0)
    _GDIPlus_Shutdown()
    Next
    GUICtrlCreateTabItem("")
    $guiLog = GUICtrlCreateLabel("", 20, 340, 760, 40,BitOR(0x0200,0x01))
    GUICtrlSetFont(-1,15)
    $Button = GUICtrlCreateButton("Button", 500, 0, 275, 40)
    GUISetState(@SW_SHOW)
    While GUIGetMsg() <> -3
    Sleep(10)
    WEnd

    [/autoit]