数据表状态切换模块

易语言 2020-09-25 16:13:21

数据表状态切换模块

易语言例程源码是用户编写的教程,属于易语言模块控件教程。

.计次循环首 (取数组成员数 (纵向金额), 计次1)
目的画板.定位写出 (10, 目的画板.高度 - (38 + 纵变量 × 计次1), 纵向金额 [计次1] + 纵向单位值)
目的画板.画直线 (左边距, 目的画板.高度 - (30 + 纵变量 × 计次1), 目的画板.宽度 - 30, 目的画板.高度 - (30 + 纵变量 × 计次1))
.计次循环尾 ()
横变量 = (目的画板.宽度 - 左边距 - 30) ÷ 取数组成员数 (横向文本1)
.如果 (取数组成员数 (横向文本1) < 21)
.计次循环首 (取数组成员数 (横向文本1), 计次1)
目的画板.定位写出 (左边距 - 8 + 横变量 × 计次1, 目的画板.高度 - 25, 横向文本1 [取数组成员数 (横向文本1) - 计次1 + 1])
目的画板.画直线 (左边距 + 横变量 × 计次1, 40, 左边距 + 横变量 × 计次1, 目的画板.高度 - 30)
.计次循环尾 ()
.否则
.计次循环首 (取数组成员数 (横向文本1), 计次1)
.如果 (上 = 真)
上 = 假
目的画板.定位写出 (左边距 - 8 + 横变量 × 计次1, 目的画板.高度 - 28, 横向文本1 [取数组成员数 (横向文本1) - 计次1 + 1])
.否则
目的画板.定位写出 (左边距 - 8 + 横变量 × 计次1, 目的画板.高度 - 17, 横向文本1 [取数组成员数 (横向文本1) - 计次1 + 1])
上 = 真
.如果结束
目的画板.画直线 (左边距 + 横变量 × 计次1, 40, 左边距 + 横变量 × 计次1, 目的画板.高度 - 30)
.计次循环尾 ()