Icon GUI control from icon handle?

[cyberbit]

Hi again.

I'm trying to find a way to get the path and ID of an icon based on an icon handle, like something returned from WinAPI_ShellExtractAssociatedIcon. Is this even possible?

Regards,

Cyberbit

[PhoenixXL]

look at _WinAPI_GetIconInfoEx in

Edited November 2, 2012 by PhoenixXL

[cyberbit]

I've tried that, but it only works like this:

$hInstance = _WinAPI_LoadLibraryEx(@AutoItExe, $LOAD_LIBRARY_AS_DATAFILE)
$hIcon = _WinAPI_LoadImage($hInstance, 99, $IMAGE_ICON, 0, 0, $LR_DEFAULTSIZE)
$aInfo = _WinAPI_GetIconInfoEx($hIcon)

Alternatively, is is possible to set the icon of a GUI using a generic image/icon handle?

Regards,

Cyberbit

Edited November 5, 2012 by cyberbit

[PhoenixXL]

have a look at this example

expandcollapse popup

#NoTrayIcon

#Include <APIConstants.au3>

Opt('MustDeclareVars', 1)

Global $hForm, $hParent

$hParent = GUICreate('', 0, 0, 0, 0, 0, $WS_EX_TOOLWINDOW)
$hForm = GUICreate('MyGUI', 400, 400, -1, -1, BitOR($WS_CAPTION, $WS_POPUP, $WS_SYSMENU), BitOR($WS_EX_DLGMODALFRAME, $WS_EX_TOPMOST), $hParent)

; Remove window icon
_WinAPI_SetClassLongEx($hForm, $GCL_HICONSM, 0)
_WinAPI_SetClassLongEx($hForm, $GCL_HICON, 0)

GUISetState()

Do
Until GUIGetMsg() = -3

; #FUNCTION# ====================================================================================================================
; Name...........: _WinAPI_SetClassLongEx
; Description....: Replaces the specified value into the specified window belongs.
; Syntax.........: _WinAPI_SetClassLongEx ( $hWnd, $iIndex, $iNewLong )
; Parameters.....: $hWnd     - Handle to the window.
;                  $iIndex   - The value to be replaced. This parameter can be one of the following values.
;
;                              $GCL_CBCLSEXTRA
;                              $GCL_CBWNDEXTRA
;                              $GCL_HBRBACKGROUND
;                              $GCL_HCURSOR
;                              $GCL_HICON
;                              $GCL_HICONSM
;                              $GCL_HMODULE
;                              $GCL_MENUNAME
;                              $GCL_STYLE
;                              $GCL_WNDPROC
;
;                  $iNewLong - The replacement value.
; Return values..: Success   - The previous value.
;                  Failure   - 0 and sets the @error flag to non-zero.
; Author.........: Yashied
; Modified.......:
; Remarks........: None
; Related........:
; Link...........: @@MsdnLink@@ SetClassLong
; Example........: Yes
; ===============================================================================================================================

Func _WinAPI_SetClassLongEx($hWnd, $iIndex, $iNewLong)

Local $Ret

If @AutoItX64 Then
$Ret = DllCall('user32.dll', 'ulong_ptr', 'SetClassLongPtrW', 'hwnd', $hWnd, 'int', $iIndex, 'long_ptr', $iNewLong)
Else
$Ret = DllCall('user32.dll', 'ulong', 'SetClassLongW', 'hwnd', $hWnd, 'int', $iIndex, 'long', $iNewLong)
EndIf
If (@error) Or (Not $Ret[0]) Then
Return SetError(1, 0, 0)
EndIf
Return $Ret[0]
EndFunc   ;==>_WinAPI_SetClassLongEx

[cyberbit]

Awesome. Works like a charm.

While that works for a title, it still doesn't solve the Icon control issue. Would you recommend using the IconSave functions to write the image data to a temporary file then pulling that to a control?

Regards,

Cyberbit

[PhoenixXL]

This shows saving the Icon

#include <WinAPIEx.au3>
#include <WindowsConstants.au3>
#include <APIConstants.au3>

Global $hForm, $hParent

$hParent = GUICreate('', 0, 0, 0, 0, 0, $WS_EX_TOOLWINDOW)
$hForm = GUICreate('MyGUI', 400, 400, -1, -1, BitOR($WS_CAPTION, $WS_POPUP, $WS_SYSMENU), BitOR($WS_EX_DLGMODALFRAME, $WS_EX_TOPMOST), $hParent)

; Get Icon Handle
$hIcon = _WinAPI_GetClassLongEx($hForm, $GCL_HICONSM)
; Lets Save it
_WinAPI_SaveHICONToFile(@ScriptDir&'Test.ico',$hIcon)
;Gone Fishing ;)

If @error Then Exit @error

Exit

Next adding it to the control

you can do that..

Edited November 5, 2012 by PhoenixXL