Redimensionner une image dans une Picturebox

Question

Bonjour, 
Je voudrais modifier la taille de la Picturebox "ScreenShot" ainsi que celle de l'image qui se trouve dedans d'un facteur "Zoom"
J'utilise le code suivant    ScreenShot.AutoRedraw = True
    ScreenShot.Width = ScreenShot.Width * Zoom
    ScreenShot.Height = ScreenShot.Height * Zoom
    ScreenShot.PaintPicture ScreenShot.Image, 0, 0, ScreenShot.ScaleWidth, ScreenShot.ScaleHeight
    ScreenShot.Refresh
Le problème est que l'image (en haut sur l'exemple) n'est pas redimensionnée mais tronquée (en bas sur l'exemple) : qu'est-ce que je fais mal ?

Herve_be · Answer

En travaillant avec 2 picturebox ça fonctionne    ScreenShot2.AutoRedraw = True
    ScreenShot2.Width = ScreenShot1.Width * Zoom
    ScreenShot2.Height = ScreenShot1.Height * Zoom
    
    ScreenShot2.PaintPicture ScreenShot1.Image, 0, 0, ScreenShot2.ScaleWidth, ScreenShot2.ScaleHeight
    
    ScreenShot1.Width = ScreenShot2.Width
    ScreenShot1.Height = ScreenShot2.Height

ScreenShot1.Picture = ScreenShot2.Image
    ScreenShot1.Refresh
mais l'image réduite est de mauvaise qualité :-(

Redimensionner une image dans une Picturebox

1 réponse

Votre réponse

Discussions similaires