Delphi - 如何使PNG图像成为主要形式？

Question

我有一个应用程序，它的主要形式称为Fmain。如何让Fmain成为我在源代码中分配的Image1的PNG图像？

FMain.brush.bitmap:=Image1.picture.bitmap;

如果Image1是* .bmp那个，但我需要我的PNG文件的transperancy。

Answer 1

我认为你不能用透明的png制作一个自定义形状的TForm。

请看一下这个答案Irregularly shaped forms，更具体地来看看这个http://docwiki.embarcadero.com/Libraries/XE2/en/Vcl.Forms.TCustomForm.TransparentColorValue。

Answer 2

你想制作一个形状奇怪的表格吗？如你所知，你想让PNG的透明部分不能作为表格点击？如果是这样，那你就是错误的方式。如果您要在图像上放置图像并在图像上设置透明属性，那么您要做的就是查看图像背后的图像。

如果你想要一个形状是PNG可见区域的形状，那么你需要创建一个形状奇特的形状。这是通过使用区域和SetWindowRgn完成的。

幸运的是，有一个方便的工具：Gabes OddForm Assistant。我已经多次使用它了。

要使用它，您需要将PNG保存为位图，然后将其加载到实用程序中。完成后，它将为您提供制作表单所需的代码。您可以查看它创建的pas文件，看看它是如何完成的，如果您觉得有需要，可以修改。您可以直接使用表单，也可以将代码移植到您需要的位置。

希望这有帮助。