Flash动画上的图像仍然不可见

Question

早上好，

我有一个带有Shockwave Flash动画的Delphi应用程序（Align = alClient）。我想在闪光灯上显示一个标志（图像）。但是，图像始终在闪光下移动到背景并保持不可见。我试图使用Form1.Canvas.Draw绘制图片，它不起作用。可以选择在闪存上使用Panel并将我的Image添加到其中，但它不是光学的。我的徽标是圆形的，我切割周围的白色边框，属性透明。这不是一个我无法透明（或圆形）的小组。

感谢您的帮助

Answer 1

您可以使用以下命令将面板设为圆圈：

procedure MakePanelCircle(MyPanel: TPanel; Diameter: integer);
var
  region1 : hrgn;
begin
  region1 := CreateRoundRectRgn(0, 0, Diameter, Diameter, Diameter, Diameter);
  SetWindowRgn(MyPanel.Handle, region1, True);
end;

查看CreateRoundRectRgn的文档，因为它通常用于创建带有圆边的矩形。如果你进一步深入挖掘，你会找到一个根据你的位图制作区域的指南。

如果您查看以下示例Shaping a Form around a Bitmap

您将学习如何从位图创建区域。