蹭热度电子木鱼积累功德

嫂子 · 发表于 2023-1-7 22:52:46

@冰点不知道@谁  如果可以转到合适板块
提前说明不是易语言源码。
由于没有其他区域可发。暂时发在这

代码说明：
开发语言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

主要逻辑代码如下：

项目工程文件：

木鱼.7z (2.17 MB, 下载次数: 34)

taodile · 发表于 2023-12-13 03:56:37

支持开源~！感谢分享~

q38581460 · 发表于 2023-9-29 22:43:59

拿来发呆不错

鬼客 · 发表于 2023-7-10 21:35:58

支持开源~！感谢分享~

嫂子 · 发表于 2023-6-7 22:06:02

weihua2018 发表于 2023-6-7 19:01
什么语言啊

Delphi

weihua2018 · 发表于 2023-6-7 19:01:57

什么语言啊

shuaier · 发表于 2023-1-30 14:42:35

用力用力敲

xiaoqi458 · 发表于 2023-1-16 21:09:34

支持一下

kezhuanwang · 发表于 2023-1-13 14:50:28

支持一下

嫂子 · 发表于 2023-1-8 15:47:12

冰点发表于 2023-1-8 12:30
尴尬了，没有 Delphi 板块。。。

可以考虑开源类别弄个其他类别或者其他语言。之类的。一些美板块的可以发进这个类别

		自动登录	找回密码
密码			注册

[易源码分享] 蹭热度电子木鱼积累功德

评分

[易源码分享] 蹭热度 电子木鱼积累功德

评分

[易源码分享] 蹭热度电子木鱼积累功德