透明的PNG图像(带有TImageList)在TMainMenu中

Question

我希望在TImageList中加载具有透明背景的PNG，并在TMainMenu中使用它(通过TAction)。

然而，在德尔菲的背景是黑色的。

This的家伙说，它对他有效，但有一个按钮，而不是主菜单。

我的设置：

• ，我的图像是每色8位，透明通道是8位(我也尝试过1位透明度，但仍然不起作用)。在TImageList的编辑器中，“透明颜色”和“填充颜色”设置为“默认”，并被禁用。

Answer 1

TImageList:

• DrawingStyle: dsTransparent
• ColorDepth: cd32Bit
• TImageList's编辑器->将“透明颜色”设置为“应用程序”集“启用运行时主题”下的“项目设置”。

德尔福里约最新情况：

TImageList必须有：

• BkGColor = clNone，
• ColorDepth = cd32bit，
• DrawingStyle = dsTransparent (或) dsNormal，
• 掩蔽=true。

这些图像可以从带有透明 bkg颜色的PNG加载。

注意:编辑TImageList的一些属性将删除列表中的所有现有图像(没有任何通知)。首先备份您的图像(或DFM)。

Answer 2

没有理由备份整个DFM文件。

在对ImageList做一些事情之前，您应该导出图像:单击图像列表编辑器中的“导出”按钮，它将将所有图像保存到一个.BMP文件中。

更改属性后：ColorDepth = cd32Bit, DrawingStyle = dsTransparent

您应该单击“添加”按钮，并选择您以前导出的文件。然后，图像将在菜单和工具栏中以透明的方式绘制(至少在D2010上)。不需要使用第三方组件。

Answer 3

我从Delphi7开始就一直使用TPngComponents，这为大多数Delphi内置/第三方组件提供了非常好的png支持。Embarcadero购买了另一个众所周知的开源PNG支持组件，即TPngImage，并在以后的Delphi版本中内置了Delphi的本地图形支持。因此，当我改为Delphi 2010时，我认为Delphi现在已经有了本地支持，并且测试出了本地支持，但是发现alpha支持不够好。

因此，我再次使用了那个TPngComponents，它最好支持大多数组件，包括主菜单。我认为该软件包应该可以在修改有限的情况下用于DXE。

编辑:感谢Uwe Raabe指出产品Codegear (现在的Embarcadero)是另一个组件TPngImage而不是TPngComponent。