Sección de controles Ocx para Visual basic , Dll , Activex

124 - Ocx para aplicar los temas de windows xp en los controles

Simple control ocx par usar Textbox estilo windows xp y poder cambiar el color del borde al perder y recibir el foco

Este exelente ocx es un activex open Source totalmente gratuito mejorado por Mario Alberto Flores

El activex permite aplicar los temas de windows xp a todos los controles del formulario mediante una simple línea de código, inclusive si el servicio de temas de windows no se se está ejecutando

Los temas de que permite aplicar son el color azul predeterminado que utiliza windows ( el tema de xp por defecto ), el estilo plateado y el verde oliva.

Además, permite indicar a que controles le podemos aplicar los themes de xp, por defecto se aplica a todos los que estén en el formulario, es decir los controles clásicos de visual basic ( listbox, CommandButton, Frame, DirListBox etc...) y los controles comunes o los Microsoft Windows Common Controls ( ListView, TabStrip , ProgressBar, Slider, Statusbar etc..) .

También permite indicar que controles usarán o no usarán el estilo xp ( Esto se puede configurar desde la página de propiedades del control ocx indicando control por control )

Vista de la página de propiedades

vista de la página de propiedades del control ocx para configurar las opciones

Esta es una vista previa de algunos controles con el estilo Verde Oliva ( los de arriba son los controles clásicos de vb y los de abajo los windows Common Controls )

vista del formulario con los controles

Además de poder trabajar con los controles, permite hacerlo con los MsgBox, los InputBox y los CommonDialog

Vista previa de un MsgBox con el tema verde oliva

vista de un msgbox con el tema verde oliva

Vista de un InputBox con el tema xp plateado

vista de un inputbox con el tema plateado de wind xp

Nota: por defecto, los CommonDialog no se visualizan con el tema xp, para eso se debe indicar desde la página de propiedades del ocx, en la opción "SubClassing Common Dialog"

Para poder usar el ocx es muy simple, se debe colocar una instancia del control en el formulario, configurarlo para elegir que tema de windows usar , indicar que controles, y luego en el formLoad ejecutar el método InitSubClassing , por ejemplo

Private Sub Form_Load()

WindowsXPC1.InitSubClassing

End Sub

Nota: para aplicar en varios formularios, se debe colocar un ocx por cada formulario

Para poder finalizarlo y quitar los temas a los controles, tiene un método llamado EndWinXPCSubClassing

Descargar solo el control Ocx

Descargar código fuente

Importante : si solo se quiere aplicar los temas de win xp , si el servicio está corriendo en windows, lo ideal es usar un archivo xml Manifest, ya que de esta manera estaremos ahorrando recursos al no utilizar ningún ocx que recargue el programa.

Por lo tanto el control es muy útil si se quiere aplicar los estilos xp si o si, sin importar la configuración que tenga el usuario que ejecuta la aplicación

En este enalce tenés un ejemplo simple de como utilizar un archivo xml para lo dicho, y si no en el San Google hay muchos ejemplos sobre el tema

Aplicar estilo xp a los controles con un archivo manifest

Buscar en Recursos vb con Google