E路漫漫，吾心要挂兮

w297323699 · 发表于 2019-3-21 21:42:03

.版本 2
.支持库 iext
.支持库 spec
.程序集窗口程序集_启动窗口
.程序集变量集_透明标签数组, 透明标签, , "3"
.程序集变量 i, 整数型
.程序集变量透明标签, 透明标签
.子程序 __启动窗口_创建完毕
_启动窗口.顶边＝ 0
_启动窗口.左边＝ 0
_启动窗口.宽度＝取屏幕宽度 ()
_启动窗口.高度＝取屏幕高度 ()
图片框1.顶边＝ 0
图片框1.左边＝ 0
图片框1.宽度＝取屏幕宽度 ()
图片框1.高度＝取屏幕高度 ()
.计次循环首 (3, i)
集_透明标签数组 [i] ＝多项选择 (i, 透明标签1, 透明标签2, 透明标签3)
.如果真 (i ＞ 1)
事件转移 (集_透明标签数组 [i], 集_透明标签数组 [1])
.如果真结束
集_透明标签数组 [i].左边＝集_透明标签数组 [i].左边 ÷ 737 × 宽度
集_透明标签数组 [i].顶边＝集_透明标签数组 [i].顶边 ÷ 454 × 高度
集_透明标签数组 [i].宽度＝集_透明标签数组 [i].宽度 ÷ 737 × 宽度
集_透明标签数组 [i].高度＝集_透明标签数组 [i].高度 ÷ 454 × 高度
集_透明标签数组 [i].标记＝到文本 (i)
集_透明标签数组 [i].标题＝ “”
集_透明标签数组 [i].可视＝假
.计次循环尾 ()

.子程序 _透明标签1_鼠标左键被按下, 逻辑型
.参数横向位置, 整数型
.参数纵向位置, 整数型
.参数功能键状态, 整数型
透明标签＝取事件组件 ()
_启动窗口.标记＝透明标签.标记
调试输出 (_启动窗口.标记)
.子程序 _图片框1_鼠标左键被按下, 逻辑型
.参数横向位置, 整数型
.参数纵向位置, 整数型
.参数功能键状态, 整数型
图片框1.可视＝假
透明标签1.可视＝真
透明标签2.可视＝真
透明标签3.可视＝真
时钟1.时钟周期＝ 5000
.子程序 _时钟1_周期事件
.判断开始 (_启动窗口.标记 ≠ 透明标签.标记)
图片框1.可视＝真
.默认
时钟1.时钟周期＝ 0
.判断结束
上面是代码
我运行执行到图片框1按下然后透明标签没有按下过三秒就出现错误求大神帮忙下我是菜鸟