Quel controle utiliser pour afficher une image qui se redimensionne sans se defo

guillaume - 15 mai 2001 à 01:03
 schouly - 15 mai 2001 à 14:06
Bonjour,
je cherche le controle à utiliser pour afficher une image qui se redimensionne sans se deformer.
La fonction strech de image ne tient pas compte de la proportionalité.
Merci pour votre aide
A voir également:

1 réponse

Charge ton image dans un picture box sans la fonction strech et redimensionne là manuellement avec un facteur de proportionalité ... du moins c'est ce que je ferais ...

Dim Facteur as single
Facteur = 0.5
Picture1.width = Facteur * picturer1.width
Picture1.height = Facteur * picture1.height

ou si tu veux la redimensionner à une dimmensions précise
mets le code dans une boucle:

Do while picture1.width >= 2500 'change le signe < en > si tu veux agrandir l'image
Facteur = 0.9 'plus le facteur est près de 1 plus t'aurras de précision ici aussi mets 1.1 pour agrandir l'image
Picture1.width = Facteur * picturer1.width
Picture1.height = Facteur * picture1.height
loop

Excuse moi si ça ne fonctionne pas mais pour l'instant je ne sais pas tester ce code

Schouly
0
Rejoignez-nous