Discussion :

[gregosss]

Bonjour à tous.

Je voudrais redimensionner une image dans un champ image. En effet, lors de l'ouverture d'une image, le programme n'affiche dans le champ qu'une partie de l'image. Je voudrais voir apparaître celle-ci dans sa totalité et je ne trouve pas de commande me permettant cela.

Quelqu'un aurait-il déjà rencontré ce problème et trouvé une solution ?

Merci par avance

[Jannus]

Tu dois récupérer les infos de l'image

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
// Récupération des caractéristiques de l'image
nia est une chaîne= (nom de l'image chemin compris)
 
InfoImage, Format sont des chaînes
Hauteur, Largeur sont des entiers
InfoImage = InfoBitmap(nia)
Format = ExtraitChaîne(InfoImage, 1)
Largeur = Val(ExtraitChaîne(InfoImage, 2))
Hauteur = Val(ExtraitChaîne(InfoImage, 3))

Et redimensionner ta fenêtre (si besoin) et ton champ 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
 
// Code de réduction de l'image
// Si on rétrécit l'image, on redimensionne l'image avant le champ image
li, hi sont des entiers // dimensions de l'image finale
// Redimensionne le champ au format de l'image pour éviter les coupures et/ou bords
Fen_Image.Image1..Largeur=largeur
Fen_Image.Image1..Hauteur=hauteur
 
// charge l'image
Fen_Image.Image1=nia
 
// redimensionne l'image
dRedimensionne(Fen_Image.Image1,li,hi)
 
// Redimensionne le champ au format de l'image avant sauvegarde pour éviter les coupures et/ou bords
Fen_Image.Image1..Largeur=li
Fen_Image.Image1..Hauteur=hi

Il faut redimensionner le champ avant de charger l'image.
Pour agrandir c'est le même principe

[sebkill]

Voilà j'utilise le code que tu as fourni et ça marche bien pour le redimensionnement et la mise de l'image dans un champ.

Mais ça dépend où ce code est exécuté il ne réagit pas de la même façon.
Je m'explique lorsque je met le code à l'init d'un champ image pas de soucis.

Lorsque je le met dans modif d'un champ ou à un clic de bouton on voit apparaître l'image en grand sur toute la fenetre avant qu'elle soit redimensionné et placé dans son champ. C'est pas grand chose mais peut être que tu as une idée.

Merçi d'avance

[Jannus]

Il faut probablement adapter le code.
Je n'ai donné ici qu'un extrait du code avec les lignes de redimensionnement.
Ce qui est possible (probable ?) c'est que j'aie mis la fenêtre de traitement de l'image hors écran