Añadir Themes de XP a programa VB
(2 artículos )
www.allapi.net
Entre las novedades de Windows XP está una nueva versión de la librería Common Controls. Una de las principales modificaciones son los 'Windows XP Themes'. Estos permiten seleccionar un tema y todo el aspecto de windows cambiará. Pero si escribes un proframa en VB, los botones, texbox, etc. que uses no cambiarán. Necesitas decirle a Windows XP que estás usando la nueva versión de la librería y para ello debes incluir un ficheri 'manifest'. Este fichero es un documento XML que windows busca en el directorio de la aplicación cuando la ejecutas. Este manifest le dice a windows que use la nueva versión de COMCTLR32.DLL (la versión 6).
Crea un nuevo proyecto y agraga a un formulario algunos controles estandard.
Añade la declaración (esta función está presente desde Windows 95) :
Private Declare Function InitCommonControls Lib "comctl32.dll" () As Long
Añade :
Private Sub Form_Initialize()
InitCommonControls
End Sub
Genera el ejecutable (el fichero manifest sólo funciona desde el .exe).
Crea un fichero que debe llamarse como tu .exe más la extensión .manifest. Es decir, si tu programa se llama 'MiPrograma.exe' el fichero debe llamarse 'MiPrograma.exe.manifest'.
Descargas y modificas el fichero manifest de ejemplo
Ahora sólo queda que ejecutes tu programa.
themes.zip
Si queremos introducir el fichero manifest dentro del ejecutable creado en VB podremos seguir los siguientes pasos :
Descargar el Resource Hacker de esta misma página o de http://www.users.on.net/johnson/resourcehacker
Ejecutarlo y abrir (File | Open) el exe generado en VB.
Seleccionamos Action | Add a new resorce
Seleccionamos Open file with new resource y abrimos el .manifest que hemos creado anteriormente.
Introducimos la siguiente información :
Resource type = 24
Resource name = 1
Resource language = 1041
Pulsamos en Add Resource
Guardamos el exe y probamos.
reshack.zip
Trucos
Página de Visual Basic
Página principal
