Sign in to follow this  
Followers 0
Mikon

ViewIcon

6 posts in this topic

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

Share this post


Link to post
Share on other sites



Nice layout.


Who else would I be?

Share this post


Link to post
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

Share this post


Link to post
Share on other sites

nice work...

I could have accomplished that in ... oh... about 100 to 150 lines of script

(probably more than that actually)

nice layout and response when pressing the button and recieving the icon number.... good short crisp coding

8)


NEWHeader1.png

Share this post


Link to post
Share on other sites

hey, thats cool! now maybe a way to change them...


The cake is a lie.www.theguy0000.com is currentlyUP images.theguy0000.com is currentlyUP all other *.theguy0000.com sites are DOWN

Share this post


Link to post
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
Sign in to follow this  
Followers 0