Manuel, Está muy bonito. Ahora quedan un par de cosas que solucionar. He hecho una prueba en la clase TGet en el PAINT después de evaluar el bPainted, he puesto if(::lFocused, LightBorder( Qself() ), ) Para que no ponga el borde en todos los gets de la pantalla, sólo cuando coja el foco. ...