image - 如何在TImage或其他东西上制作水效果？

Question

好的，我刚刚在我的电脑上安装了 Tortoise git。我对它的“关于”页面上的水效果感到很有趣。

尝试将鼠标光标移动到来自 tortoise GIT 的乌龟图片上 - 关于

这更像是我们在水上玩手指。

有谁知道如何在Delphi中制作这种水效果吗？

Answer 1

参见 Leonel Togniolli 的 "Water Effects"在 efg 的实验室。

涟漪效应基于2D Water Effects in December 1999 Game Developer Magazine Article .

该算法在此处描述 2D Water ，正如 François 所提到的并作为源代码中的引用。

Leonel 的实现部分基于 gamedev 文章 the-water-effect-explained作者:罗伊·威廉斯。这也是 pascal 代码。

efg 上还有一个名为“Ripple Project”的 Delphi 示例，屏幕截图如下所示。