手抄报 安全手抄报 手抄报内容 手抄报图片 英语手抄报 清明节手抄报 节约用水手抄报

如何利用易语言做“走马灯”效果

时间:2024-10-25 13:39:04

1、打开易语言,创建启动窗口。在启动窗口分别加入画板、按钮、时钟各一个,如下图

如何利用易语言做“走马灯”效果

2、由于走马灯颜色是随机变化的,我们用数组来编。双击“启动窗口”跳至程序集,按图示定义数组,先把数组的取值确定下来,如图

如何利用易语言做“走马灯”效果

3、接下来编程时钟的动作,这里面定义的“子程序1”别丢掉。具体如下图

如何利用易语言做“走马灯”效果

4、编写完成,调试运行,如图所示,要是没问题,保存编译即可,结果图展示如下

如何利用易语言做“走马灯”效果

5、以下是源码,自己复制到易语言里试试,自行修改需要的结果:.版本 2.程序集 独瘦配溧窗口程序集1.程序集变量 颜色数组, 整数型, , "30".子程序 __启动窗鄹绦谟嚣口_创建完毕.局部变量 A, 整数型置随机数种子 ().计次循环首 (30, A) 颜色数组 [A] = 取颜色值 (取随机数 (0, 255), 取随机数 (0, 255), 取随机数 (0, 255)).计次循环尾 ()时钟1.时钟周期 = 330.子程序 _时钟1_周期事件.局部变量 A, 整数型时钟1.时钟周期 = 0.计次循环首 (29, A) 颜色数组 [A] = 颜色数组 [A + 1].计次循环尾 ()颜色数组 [30] = 取颜色值 (取随机数 (0, 255), 取随机数 (0, 255), 取随机数 (0, 255)).计次循环首 (30, A) .如果 (A = 30) 子程序1 (A, 颜色数组 [A], 颜色数组 [A]) .否则 子程序1 (A, 颜色数组 [A], 颜色数组 [A + 1]) .如果结束.计次循环尾 ()画板1.定位写出 ((画板1.宽度 - 画板1.取宽度 (“轻轻地你走了,正如你轻轻地来...”)) ÷ 2, (画板1.高度 - 画板1.取高度 (“轻轻地你走了,正如你轻轻地来...”)) ÷ 2, “轻轻地你走了,正如你轻轻地来...”)时钟1.时钟周期 = 330.子程序 子程序1.参数 索引, 整数型.参数 颜色1, 整数型.参数 颜色2, 整数型画板1.画渐变矩形 ((索引 - 1) × 画板1.宽度 ÷ 30, 0, 画板1.宽度 ÷ 30, 画板1.高度, 2, 颜色1, 颜色2)

© 手抄报圈