Delphi做的鱼群动画(加拖动功能)

该代码在D7和Xe10.2.3下均可编译通过


实现如下效果,这个效果非常赞:







我在此代码基础上实现了红包雨的动画效果,也是很赞的。



联系电话:
020-00000000
联系电话:
020-00000000
联系电话:
020-12345678