viernes, mayo 14, 2010

Como crear un Visualizador de imagenes

Como podeis ver el diseño final es una pasada, bien comenzaremos lo primero es relacionar el DriveList, con el DirList y este a su vez con el File List, por ultimo recomiendo usar On Error go to resume para que en caso de error no lo muestre.

Bien ese contenido es el que pondremos en el form Load, haciendo doble clic en el Formulario, y servira para mostrar solo los archivos que hagamos clic con las extensiones GIF, JPG, y BMP que seran imagenes. Y la propiedad de Image Strech sirve para hacer la imagen redimensionado al tamaño dado al picture.

Esto lo tendremos que poner dentro del File1 para al hacer clic que lea la ruta, y el resultado lo muestre en image.picture.

Y aqui la gota que colma el proyecto, crearemos un Boton llamado Preview para que las fotos pasen automaticamente y al llegar al final vuelvan al principio de hay que tenga un lujoso 10 !



Aqui esta el contenido del Timer 2 desde el que enlazaremos en el Boton Preview conectando o desconectandolo con la propiedad Enable.
En el Timer 2 se ve como al ListIndex se le suma 1 y cuando llegue al ListCount volvera al principio.


Por ultimo ese código lo Introduciremos en el botón Siguiente para pasar de una foto a otra de manera manual. Y lo mismo para el Botón anterior pero con el símbolo -.

By Ruben Santana

Como crear un deposito y Visualizador de imagenes

Practica deposito de Gasolina

Crearemos
2 Labels
1 Cuadro de texto
1 Cuadro dentro
2 Timers
2 Botones
Los menus
Y ahora pasaremos al código...
Aqui podemos distinguir 2 partes la de arriba que es la del boton Start que es para que cambie a Stop y al pulsar Stop pare y en Start empiece y la de abajo:
La de abajo trabaja con el picture para saber hasta cuando se debe llenar es decir hacer el cuadro grande poniendo unos limites basados en la variable incremento.

Y aqui tenemos el ultimo codigo, del timer !, con el comando Height estamos trabajando su altura la multiplicamos por 0.8 porque en mi caso solo llenara al 80 % y establecemos las relaciones poniendo superior a o igual ><= sobre el incremento que es una variable que le damos un -20 al iniciarla. Ese incremento sera sumado o restado segun la opcion utilizada Vaciar o Llenar.
NO CONFUNDIR !

By Ruben Santana