A propos de StretchDraw

**cfalcot** · 13/10/2004, 15h09

Re-bonjour,

Dans mon soft je dois gérer une image de fond. Elle est de dimension 800*600 en gros (l'application étant programmer en 1024*768 - l'image ne prend pas tout l'écran donc-). Je cherche à l'afficher dans un TImage en tennant compte de la config de l'utilisateur. J'ai donc fait:

Code :

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

1
2
3
4
5
6
7
8
//FormCreate
ZoomW := Screen.Width / 1024;
ZoomH := Screen.Height / 768;
Image1.Height := round(Image1.Height * ZoomH);
Image1.Width := round(Image1.Width * ZoomW);
//...ailleurs dans le code:
Image1.Picture.Bitmap.LoadFromFile(lecteur + Edit1.Text);
Image1.Canvas.StretchDraw(rect(0, 0, Image1.Width, Image1.Height), image1.Picture.Bitmap);

L'aide disant que:

Utilisez la méthode StretchDraw pour dessiner un graphique dans le canevas de telle manière que l'image tienne dans le rectangle spécifié.

Pourtant une seule des deux dimension est changée (par ex si je passe en 1152*864 la largeur est bonne mais pas la hauteur -trop courte-).

Donc:
1)C'est normal?
2)Que puis-je y faire...

merci

**Benjamin GAGNEUX** · 13/10/2004, 15h51

Salut,

Si tu as un TImage, alors tu peux faire comme ceci :

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
 
// Ici tu attribues les dimensions de l'image
Image1.Height := round(Image1.Height * ZoomH); 
Image1.Width := round(Image1.Width * ZoomW); 
 
// .........................
 
// Permet d'ajusté l'image aux dimensions donnée précédement
Image1.Stretch := True;
 
// Eventuellement si le rapport Largeur/Hauteur n'est pas le même
Image1.Proportional:=True;
 
Image1.Picture.Bitmap.LoadFromFile(lecteur + Edit1.Text);

voila,

a+

**cfalcot** · 13/10/2004, 16h37

Ce n'est pas plutot:

// Eventuellement si le rapport Largeur/Hauteur n'est pas le même
Image1.Proportional:=False;

??

En tout cas merci!

**lil_jam63** · 13/10/2004, 16h57

Personnelement, si ton image recouvre toute la partie client de ton soft, j'éviterais de passer par un TImage et je copierais l'image directement sur le canvas de la form en utilisant stretchDraw.

**cfalcot** · 13/10/2004, 17h14

Je ne savais pas que l'on pouvait faire ça... mais de toutes façons une partie de la Form est utilisée pour pouvoir gérer la vitesse de l'animation et la visualisation d'autre paramètres.

merci quand meme.