Ver Mensaje Individual
  #1 (permalink)  
Antiguo 02/03/2013, 13:54
kowa
 
Fecha de Ingreso: septiembre-2010
Mensajes: 51
Antigüedad: 14 años, 5 meses
Puntos: 5
problema con DrawImage

Hola, estoy realizando un proyecto en el cual superpongo 1 imagen arriba de la otra
es decir que una actue como "capa"

Mi problema es que no se como trabajar los parametros de DrawImage.

Tengo el sgte codigo

Código VBNET:
Ver original
  1. Dim bmp1 As New Bitmap("G:\lol\imagen_pe.bmp")
  2.         Dim bmp2 As New Bitmap("G:\lol\imagen_grande.bmp")
  3.         Dim width As Integer = bmp2.Width
  4.         Dim height As Integer = bmp2.Height
  5.         Dim fullBmp As New Bitmap(width, height)
  6.         Dim alto As Decimal = bmp2.Height / 2
  7.         Dim ancho As Decimal = bmp2.Width / 2
  8.         Dim alto_1 As Decimal = bmp1.Height / 2
  9.         Dim ancho_1 As Decimal = bmp1.Width / 2
  10.         TextBox1.Text = alto
  11.         Dim gr As Graphics = Graphics.FromImage(fullBmp)
  12.         gr.DrawImage(bmp2, 0, 0)
  13.         gr.DrawImage(bmp1, alto, ancho)
  14.        
  15.         fullBmp.Save("g:\asd.bmp")

Mi problema es que no puedo centrar la imagen_pe encima de la otra, me queda de cerca del centro, pero no en el centro tome la mitad de la imagen que irá de fondo:
Dim alto As Decimal = bmp2.Height / 2
Dim ancho As Decimal = bmp2.Width / 2

Pero a la hora crear la imagen no me funciona usar esos valores.