Dimensioner l'Objet Image

Résolu
Cipoli Messages postés 53 Date d'inscription mercredi 29 août 2007 Statut Membre Dernière intervention 31 mars 2010 - 22 oct. 2008 à 09:45
Kevin.Ory Messages postés 840 Date d'inscription mercredi 22 octobre 2003 Statut Membre Dernière intervention 7 janvier 2009 - 22 oct. 2008 à 11:53
Bonjour a tous,


J'ai fais plusieurs recherche sans succés, et plusieurs test sans résultats.
Je souhaite redimensionner mon Objet Image. (en Hauteur et Largeur).


Je ne comprends pas comment faire.


Je travaille sous visual studio 2003.         Projet WinForm




Actuellement voici ce que je fais ça fonctionne mais je pense qu'il y a plus simple:


Dim imageList1 AsNew System.Windows.Forms.ImageList
imageList1.Images.Add(Image.FromFile("C:\Projet test\WinformFluxInfo\banniere\logo3.jpg"))


imageList1.ImageSize = New Size(50, 100)
pictTopLeft.Image = imageList1.Images.Item(0)

Mon code fonctionne mais le 1er paramètre de Size : width ne doit pas dépasser 256 sinon j'ai une exception ?????

Merci d'avance pour votre aide.

3 réponses

Kevin.Ory Messages postés 840 Date d'inscription mercredi 22 octobre 2003 Statut Membre Dernière intervention 7 janvier 2009 11
22 oct. 2008 à 11:21
Salut,

Dim SourceImage As New Bitmap("C:\MonImage")
Dim DestinationImage As New Bitmap(SourceImage, 50, 100)

Pour plus de contrôle, tu peux aussi passer par un graphics:
Dim SourceImage As New Bitmap(dlg.FileName)
Dim DestinationImage As New Bitmap(50, 100)
Dim Graphics As Graphics = Graphics.FromImage(DestinationImage)
Graphics.DrawImage(SourceImage, 0, 0, 50, 100)
3
Cipoli Messages postés 53 Date d'inscription mercredi 29 août 2007 Statut Membre Dernière intervention 31 mars 2010
22 oct. 2008 à 11:39
Kevin Ory un grand merci. Je viens de tester, ça semble bien fonctionner.

J'ai pas utilisé l'objet graphique car je ne sais pas trop comment ça fonctionne.
0
Kevin.Ory Messages postés 840 Date d'inscription mercredi 22 octobre 2003 Statut Membre Dernière intervention 7 janvier 2009 11
22 oct. 2008 à 11:53
Un objet Graphics permet de dessiner (images, textes, formes simples, etc) sur une surface de dessin (image ou contrôle).

Ca fonctionne comme je l'ai montré justement, je remet mon code avec qq commentaires:

' Charger l'image source que l'on veut redimensionner
Dim SourceImage As New Bitmap(dlg.FileName)
' Déclarer l'image de destination qui contiendra l'image modifié
Dim DestinationImage As New Bitmap(50, 100)
' Obtenir un graphics pour l'image de destination qui nous permettra d'y dessiner
Dim Graphics As Graphics = Graphics.FromImage(DestinationImage)
' Dessiner ce qu'on veut dans l'image de destination
' (ici l'image source en spécifiant la nouvelle taille)
Graphics.DrawImage(SourceImage, 0, 0, 50, 100)
' DestinationImage contient alors SourceImage redimensionné.
' Tu peux y dessiner ce que tu veux d'autre (du texte par exemple)
' avant de l'afficher, grâce à l'objet Graphics
0
Rejoignez-nous