Win8 Win10 开机加载Loading动画源码

易YY业务

支持开源~！感谢分享

光影魔术

感谢分享

yyyxb

wlsk888 发表于 2024-3-8 17:23
谢谢分享，没搞懂（用 计次%121 即可）是什么意思，给个调用模块的例子啊

就是求余数，我说的是求余数运算。如果是循环，这样写就行
以下是示例：

  

窗口程序集名	保 留	保 留	备 注
窗口程序集_窗口1
变量名	类 型	数组	备 注
Exit	逻辑型

子程序名	返回值类型	公开	备 注
_窗口1_创建完毕

透明标签3.字体.字体名称 ＝ #SegoeBootFontName
启动线程 (&ThreadShowProgress, , )

子程序名	返回值类型	公开	备 注
ThreadShowProgress

变量名	类 型	静态	数组	备 注
Count	整数型

判断循环首 (Exit ＝ 假)
透明标签3.标题 ＝ GetLoadingFontChar (Count ％ 121)  ' 求余数，结果区间为 [0, 120]
Count ＝ Count ＋ 1
延时 (30)
判断循环尾 ()
返回 ()

子程序名	返回值类型	公开	备 注
_窗口1_将被销毁

Exit ＝ 真
返回 ()

i支持库列表	支持库注释
iext	扩展界面支持库一
EThread	多线程支持库

.版本 2<br /> .支持库 iext<br /> .支持库 EThread<br /> <br /> .程序集 窗口程序集_窗口1<br /> .程序集变量 Exit, 逻辑型<br /> <br /> .子程序 _窗口1_创建完毕<br /> <br /> 透明标签3.字体.字体名称 ＝ #SegoeBootFontName<br /> 启动线程 (&ThreadShowProgress, , )<br /> <br /> .子程序 ThreadShowProgress<br /> .局部变量 Count, 整数型<br /> <br /> .判断循环首 (Exit ＝ 假)<br />     透明标签3.标题 ＝ GetLoadingFontChar (Count ％ 121)  ' 求余数，结果区间为 [0, 120]<br />     Count ＝ Count ＋ 1<br />     延时 (30)<br /> .判断循环尾 ()<br /> 返回 ()<br /> <br /> .子程序 _窗口1_将被销毁<br /> <br /> Exit ＝ 真<br /> 返回 ()

如果是时钟更简单了。
先把时钟周期设置为 30。
然后：（示例）

  

子程序名	返回值类型	公开	备 注
_窗口1_创建完毕

透明标签4.字体.字体名称 ＝ #SegoeBootFontName

子程序名	返回值类型	公开	备 注
_时钟1_周期事件

变量名	类 型	静态	数组	备 注
Count	整数型			或者设置为程序集变量或全局变量

透明标签4.标题 ＝ GetLoadingFontChar (Count ％ 121)  ' 求余数，结果区间为 [0, 120]
Count ＝ Count ＋ 1
返回 ()

i支持库列表	支持库注释
iext	扩展界面支持库一

.版本 2<br /> .支持库 iext<br /> <br /> .子程序 _窗口1_创建完毕<br /> <br /> 透明标签4.字体.字体名称 ＝ #SegoeBootFontName<br /> <br /> .子程序 _时钟1_周期事件<br /> .局部变量 Count, 整数型, 静态, , 或者设置为程序集变量或全局变量<br /> <br /> 透明标签4.标题 ＝ GetLoadingFontChar (Count ％ 121)  ' 求余数，结果区间为 [0, 120]<br /> Count ＝ Count ＋ 1<br /> 返回 ()

如果背景为纯色，建议还是用标签。
演示.7z (2.3 MB, 下载次数: 3)

2024-3-8 18:45 上传

点击文件名下载附件

wuqingg

支持开源，感谢分享~

1184798949

支持开源~！感谢分享

wlsk888

谢谢分享，没搞懂（用 计次%121 即可）是什么意思，给个调用模块的例子啊

铅笔刀

六 竟然研究这些东西

447485268

支持开源~！感谢分享