Execute News

Des nouvelles fraĆ®ches de http://www.execute.fr RSS « Avant | GDI+[×]

Charger des images avec GDI+

PubliƩ le 04/12/2017 [Delphi] [GDI+]
Delphi supporte depuis plusieurs versions les formats JPEG et PNG, par contre en standard, il n'est pas possible de lire des images TIFF.

Qu'à cela ne tienne, on s'appuyant sur GDI+, l'unité Execute.GDIPBitmap ajoute une méthode GDIPLoadFromStream à la classe TBitmap.

uses
  Execute.GDIPBitmap;
var
  bitmap: TBitmap;
  stream: TFileStream;
begin
  bitmap := TBitmap.Create;
  stream := TFileStream.Create('SAMPLE.JPG', fmOpenRead or fmShareDenyNone);
  bitmap.GDIPLoadFromStream(stream):
  stream.Free;
end;

GDIPBitmap sur Github