[VB6] redimensionner picture d'une form [Résolu]

Messages postés
309
Date d'inscription
lundi 16 décembre 2002
Dernière intervention
15 juin 2015
- 3 août 2010 à 15:25 - Dernière réponse :
Messages postés
1
Date d'inscription
mardi 7 mars 2006
Dernière intervention
27 octobre 2010
- 27 oct. 2010 à 20:49
Bonjour,
J'assigne une image à la propriété picture d'une form mais l'image est beaucoup plus grand que la form. Je ne souhaite pas agrandir la form mais redimensionner l'image pour l'ajuster aux dimensions de la form. Comment faire ? Merci d'avance.
        Set Me.Picture = imgPhoto.Picture

        ' Me.Width et Me.Height ne doivent pas être redimensionner


Afficher la suite 

Votre réponse

3 réponses

Meilleure réponse
Messages postés
309
Date d'inscription
lundi 16 décembre 2002
Dernière intervention
15 juin 2015
- 5 août 2010 à 11:24
3
Merci
Merci, mais je n'avais pas précisé que c'etait via VB que souhaitais le faire. En cherchant plus longuement sur le net j'ai trouvé grace à ce lien.

Il faut utiliser la propriété PaintPicture pour copier l'image de la picturebox vers la picturebox de destination puis la redimensionner. Définir la propriété picture de la picturebox de destination de manière à l'ajuster. Puis, sauvegarder les changements vis SavePicture.

Merci Philippe734 3

Avec quelques mots c'est encore mieux Ajouter un commentaire

Codes Sources a aidé 86 internautes ce mois-ci

Commenter la réponse de Philippe734
Messages postés
2859
Date d'inscription
mardi 15 avril 2003
Dernière intervention
26 novembre 2013
- 3 août 2010 à 20:01
0
Merci
Salut,

Tu peux la modifier avec n'importe quel logiciel de retouche. Paint par exemple qui est livré avec windows (Image/Redimentionner), ou paint.Net qui est gratuit (même manip).

@+

Si le déboguage est l'art d'enlever les bogues, la programmation doit être l'art de les créer.
Commenter la réponse de Mayzz
Messages postés
1
Date d'inscription
mardi 7 mars 2006
Dernière intervention
27 octobre 2010
- 27 oct. 2010 à 20:49
0
Merci
Salut Philippe734, pour redimensionner ton image tu n'a qu'à mettre ce code
:Me.PaintPicture Me.Picture,0,0,Me.Heigth,Me.width
au lieu de set Me.Picture = imgPhoto.Picture

ces@ri 99
Commenter la réponse de cesaryao

Vous n'êtes pas encore membre ?

inscrivez-vous, c'est gratuit et ça prend moins d'une minute !

Les membres obtiennent plus de réponses que les utilisateurs anonymes.

Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.

Le fait d'être membre vous permet d'avoir des options supplémentaires.