如何在 Delphi 中显示半透明的变暗面板/图像？

Question

我希望让 TPanel 或 TImage 显示暗淡的背景（带面纱），有人知道如何在 Delphi (2010) 中实现这一点吗？如果可能的话，我宁愿不使用组件，只使用原始代码。 这个想法是，当显示一个新表单时，父表单会直观地向用户显示它是“禁用的”。

类似这样的： alt text http://img64.imageshack.us/img64/1599/98002881.jpg

Answer 1

这是我用于主要表单的方法，然后用于所有其他需要效果的表单。 http://delphi.about.com/od/delphitips2008/qt/form_dimmer.htm

Answer 2

也许this可以帮到你。

关于：

如果可能的话，我宁愿不使用组件，只使用原始代码。

您可以从代码中实例化和使用组件，而不仅仅是在表单设计器中。