Delphi scaled Image code-supports PNG transparent channels (leveraging Windows Windowscodecs.dll)

Requires Delphi2007 or higher, the system requires at least XP-SP2

is actually taking advantage of the functionality of the Windows Windowscodecs.dll this file

Encapsulated as Twicimage class in VCL

Procedure Scalerimage (aimage:twicimage; Awidth, Aheight:word); var  nwif:iwicimagingfactory;  Nwis:iwicbitmapscaler;begin  nwif: = aimage.imagingfactory;  Nwif.createbitmapscaler (Nwis);  Nwis.initialize (Aimage.handle, Awidth, Aheight, wicbitmapinterpolationmodefant);  Aimage.handle: = Iwicbitmap (Nwis);  Nwis: = nil;  Nwif: = Nil;end;

This class can also be used to do more image effects, such as inversion, or format conversion, etc.

Http://www.cnblogs.com/hs-kill/p/3460064.html

Delphi scaled Image code-supports PNG transparent channels (leveraging Windows Windowscodecs.dll)