Redimensionner une image dans une Picturebox

Messages postés
551
Date d'inscription
mercredi 4 août 2010
Statut
Membre
Dernière intervention
3 octobre 2019
- - Dernière réponse : Herve_be
Messages postés
551
Date d'inscription
mercredi 4 août 2010
Statut
Membre
Dernière intervention
3 octobre 2019
- 28 févr. 2019 à 15:14
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 ?

Afficher la suite 

1 réponse

Messages postés
551
Date d'inscription
mercredi 4 août 2010
Statut
Membre
Dernière intervention
3 octobre 2019
2
0
Merci
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é :-(
Commenter la réponse de Herve_be