Ejemplos usando el Api de windows para Visual basic

49 - Api BitBlt para copiar una imagen como mosaico en PictureBox o formularios

<Volver> - Anterior - Siguiente



 

 

 

Contenido

 

 

 

 

 


Ejemplo 1 - Con Api

Código fuente de ejemplo que usa el Api BitBlt para copiar una imagen cargada en un PictureBox. El efecto de mosaico se puede realizar en un formulario o en un Picture ya que poseen la propiedad HDC,

En este ejemplo la imagen se copia como fondo en un formulario.

 

Vista del form

Función Api BitBit para copiar imagenes como fondo en los controles que poseen Hdc

 

En el ejemplo la función Mosaico lleva 2 parámetros, el primero es el Control PictureBox o Formulario de destino (donde se copiará el fondo), el segundo parámetro es el Control (formulario o PictureBox) que contiene el gráfico cargado.

Para ocultar el Picture se podría sacarlo de la pantalla, es decir del área visible para que de esta forma no se vea.

Nota: como dije, aunque las variable en el parámetro de la Rutina Mosaico se llame Frm y paresca que se puede solo enviar un formulario, se puede utilizar para enviar un Picture, ya que la variable está declarada como de tipo Object y no como de tipo Form.

Código fuente en un form

 


Ejemplo 2 - Sin usar el Api

La siguiente función , crea unos image en tiempo de ejecución con el método Add de la colección Controls de vb y los posiciona uno al lado del otro para colocar la imagen como BackGround en mosaico

A la función , pasarle en el primer parámetro el objeto ( Un form o PicBox ). El segundo parámetro es la ruta del archivo de imagen que se utilizará.

En un Form

 


Relacionados



Buscar en Recursos vb