Discussion :

[Speed41]

Bonjour,

Comment puis je savoir si dans un TPicture l'image si trouvant est de format JPEG, BMP, ICO ou WMF.

Je veux pouvoir transformer l'image en un Bitmap et donc pour se faire il me faut savoir (du moins je croix) le format initial de l'image.

Par avance merci

[Montor]

Comment puis je savoir si dans un TPicture l'image si trouvant est de format JPEG, BMP, ICO ou WMF.

pas forcement tu peux utiliser

Code :

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

1
2
 
BmpOut.Canvas.draw(0,0,MyPicture.Graphic)

vérifie le syntaxe

[Speed41]

Yes super ça marche

Merci

[Montor]

si tu veux etendre pour autre formats png tiff gif...
télécharger cette unité
http://delphi.developpez.com/freewar...edia#GraphicEx

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
procedure LoadImg(const FileName:string;AOut:TBitmap);
var
   imgEx:TGraphicExGraphicClass;
   Gr:TGraphicExGraphic;
begin
     if not Assigned(AOut) then Exit;
 
     imgEx:=FileFormatList.GraphicFromContent(FileName);
     if Assigned(imgEx) then
     begin
         Gr:=imgEx.Create;
         with Gr do
         try
            LoadFromFile(FileName);
            AOut.Assign(Gr);
         finally
           Free();
         end;
     end else with TPicture.Create do {basics}
     try
        LoadFromFile(FileName);
        AOut.Height:=Graphic.Height;
        AOut.Width :=Graphic.Width;
        AOut.Canvas.Draw(0,0,Graphic);
     finally
       Free();
     end;
end;

Sinon tu peux uliliser la lib Gdi+ ^^