Counting ICON's in a DLL/EXE file?

[privoli]

In regards to http://www.vb-world.net/tips/tip136.html (Extract Icons From Files) is there a way we can someone count or calulate how many icons are in a DLL file?

Cheers

Edited by privoli on 02-26-2000 at 01:36 AM

[MicahCarrick]

Yes. The ExtractIconEX function will do that as well ... here's how:

Declare Function ExtractIconEx Lib "shell32.dll" Alias "ExtractIconExA" (ByVal lpszFile As String, ByVal nIconIndex As Long, phiconLarge As Long, phiconSmall As Long, ByVal nIcons As Long) As Long



dim lReturn as long

lReturn = ExtractIconEx("C:\Windows\System\Shell32.dll", -1, ByVal 0, ByVal0, 0)

Debug.print "There are " & lReturn - 1 & " icons in the file."