[Creat0R]

для выбора иконки с файла и получения строки вида - имя файла, иконка. Для использования потом в коде »

Код:

#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
#include <Array.au3>
#include <WinAPI.au3>

$hGUI = GUICreate('Icons', 150, 150, -1, -1, BitOR($WS_POPUP, $WS_BORDER))
GUISetState(@SW_SHOW, $hGUI)

$iLoading_Lbl = GUICtrlCreateLabel('Loading...', 10, 10)

$aIcons = _LoadIcons('shell32.dll')
$iRandom = Random(1, $aIcons[0][0], 1)
$iCenter = (150  / 2) - (32 / 2)

GUICtrlDelete($iLoading_Lbl)
GUICtrlCreateIcon($aIcons[$iRandom][0], $aIcons[$iRandom][1], $iCenter, $iCenter, 32, 32)

While 1
    $iMsg = GUIGetMsg()

    Switch $iMsg
        Case $GUI_EVENT_CLOSE
            Exit
    EndSwitch
WEnd

Func _LoadIcons($sFile)
    Local $iIcons = _WinAPI_ExtractIconEx($sFile, -1, 0, 0, -1)
    Local $aIcons[$iIcons + 1][2] = [[$iIcons]]

    For $i = 1 To $iIcons
        $aIcons[$i][0] = $sFile
        $aIcons[$i][1] = -$i
    Next

    Return $aIcons
EndFunc