[Vsirf]

Чтобы нормально работало, в ImageList должно быть не менее пяти иконок(картинок), а не три, как в Вашем примере. »

madmasles, сделал,но изображение только на одной кнопке,на второй не отображается

читать дальше »

Код:

#include <GDIPlus.au3>
#include <WindowsConstants.au3>
#include <GUIConstantsEx.au3>
#include <GuiButton.au3>
#include <GuiImageList.au3>

GUICreate('Добро пожаловать', 600, 300)
GUICtrlCreatePic(@ScriptDir & '\Resources\gfxinstall.jpg', 0, 0, 600, 300)
GUICtrlSetState(-1, $GUI_DISABLE)
GUISetState()

$hImageList = _GUIImageList_Create(35, 22, 5)
_GDIPlus_Startup()
_Image(@ScriptDir & '\Resources\png\1.png')
_Image(@ScriptDir & '\Resources\png\2.png')
_Image(@ScriptDir & '\Resources\png\3.png')
_Image(@ScriptDir & '\Resources\png\4.png')
_Image(@ScriptDir & '\Resources\png\5.png')
_GDIPlus_Shutdown()

$Button1 = GUICtrlCreateButton("", 10, 50, 35, 22)
_GUICtrlButton_SetImageList(-1, $hImageList, 1)
; =====================================
$hImageList1 = _GUIImageList_Create(35, 22, 5)
_GDIPlus_Startup()
_Image(@ScriptDir & '\Resources\png\1.png')
_Image(@ScriptDir & '\Resources\png\2.png')
_Image(@ScriptDir & '\Resources\png\3.png')
_Image(@ScriptDir & '\Resources\png\4.png')
_Image(@ScriptDir & '\Resources\png\5.png')
_GDIPlus_Shutdown()

$Button2 = GUICtrlCreateButton("", 10, 150, 35, 22)
_GUICtrlButton_SetImageList(-1, $hImageList1, 1)
GUISetState()

While 1
	    Switch GUIGetMsg()
        Case -3, $Button1
            Exit
		EndSwitch
		
		Switch GUIGetMsg()
        Case -3, $Button2
            Exit
		EndSwitch
		
	WEnd


Func _Image($Path)
    $h_Image = _GDIPlus_BitmapCreateFromFile($Path)
    $h_Bitmap =_GDIPlus_BitmapCreateHBITMAPFromBitmap($h_Image)
    _GUIImageList_Add($hImageList, $h_Bitmap)
    _GDIPlus_ImageDispose($h_Image)
    _WinAPI_DeleteObject($h_Bitmap)
EndFunc

и еще,как кнопку сделать прозрачной,что бы отображалась лиш картинка?