Foro de elhacker.net

Programación => Programación Visual Basic => Mensaje iniciado por: jack06 en 2 Septiembre 2008, 05:32 am


Título: Picture - Stretch
Publicado por: jack06 en 2 Septiembre 2008, 05:32 am
Wenas una pregunta; eh alguien de ustedes sabe como puedo una insertar una imagen en un Picture pero la cuestion es que dicha imagen se adecue al picture; ya que el picture no tiene la propiedad Stretch. gracias de antemano...  :laugh:

Saludos...

Título: Re: Picture - Stretch
Publicado por: rob1104 en 2 Septiembre 2008, 07:40 am
Hola, ¿por qué no usas el control Image? tiene la propiedad Stretch y si quieres que luzca como el Picture solo pon su propiedad BorderStyle a 1. Ademas es perfecto si solo quieres visualizar imagenes  :)

Título: Re: Picture - Stretch
Publicado por: astaroth_15 en 2 Septiembre 2008, 17:11 pm
usa el modulo gdi

Título: Re: Picture - Stretch
Publicado por: seba123neo en 2 Septiembre 2008, 18:32 pm
Hola,que GDI ??? usa PaintPicture y te sobra... :xD

saludos.

Título: Re: Picture - Stretch
Publicado por: jack06 en 3 Septiembre 2008, 15:26 pm
Wenas, gracias a todos, saben ya encontre lo que necesitava me lo paso un amigo aca se los dejo haber si ah alguien le sirve.  :P

Código:
'Sub para poder ajustar la Imagen en un Picture.
Sub AjustarImagen(El_PictureBox As PictureBox)
    El_PictureBox.ScaleMode = 3
    El_PictureBox.AutoRedraw = True
    El_PictureBox.PaintPicture El_PictureBox.Picture, 0, 0, El_PictureBox.ScaleWidth, El_PictureBox.ScaleHeight, 0, 0, _
    El_PictureBox.Picture.Width / 26.46, El_PictureBox.Picture.Height / 26.46
    El_PictureBox.Picture = El_PictureBox.Image
End Sub

Private Sub Form_Load()
    AjustarImagen Picture1
End Sub

Salu2...


Powered by SMF 1.1.21 | SMF © 2006-2008, Simple Machines