[morgan1991]

Вопрос закрыт. Решение с Русского сообщества:

Код:

#AutoIt3Wrapper_Run_AU3Check=n ;Пропускать предупреждения при сборке

#include <GDIPlus.au3>
#include <Icons.au3>
GUICreate('',300,300)
GUICtrlCreateLabel('',0,0,300,100)
GUICtrlSetBkColor(-1,0x000000)
_Set_Icn_Alfa('imageres.dll',1,10,5,50)
_Set_Icn_Alfa('imageres.dll',100,60,5,50)
_Set_Icn_Alfa('imageres.dll',101,110,5,50)
GUISetState()

While 1
  If -3=GUIGetMsg()Then Exit
WEnd

Func _Set_Icn_Alfa($sFile,$n,$iX,$iY,$k)
  Local $ID=GUICtrlCreatePic('',$iX,$iY,$k,$k)
  Local $hIcon=_Icons_Icon_Extract($sFile,$n,$k,$k)
  Local $hBitmap=_Icons_Bitmap_CreateFromIcon($hIcon)
  Local $0=_SetHImage($ID,$hBitmap)+_WinAPI_DeleteObject($hBitmap)+_WinAPI_DestroyIcon($hIcon)
  Return $ID
EndFunc

Источник