易语言资源网 - 做最全的易语言资源下载社区
<易语言软件开发工程师>特训 第15期(预报名) 精易论坛授权登录

电子木鱼积累功德   [复制链接]

    2023-01-15 09:15:34
    Delphi
    易语言资源网
    238 次浏览
    来源链接


代码说明:

开发语言Delphi 版本11.2

使用跨平台UI框架 FireMonkey (做动画简单 类似WPF原理显卡绘制)缺点体积大一点。

素材来自

这可能是精易 不 是全世界最牛最好的 电子木鱼,积量..._精易论坛 (125.la)

基本原理:

1.一个Image 显示木鱼 一个Image 显示棍子

2.棍子初始翻转角度-30

3.

丢2个动画组件FloatAnimation

动画1 棍子敲下   设置动画属性是 RotationAngle(旋转角度)从-30  运动到 -3

动画2 棍子恢复   设置动画属性是 RotationAngle(旋转角度)从-3  运动到 -30

再动画1 的动画结束事件中 触发动画2恢复它 再动画2的结束事件中 判断是否是自动木鱼 如果是自动 那就再触发动画1.

4.申明一个全局变量 存储 累计功德

然后每次 动画1 动画结束事件(也就是棍子敲到木鱼的时候)  原子操作给 功德+1

5.再应用程序 空闲事件中更新 累计功德的UI

主要逻辑代码如下:



点我下载 (已有 13 次下载)

[错误报告]   上一篇:分享一个[公司结构]信息建立的软件...     下一篇:任务栏半透明/全透效果...