Visual Fox

Agregar efectos a sus formularios
Artículo original: Add a fading effect to your forms
http://www.ml-consult.co.uk/foxst-40.htm [2]
Autor: Mike Lewis (http://www.ml-consult.co.uk [3])
Traducido por: Ana María Bisbé York (amby@telefonica.net [4])
Para: PortalFox (http://www.portalfox.com [5])

Al crear formularios que se muestren y desaparezcan gradualmente puede añadir efectos visuales asus aplicaciones Visual FoxPro
Puede haber notado que en sus aplicaciones favoritas de Windows algunas ventanas aparecen y desaparecen gradualmente cuando se abren, en lugar de abrirse instantáneamente. De forma similar, cuando se cierra una ventana, puede tomar un segundo o más en lugar de desaparecer de pronto. Esto puede ser un efecto visual agradable (siempre y cuando sea con moderación). Latécnica trabaja especialmente bien con ventanas desplegables y alertas que el usuario puede no esperar. La aparición gradual de una ventana es frecuentemente más agradable a la vista que una que destella de pronto en la pantalla.
En este artículo, vamos a explicar cómo agregar este efecto a sus formularios Visual FoxPro. Describiremos además una clase formulario sencilla, llamada FadeForm, queincorpora esta técnica. Puede descargar la clase y utilizarla directamente para crear sus propios formularios. Vea debajo las instrucciones para la descarga.
Esencialmente, esta técnica se encarga de incrementar o disminuir gradualmente la transparencia del formulario. Incluso si no está interesado en crear formularios, puede adaptar este código para otras situaciones que pudiera desear hacer unformulario parcialmente transparente.
Un par de inconvenientes
Antes de seguir adelante, debemos puntualizar un par de limitaciones de esta técnica. Primeramente necesita ciertas llamadas de API que trabajan solamente en Windows 2000 o superior. Si sus usuarios aun trabajan en Windows 98, no podrá ofrecerles esta posibilidad.
Más importante aun, la técnica trabaja solamente en formularios de nivelsuperior. Un formulario de nivel superior es uno que aparece independientemente de la ventana de salida principal de la aplicación. De forma predeterminada, tiene su propio botón en la barra de tareas de Windows (se puede ocultar este botón al igualar a .F. la propiedad ShowInTaskbar y puede moverse fuera de la ventana de salida. Para crear un formulario de nivel superior iguale a 2 la propiedadde formulario ShowWindow (ya lo hemos hecho en la clase FadeForm en la descarga de este artículo)
Crear un formulario transparente
Para lograr esta magia, el formulario utiliza una función API de Windows llamada SetLayeredWindowAttributes(). Esta función puede ayudar a crear un grupo interesante de trucos visuales. En el que estamos interesados es en la capacidad de hacer un formulariotransparente. Más exactamente, puede incrementar o disminuir el grado de opacidad de un formulario en pasos muy pequeños. El factor de opacidad puede variar desde 0 (completamente transparente) a 255 (completamente opaco).
Entonces, para hacer que el formulario aparezca gradualmente, puede comenzar haciéndolo completamente transparente. Puede entonces, incrementar la opacidad hasta que el formulario seacompletamente opaco. De forma similar, para hacer que el formulario desaparezca puede comenzar con el máximo de opacidad (255) y disminuirla hasta que alcance cero.
Declarar funciones API
Antes de que haga nada de esto, tiene que declarar la función SetLayeredWindowAttributes() dentro de VFP. Además, debe declarar un par de llamadas a funciones API: SetWindowLong, que activa el formulario como"ventana en capas", y Sleep(), el que le permite introducir una demora corta cada vez que ajusta el factor de opacidad.
Como todas las declaraciones API, es ideal que estos DECLAREs se hagan sólo una vez, cerca del inicio de la sesión. Para mayor conveniencia, la clase formulario FadeForm en el archivo de descarga ejecuta la declaración en su evento Load; pero esto es lo ideal. Esto significa...