poll exe for icons?

[figgler]

I want to type a path to exe them poll it for icons

and list them in listview..

Hard coded example below

#include <GUIConstants.au3>

$Form1 = GUICreate("EXE Icons", 138, 237, 193, 115)
$EXEPATH = GUICtrlCreateLabel("Exe Path", 8, 8, 47, 17)
; hard coded just for example
$Input1 = GUICtrlCreateInput("C:\Program Files\Internet Explorer\iexplore.exe", 8, 32, 121, 21)
$Label1 = GUICtrlCreateLabel("List of icons in exe", 8, 64, 86, 17)
$listView = GUICtrlCreateListView("Icons", 8, 88, 121, 97)
GUICtrlSetStyle( $listView , ($LVS_SMALLICON) )
GUICtrlSetFont(-1, 8, 800, 0, "MS Sans Serif")

; Hard coded these to show what i want
$listViewItem1 = GUICtrlCreateListViewItem("0", $listView)
GUICtrlSetImage($listViewItem1, "C:\Program Files\Internet Explorer\iexplore.exe",0)
$listViewItem1 = GUICtrlCreateListViewItem("1", $listView)
GUICtrlSetImage($listViewItem1, "C:\Program Files\Internet Explorer\iexplore.exe",1)

$Show = GUICtrlCreateButton("Show Icons", 32, 200, 75, 25, 0)
GUISetState(@SW_SHOW)

While 1
    $nMsg = GUIGetMsg()
    Switch $nMsg
        Case $GUI_EVENT_CLOSE
            Exit
        Case $Show
            $path2exe = GUICtrlRead($Input1)
            ;poll the exe for icons 
            ;and add the icon and index number to listview
            
    EndSwitch
WEnd

Thanks

I know reshacker is installed but can it be used in a script ?

Edited July 21, 2007 by figgler

[martin]

I want to type a path to exe them poll it for icons

and list them in listview..

Hard coded example below

#include <GUIConstants.au3>

$Form1 = GUICreate("EXE Icons", 138, 237, 193, 115)
$EXEPATH = GUICtrlCreateLabel("Exe Path", 8, 8, 47, 17)
; hard coded just for example
$Input1 = GUICtrlCreateInput("C:\Program Files\Internet Explorer\iexplore.exe", 8, 32, 121, 21)
$Label1 = GUICtrlCreateLabel("List of icons in exe", 8, 64, 86, 17)
$listView = GUICtrlCreateListView("Icons", 8, 88, 121, 97)
GUICtrlSetStyle( $listView , ($LVS_SMALLICON) )
GUICtrlSetFont(-1, 8, 800, 0, "MS Sans Serif")

; Hard coded these to show what i want
$listViewItem1 = GUICtrlCreateListViewItem("0", $listView)
GUICtrlSetImage($listViewItem1, "C:\Program Files\Internet Explorer\iexplore.exe",0)
$listViewItem1 = GUICtrlCreateListViewItem("1", $listView)
GUICtrlSetImage($listViewItem1, "C:\Program Files\Internet Explorer\iexplore.exe",1)

$Show = GUICtrlCreateButton("Show Icons", 32, 200, 75, 25, 0)
GUISetState(@SW_SHOW)

While 1
    $nMsg = GUIGetMsg()
    Switch $nMsg
        Case $GUI_EVENT_CLOSE
            Exit
        Case $Show
            $path2exe = GUICtrlRead($Input1)
            ;poll the exe for icons 
            ;and add the icon and index number to listview
            
    EndSwitch
WEnd

Thanks

I know reshacker is installed but can it be used in a script ?

GUICtrlSetImage ?

[figgler]

GUICtrlSetImage

I would have to manualy set them

i want to read the exe find all icons

and then add them to the listview (dynamic)

[Holger]

Just take a look in my signature - "IconFileScanner".

Greets

Holger

[figgler]

IconFileScanner.au3 wont run !!

AutoIt Version: 3.2.4.9

And the script is way to complicated for me (newbie)

to extract the bits i would need ....

But thanks Holger

I need some thing like

$EXE = "C:\myprog.exe"

For each Icon in $EXE

GUICtrlCreateListViewItem("Index of icon", $listView)

GUICtrlSetImage("dont know how to declare this?", $EXE, Index of icon", )

Next

Edited July 21, 2007 by figgler

[figgler]

*BUMP*

Any ideas ?

[Gif]

*BUMP*

Any ideas ?

take a look at (Autoit folder)\examples\GUI\Advanced\enumicons.au3

[figgler]

Thank you so much

Its great if you know where to look

[martin]

Just take a look in my signature - "IconFileScanner".

Greets

Holger

You need to delete the incorrect Dim statements in that script Holger. Also, it appears to scans the directory for files with icons in the registry, it doesn't find the icons in the files. That would be a good addition to it.

[martin]

Thank you so much

Its great if you know where to look

Does that script use GuiCtrlSetImage by any chance?

[figgler]

lol martin yes it does but still cant figure which direction to

go with this i think again and post in the morning