viernes, 7 de noviembre de 2008

COLOCAR UN GIF ANIMADO EN UN FORMULARIO

Para realizar este procedimiento utilizaremos una dll, que permitira el movimiento de cualquier gif animado...

los primero que deben hacer es lo siguiente

en esta pagina encuentran la DLL

http://www.megaupload.com/es/?d=JFLCUXKP

Una vez que la descargan la cuardan dentro de la carpeta en donde guardaran todo su proyecto ...


luego entran a visual basic ...

crean un formulario nuevo, le colocan sus respectivas propiedades

Luego se van al menu PROYECTO y dan un clic en la opcion COMPONENTE

En la ventana que se muestra ubican el boton examinar y dan un clic en el, luego buscan la dll, que la guardaron dentro de la carpeta donde guardaran todo su proyecto ...

seleccionan la dll y en su ventana de componente se mostrara, dan un clic en el boton ACEPTAR.

Una vez hecho todos esos pasos

te fijas en la caja de HERRAMIENTAS, veras que se agrego un nuevo control en ella

Das un clic en el y lo arrastras en el formulario

le colocas en su propiedad nombre ... su respectivo nombre por ejm GIf

luego realizas doble clic en el formulario y activas el evento ACTIVATE, por default siempre se encuentra el evento load en el formulario, ya sabes lo cambias a ACTIVATE.

Escribes la sgte linea de codigo:


Private Sub Form_Activate()

gif.FileName = (App.Path & "\4.gif")

End Sub

t explico el codigo para que lo entiendas mejor

si t das cuenta en Private sub esta activado el evento ACTIVATE

eso permite que cuando el formulario cargue se active el gif animado

luego sigue la linea de codigo

gif.FileName = (App.Path & "\4.gif")

gif = al nombre del control

filename = es la propiedad que busca la direccion o URL

APP.PATH = es una funcion que sirve para reducir la direccion en donde se encuentra el archivo en este caso el gif animado, colocando solo en nombre del gif ... en este programa el gif se llama 4 y su extension es .gif

ojo esta funcion solo funciona si tu archivo esta esta guardado dentro de la misma carpeta del programa, me refiero al gif animado que vaz a mostrar en tu formulario, no a la dll, no confundir por favor ...!!!

y por ultimo

end sub = finaliza el programa

una vez echo este procedimiento ejecutas el programa y veraz como se muestra tu gif animado

IMAGENES DEL PROCEDIMIENTO

AGREGAR UN CONTROL NUEVO A LA CAJA DE HERRAMIENTAS



UBICAR EL DLL
Para ubicar la dll debes poner la opcion todos los archivos, en la ventana buscar
y agregas la dll gif89, asi se llama la dll



INSERTAR EL CONTROL EN LA CAJA DE HERRAMIENTAS


EN LA CAJA DE HERRAMIENTAS SE MUESTRA EL CONTROL NUEVO, ES EL DE COLOR AZUL UNO DE LOS DOS ULTIMOS CONTROLES




LO DIBUJAS EN EL FORMULARIO Y LE CAMBIAS EL NOMBRE




ACTIVAS EL EVENTO ACTIVATE


DIGITAS LA LINEA DE CODIGO


AL FINAL EJECUTAS EL PROGRAMA Y LISTO








































































































































































3 comentarios:

Misael dijo...

Hola, me parece excelente la informacion que proporcionas.
pero no sabes donde puedo encontrar la opcion de "Componentes" en Visual Basic 2008??
me seria de gran utilidad agregar Gif a los proyectos.gracias

Anónimo dijo...

GRACIAS HE LOGRADO LO QUE MAS ESPERABA UN SALUDO

Unknown dijo...

disculpa Bro.. podrias subir el DLL o decirme el nombre para buscarlo.. y decho aprovecho para preguntar.. si con ese DLL hay como poner imagenes .GIF como fondo de un formulario??