Como crear un Efecto CSS con VFP

En este pequeño ejemplo se muestra la manera de cómo podemos crear unos Pequeños trucos para poder emular esos efectos CSS que tanto nos llama la atención y muchas veces queremos implementarlos en nuestros sistemas. 

Lo bueno es que hoy día no necesitas recurrir a complejos sistemas para conseguir menús vistosos en VFP, sino que unos simples trucos podremos crear grandes animaciones para nuestros sistemas.

Cuando el ratón se mueve a los elementos especificados, se desplegará una barra de manera horizontal en el menú.

Existen muchas formas de crear estos efectos CSS para VFP, yo decidí hacerlo de esta forma y espero les sirva.

El el Procedimiento INIT colocaremos las siguientes instrucciones:

thisform.container1.shape3.Visible =.f.

thisform.container1.shape4.Visible =.f.

thisform.container1.image1.Visible =.f.

thisform.container2.edit1.Value ="El ejemplo de este programa es para mostrar otra forma de poder crear Menu al estilo de CSS con VFP."+CHR(13)+"El programa lo podràs modificar y ajustar a tus necesidades."+;

""+CHR(13)+"Desplaza el mouse sobre las etiquetas y podràs notar el efecto que hace."

Creamos un método llamado movimiento y colocamos lo siguiente:

FOR xleft=0 TO 237 step 0.03

   thisform.container1.shape3.Width  =xleft 

next