易语言画板绘制自适应表格源码

子程序名	返回值类型	公开	备 注
create_Tabble	字节集
参数名	类 型	参考	可空	数组	备 注
区服名称	文本型
出售价格	文本型			√
回收价格	文本型			√

变量名	类 型	静态	数组	备 注
i	整数型
第一列数据	文本型		8
x偏移	整数型
画板1	内存画板

第一列数据 ＝ { “点券”, “9级”, “10级”, “11级”, “12级”, “13级”, “14级”, “15级” }
画板1.创建 (253, 291, #白色 )
画板1.刷子类型 (7) ' 颜色刷子
画板1.刷子颜色 (取颜色值 (255, 70, 70))
画板1.填充矩形 (0, 0, 253, 38)
画板1.画笔颜色 (取颜色值 (255, 70, 70))
画板1.画笔类型 (0)
画板1.画笔粗细 (1)
' 竖线
计次循环首 (4, i)
画板1.画直线 ( (i － 1) × 84, 38, (i － 1) × 84, 291)
计次循环尾 ()
' 横线
计次循环首 (9, i)
画板1.画直线 (0, i × 28 ＋ 38, 253, i × 28 ＋ 38)
计次循环尾 ()
' 表头
画板1.文本背景颜色 ( #黑色, 0)
画板1.字体大小 (“微软雅黑”, 14, 真)
画板1.置写出位置 (90, 7)
画板1.写文本行 (区服名称)
画板1.字体大小 (“微软雅黑”, 11, 真)
画板1.置写出位置 (25, 43)
画板1.写文本行 (“类 别”)
画板1.置写出位置 (96, 43)
画板1.写文本行 (“出售价格”)
画板1.置写出位置 (179, 43)
画板1.写文本行 (“回收价格”)
画板1.字体大小 (“微软雅黑”, 11, 假)
' 第一列
i ＝ 0
计次循环首 (8, i)
判断 (i ＝ 1)
x偏移 ＝ 29
判断 (i ＝ 2)
x偏移 ＝ 31
判断 (i ＞ 2)
x偏移 ＝ 27
画板1.置写出位置 (x偏移, 43 ＋ i × 28)
画板1.写文本行 (第一列数据 [i])
计次循环尾 ()
i ＝ 0
' 第二列
计次循环首 (8, i)
判断 (i ＝ 1 或 i ≥ 7)
x偏移 ＝ 29 ＋ 79
判断 (i ≥ 2 且 i ＜ 4)
x偏移 ＝ 31 ＋ 86
判断 (i ≥ 4 且 i ＜ 7)
x偏移 ＝ 27 ＋ 86
画板1.置写出位置 (x偏移, 43 ＋ i × 28)
画板1.写文本行 (出售价格 [i])
计次循环尾 ()
i ＝ 0
' 第三列
计次循环首 (8, i)
判断 (i ＝ 1 或 i ≥ 7)
x偏移 ＝ 29 ＋ 79 ＋ 83
判断 (i ≥ 2 且 i ＜ 4)
x偏移 ＝ 31 ＋ 86 ＋ 84
判断 (i ≥ 4 且 i ＜ 7)
x偏移 ＝ 27 ＋ 86 ＋ 82
画板1.置写出位置 (x偏移, 43 ＋ i × 28)
画板1.写文本行 (回收价格 [i])
计次循环尾 ()
返回 (画板1.取图片 (, , ))