Cargar Imagen con el componente PictureBox

PictureBox es un componente que nos permite colocar imágenes o fotos en nuestras aplicaciones en Gambas. Su uso es relativamente simple; a continuación vamos a describir en unos simples pasos como cargar una imagen.

1) Creamos nuestro proyecto y dibujamos el componente PictureBox, esta situado en la pestaña Form. El tamaño puede ser el que usted desee. Para efectos de este ejemplo le cambie en la propiedad Name el nombre por MiFoto.

2) Fijamos la propiedad Border en Etched, de manera que cuando corramos la aplicación podamos ver el borde del cuadro donde estará la imagen.

3) Ubicados sobre el pictureBox dibujado en nuestro formulario, hacemos click con el botón derecho y elegimos el evento MouseDown y colocamos el siguiente código:

Public Sub MiFoto_MouseDown()

MiFoto.Stretch = True
Dialog.Title = “Seleccione una Imagen para Cargar”
Dialog.Path = User.Name
Dialog.Filter = [“*.jpg”, “JPG”, “.png”, “PNG”]
If Not Dialog.OpenFile() Then
MiFoto.Picture = Picture[Dialog.Path]

Endif

End

Y con esas sencillas lineas, al correr el programa y hacer click sobre el recuadro, nos mostrara una caja de dialogo para elegir la imagen que queremos mostrar en nuestro formulario. Simple verdad?.

Por ultimo podemos agregar un botón para cerrar la aplicación, o hacer que el formulario salga centrado o cosas por el estilo.

Espero les sea de utilidad, hasta la próxima!

Responder

Introduce tus datos o haz clic en un icono para iniciar sesión:

Logo de WordPress.com

Estás comentando usando tu cuenta de WordPress.com. Cerrar sesión / Cambiar )

Imagen de Twitter

Estás comentando usando tu cuenta de Twitter. Cerrar sesión / Cambiar )

Foto de Facebook

Estás comentando usando tu cuenta de Facebook. Cerrar sesión / Cambiar )

Google+ photo

Estás comentando usando tu cuenta de Google+. Cerrar sesión / Cambiar )

Conectando a %s