使用 pngimage,怎样设置PNG图片的透明通道?该怎么解决

使用 pngimage,怎样设置PNG图片的透明通道?
使用   pngimage,怎样设置PNG图片的透明通道?谢谢了!

------解决方案--------------------
好像这个组件没这个功能吧。。
------解决方案--------------------

var
PNGObject: TPNGObject;
i: Integer;
AlphaPtr: PByte;

begin
PNGObject := nil;
try
PNGObject := TPngObject.Create;
PNGObject.LoadFromStream(SrcStream);
fot i := 0 to PngObject.Height - 1 do
AlphaPtr := PByte(PNGObject.AlphaScanline[i]); //这就是透明通道的透明度, 0-255,改变它可以改透明度的。
finally
if Assigned(PNGObject) then PNGObject.Free;
end;
end;