Mantener un PaintPicture

[culd]

Buenas, no se si alguno utilizo PaintPicture por ejemplo en un form....

(para dimensionar una imagen al tamaño del form por ejemplo)

No se si notaron que si se minimiza o se pierde el foco del form, la imagen desaparece...

Alguna solucion?

EDITO: Si o si tiene que ser en un form, la idea es insertar una imagen y que quede justo con el tamaño del form (aunque quede deformada)

[seba123neo]

Hola,culd,primero cuando lei tu post ,pense en la propiedad ClipControls,pero despues lo probe y cuando lo minimizo y lo restauro devuelta aparece la imagen sin problemas,¿en que evento del form pones el codigo del PainPicture?

saludos.

[culd]

Iniciado por seba123neo

Hola,culd,primero cuando lei tu post ,pense en la propiedad ClipControls,pero despues lo probe y cuando lo minimizo y lo restauro devuelta aparece la imagen sin problemas,¿en que evento del form pones el codigo del PainPicture?

saludos.

Larga historia si te cuento para que quiero utilizarlo... Pero vamos a un ejemplo sensillo

en un proyecto nuevo... en un boton nuevo

Me.PaintPicture LoadPicture("c:\Imagen.jpg"), 0, 0, Me.Width, Me.Height

Ahi teoricamente carga en el form la imagen acomodada al form (sin importar que la imagen sea mas chica o mas grande que el form)...

Si minimizo la imagen desaparece (o si cambio el foco a otro form o a otra parte)

-----------------------------------------------------------------

En fin, ya lo solucione, no lo dije por que pareciera como que a nadie le importa, pero ya que estamos te lo digo ;)

NOTA: La forma que lo solucione no es la mas optima pero sirve...

ELEMENTOS: 1 PictureBox, 1 Form, GANAS DE PROBAR...

Código:

Picture1.AutoRedraw = True
Picture1.Width = Form1.Width
Picture1.Height = Form1.Height
Picture1.PaintPicture LoadPicture("c:\imagen.jpg"), 0, 0, Picture1.Width, Picture1.Height
SavePicture Picture1.Image, "c:\imagenajustada.bmp"
Form1.Picture = LoadPicture("c:\imagenajustada.bmp")

En sintesis, la unica forma que encontre fue esta...
Uso un picture (puede ser una variable del tipo picture, no probe pero puede ser), pongo el picture del tamaño del form, y cargo la imagen a ese tamaño...
Guardo esa imagen del picture y luego cargo en el Picture del form, asi no se borra al minimizar y todos los objetos se ven (ya que la imagen esta de fondo)...

[seba123neo]

aa que quilombo jeje ,mira yo lo hacia asi,no se si es una forma buena ,pero funciona tambien:

Código:

Private Sub Form_Paint()
Me.PaintPicture LoadPicture("c:\Imagen.jpg"), 0, 0, Me.Width, Me.Height
End Sub

Private Sub Form_Resize()
Me.PaintPicture LoadPicture("c:\Imagen.jpg"), 0, 0, Me.Width, Me.Height
End Sub

y ahi lo repinta cada vez que lo resizas al form.

saludos.

[culd]

Iniciado por seba123neo

aa que quilombo jeje ,mira yo lo hacia asi,no se si es una forma buena ,pero funciona tambien:

Código:

Private Sub Form_Paint()
Me.PaintPicture LoadPicture("c:\Imagen.jpg"), 0, 0, Me.Width, Me.Height
End Sub

Private Sub Form_Resize()
Me.PaintPicture LoadPicture("c:\Imagen.jpg"), 0, 0, Me.Width, Me.Height
End Sub

y ahi lo repinta cada vez que lo resizas al form.

saludos.

Muy buena, el drama es que ese form tiene propiedades en el resize y me afectan.

Voy a ver como acomodo, por que esta es mas optima.

EDITO: No, sonamos...

Al estar con PaintPicture hay veces que si abris otra ventana te deja en blanco alguna parte donde se encimaba la ventana...

En realidad estoy moviendo algunos controles en tiempo de ejecucion y me pasa eso, osea se despinta, tendria que pintar constantemente...

Aborto la mision.

[GeoAvila]

Iniciado por culd

Muy buena, el drama es que ese form tiene propiedades en el resize y me afectan.

Voy a ver como acomodo, por que esta es mas optima.

EDITO: No, sonamos...

Al estar con PaintPicture hay veces que si abris otra ventana te deja en blanco alguna parte donde se encimaba la ventana...

En realidad estoy moviendo algunos controles en tiempo de ejecucion y me pasa eso, osea se despinta, tendria que pintar constantemente...

Aborto la mision.

Tenes hasta el sp6b instalado.. de lo contrario si el redibujo es lo único que te queda..

nos vemos..

[nicolaslen]

Solución:
Usa como Destino un Picture, y en el Picture activa la opción AutoRedraw!