GDI+ 在Delphi程序的应用 -

sogotobj

Delphi的TBitmap封装了Windows的GDI位图，因此，TBitmap只支持bmp格式的图像，但是在Delphi应用程序中，常常会遇到图形格式的转换，如将Delphi位图TBitmap的图像转换为其它格式保存，或者将其它图像格式转换为TBitmap等。这时候，我们往往借助一些第三方组件或代码，Delphi自带的TJPEG.pas就是jpeg格式图像转换的第三方代码单元。
其实，利用GDI+的TGpBitmap可以很方便的和TBitmap实现一些图像格式的相互转换，下面的代码把一个PNG格式图像转换为Delphi窗口界面上的TImage图像进行显示：
<div style="padding-right: 5.4pt; padding-left: 5.4pt; background: #e6e6e6; padding-bottom: 4px; width: 95%; padding-top: 4px;">var
bmp:TGpBitmap;
begin
//bmp:=TGpBitmap.Create('D:del_gdiplusDemosMediamsn1.gif');
//bmp:=TGpBitmap.Create('D:del_gdiplusDemosMediaMultiFrame.tif');
bmp:=TGpBitmap.Create('D:del_gdiplusDemosMediaclimber.png');
Image1.Picture.Bitmap.Handle:=bmp.GetHBITMAP(0);
bmp.Free;
end;