Discussion :

[blaiseac]

Bonjour,

J'utilise TPicture.LoadFromFile(chemin).
Or l'image que je veux charger est de type divers (jpeg,gif ou bmp) et ce type n'est pas visible dans l'extension (*.1).
Or LoadFromFile n'accepte que les images bitmap...
Y aurait-il un moyen de convertir une image (tous formats) en bmp?
Si il n'existe pas de moyen univerel, Y a-t-il un moyen de retrouver le type d'une image afin de faire plusieurs types de conversion selon le format? (En effet, j'ai vu sur le forum le moyen de convertir une image jpeg en bmp... (mais pas gif->bmp

Merci de votre aide

[sjrd]

TPicture.LoadFromFile examine l'extension de ton fichier et la compare avec la liste enregistrée dans la variable globale privée FileFormats qui associe chaque extension à une classe descendante de TGraphics.
Par défaut, les trois seules extensions recensée le sont dans Graphics et sont .bmp (-> TBitmap) .ico (-> TIcon) et .wma (-> TMetaFile). Cependant, d'autres unités recensent de nouveaux types d'extension. Par exemple, l'unité Jpeg recense les extensions .jpg et .jpeg (-> TJpegImage). Pour les fichier .gif, cela n'existe pas dans la VCL mais il existe une unité dans la JVCL, JvGif, qui associe l'extension .gif (-> TJvGIFImage).

Après avoir recensé tous tes types d'images, tu peux les charger avec TPicture.LoadFromFile. Si tu veux ensuite les convertir en TBitmap, tu peux créer un TBitmap à côté et faire :

Code :

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

1
2
3
MonBitmap.Width := MonPicture.Width;
MonBitmap.Height := MonPicture.Height;
MonBitmap.Canvas.Draw(0, 0, MonPicture.Graphic);

[blaiseac]

merci pour cette explication.
Je vais installer la JVCL.
Je te tiens au courant de l'évolution de la chose...

[blaiseac]

En fait, j'essayais de tromper l'examen des extensions de TPicture.loadfromfile. En effet mon fichier s'appelant image.1, je le copiais sous le nom image.1.bmp
Cela (je pense) devait tromper la lecture des extensions, mais cela leve une exception avec le message "bitmap image is not valid".
Cela veut-il dire qu'en plus de verifier l'extension, TPicture.LoadFromFile vérifie le contenu du fichier?
En effet, je peux ainsi utiliser l'image car elle s'est bien chargée, mais ses propriétés sont fausses (ex : height=0)...

PS. Je suis toujours en train de regarder pour la JVCL...

[sjrd]

Il faut évidemment que ton fichier "image.1" ait le format bitmap. Sinon pour outrepasser l'examen de la liste, tu peux aussi faire directement

Code :

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

1
2
3
4
UnBitmap := TBitmap.Create;
UnBitmap.LoadFromFile('image.1');
MonPicture.Assign(UnBitmap);
UnBitmap.Free;

ou qqch du genre. Mais cela est à faire uniquement si tu connais le format de ton fichier.

[blaiseac]

Pour les fichier .gif, cela n'existe pas dans la VCL mais il existe une unité dans la JVCL, JvGif, qui associe l'extension .gif (-> TJvGIFImage).

J'ai cherché dans la JVCL, mais je n'ai vu nulle part l'unité JvGif ni quoi que se soit qui ait un rapport avec le Gif ou la classe TJvGIFImage...
Je dispose de la version 3.0 de la JVCL...
Ou dois-je chercher?

Merci

[blaiseac]

Finalement, j'ai utilisé l'unité GIFImage que j'ai trouvé par hasard...
cela m'a permi de declarer un élément de type TGifImage, ce qui a résolu mon probleme
Je peux maintenant gérer les JPEG, GIF et BMP...

Merci pour ton aide sjrd