Problemas al Cambiar el color de TEdit con estilo VCL Activado

[[nlsgarcia]]

El_Chava,

Empezado por El_Chava

...En un aplicación que estoy desarrollando en Delphi XE4 , dentro de las opciones del proyecto hay la posibilidad de cambiar el estilo...en algunos formularios de mi aplicación tengo que cambiar el color de un TEdit y al aplicar un estilo el TEdit no se le aplica el color...Encontré una solución en ingles...pero aun así no supe como implementar la solución...

Revisa el ejemplo asociado a este link:

Demo Changing the color of Edit Controls with VCL Styles Enabled : http://dl.dropbox.com/u/12733424/Blo...s%20Colors.zip

Probe el ejemplo sugerido en el link anterior en Delphi XE4 y funciono según lo esperado, la idea básica es:

1- Crear un TStyleHook.

2- Registrarlo por medio del método RegisterStyleHook en la sección de initialization.

3- Implementar el TStyleHook solo en el Form que se requiera por medio de un Clase de Enlace con la Clase del Control a Modificar el estilo.

Todo lo anterior esta implementado en el ejemplo del Demo.

Espero sea útil

Nelson.