Jump to content

ViewIcon


Mikon
 Share

Recommended Posts

just made this little script and i thought it could be usefull for someone

as the topic description says it shows the icons in shell32.dll, which is imo quite usefull for GUI-makers

i don't know if Buttons with $BS_ICON style require beta but i think so, so be warned ;)

well, here it is

#include <GUIConstants.au3>

Global $Buttons[16 * 15]

GUICreate("ViewIcons - Icons in shell32.dll", 16 * 40, 15 * 40)
For $i = 1 To 15
    $y = $i * 40 - 40
    For $j = 1 To 16
        $x = $j * 40 - 40
        $Buttons[($i - 1) * 16 + $j - 1] = GUICtrlCreateButton("", $x, $y, 40, 40, $BS_ICON)
        GUICtrlSetImage($Buttons[($i - 1) * 16 + $j - 1], "shell32.dll", ($i - 1) * 16 + $j)
    Next
Next

GUISetState()

While 1
    $msg = GUIGetMsg()
    If $msg = $GUI_EVENT_CLOSE Then Exit
    For $k = 1 To 16 * 15
        If $msg = $Buttons[$k - 1] Then MsgBox(0, "ViewIcons", "The selected Button's IconId is " & $k)
    Next
WEnd

Mikon

Link to comment
Share on other sites

it shows the icons in shell32.dll,

Nice job Mikon! You can also find some oldies-but-goodies in progman.exe in the same folder...
...by the way, it's pronounced: "JIF"... Bob Berry --- inventor of the GIF format
Link to comment
Share on other sites

Create an account or sign in to comment

You need to be a member in order to leave a comment

Create an account

Sign up for a new account in our community. It's easy!

Register a new account

Sign in

Already have an account? Sign in here.

Sign In Now
 Share

  • Recently Browsing   0 members

    • No registered users viewing this page.
×
×
  • Create New...