图形绘制模拟多功能条例子

易语言 2020-09-28 17:40:04

图形绘制模拟多功能条例子

.如果真 (纵向位置 ≥ 图片框1.顶边 + 10)
返回 ()
.如果真结束
.判断开始 (纵向位置 < 图片框1.顶边 且 原位置 > 纵向位置 且 位置钮.顶边 ≥ 0)
超级列表框1.发送信息 (277, 0, 0)
位置钮.顶边 = 位置钮.顶边 - 1
.判断 (纵向位置 > 0 且 原位置 < 纵向位置 且 位置钮.顶边 < 图片框1.高度 - 位置钮.高度)
超级列表框1.发送信息 (277, 1, 0)
位置钮.顶边 = 位置钮.顶边 + 1