Bonjour,
Voilà, je dispose d'un fichier image qui a certaines dimensions (Width et Height), je souhaiterais redimensionner cette image par le code.
Seulement, j'ai rien trouvé pour le moment.
Merci pour les infos
Bonjour,
Voilà, je dispose d'un fichier image qui a certaines dimensions (Width et Height), je souhaiterais redimensionner cette image par le code.
Seulement, j'ai rien trouvé pour le moment.
Merci pour les infos
Tu peux essayer ça : ça retourne une PictureBox mais tu peux facilement renvoyer une Image
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34 private PictureBox getImage(String filename, int size ) { Image tarte = null; try { tarte = Image.FromFile( filename ); } catch (Exception ex) { Console.WriteLine(ex.ToString()); return null; } Size newSize; PictureBox b = new PictureBox(); b.SizeMode = PictureBoxSizeMode.Normal; b.Size = new Size(size, size); double zoom = 1.0; int decalX = 0, decalY = 0; if (tarte.Width > tarte.Height) { zoom = (double) size / tarte.Width; decalY = (int)(((double)size - tarte.Height * zoom) / 2.0); newSize = new Size(size, (int)(tarte.Height * zoom)); //pictureBox1.Padding = new Padding(0, decalY, 0, decalY); b.Padding = new Padding(0, decalY, 0, decalY); } else { zoom = (double)size / tarte.Height; decalX = (int)(((double)size - tarte.Width * zoom) / 2.0); newSize = new Size((int)(tarte.Width * zoom), size); //pictureBox1.Padding = new Padding(decalX, 0, decalX, 0); b.Padding = new Padding(decalX, 0, decalX, 0); } // b.Image =new Bitmap(tarte, newSize); return b; }
Merci pour ton aide...
Mais il doit y avoir qq chose de plus simple.
Si je trouve je te fais signe
![]()
Salut,
il existe les Thumbnails :
avec
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6 'Definition Dim myCallback As Image.GetThumbnailImageAbort = AddressOf ThumbnailCallback Dim photoStream As FileStream = New FileStream(nomFichier, FileMode.Open) Dim myBitmap As Bitmap = New Bitmap(photoStream) 'Assocation Dim myThumbnail As Image = myBitmap.GetThumbnailImage(WidthThum, HeightThum, myCallback, IntPtr.Zero)
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3 Public Function ThumbnailCallback() As Boolean Return False End Function
Ok merci pour l'info.
je vais essayer cela.
Partager