Extraer icono de mi ejecutable y aplicarlo [SOLUCION]
Publicado: 06 Ago 2015, 19:57
Un buen día a todos, puede que esto sepan muchos, pero lo pongo para que pueda ser util para quienes no lo sabíamos.
Bueno lo realicé con el fin reducir el tamaño de mi ejecutable, ya que ANTES hacia que se compile con un icono agregado mediante FileInstall, y el icono pesaba 53.9kb.
Esto lo que hace es crear iconos de acuerdo al tamaño que se desee, por ejemplo yo necesito un icono de 16x16 para aplicarlo en la barra de la ventana y en el TrayIcon, otro icono es de 32x32 que lo necesito para aplicarlo en la cabecera de mi aplicación y uno mas grande de 120x120 para aplicarlo en el Acerca de...
Cabe mencionar que para aplicar los tamaños estos no deben supera el tamaño del icono con el que hayan compilado.
Bueno espero sea de ayuda... saludos
Bueno lo realicé con el fin reducir el tamaño de mi ejecutable, ya que ANTES hacia que se compile con un icono agregado mediante FileInstall, y el icono pesaba 53.9kb.
Esto lo que hace es crear iconos de acuerdo al tamaño que se desee, por ejemplo yo necesito un icono de 16x16 para aplicarlo en la barra de la ventana y en el TrayIcon, otro icono es de 32x32 que lo necesito para aplicarlo en la cabecera de mi aplicación y uno mas grande de 120x120 para aplicarlo en el Acerca de...
Cabe mencionar que para aplicar los tamaños estos no deben supera el tamaño del icono con el que hayan compilado.
Bueno espero sea de ayuda... saludos
Código: Seleccionar todo
#include <WinAPIGdi.au3>
#include <WinAPIShellEx.au3>
_crearIconos("iconoAvy16", 16, 16)
_crearIconos("iconoAvy32", 32, 32)
_crearIconos("iconoAvy120", 120, 120)
Func _crearIconos($nombreIcono, $ancho, $alto)
Local $aIcon = _WinAPI_Create32BitHICON(_WinAPI_ShellExtractIcon(@ScriptFullPath, 0, $ancho, $alto), 1)
_WinAPI_SaveHICONToFile(@TempDir& "\" & $nombreIcono&".ico", $aIcon)
$aIcon = ""
EndFunc ;==>_crearIconos