使用 pngimage，怎样设置PNG图片的透明通道？

Question

使用 pngimage，怎样设置PNG图片的透明通道？谢谢了！

Answer 1

那怎样设置PNG图片的透明通道？
用什么控件？
哪位高人指点一下阿！

Answer 2

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;