如何将DIB转换为TPNGObject

Question

我有一个DIB句柄。我如何在保持其透明度的情况下将其转换为TPNGObject ?

编辑:

我在这个溶液中使用方法2

但是位图结果是不透明的，即使我设置它的Transparent标志为true

Answer 1

我想应该是这样开始的:

var
  lpbi: PBitmapInfoHeader;
begin
  // Get DIB header info from DIB handle
  lpbi := PBitmapInfoHeader(GlobalLock(hdIB));
end;

然后，如果它是一个32位的图像，它将有一个alpha通道，你将使用你的透明度数据。

然后，将RGB数据复制到PNG对象的扫描线，并将alpha数据复制到alpha扫描线。