易语言高级表格画成图片

易语言 2020-02-20 13:39:03

易语言高级表格画成图片

为了适应所有不同属性的表格,需要累加每列宽度
.计次循环首 (高级表格.列数, i)
参数_宽度 = 参数_宽度 + 高级表格.取列宽 (i - 1)
.计次循环尾 ()
.计次循环首 (高级表格.行数, i)
参数_高度 = 参数_高度 + 高级表格.取行高 (i - 1)
.计次循环尾 ()
参数_背景颜色 = 高级表格.背景颜色
参数_表格线颜色 = 高级表格.表格线颜色
参数_是否有表格线 = 表格线
调试输出 (参数_是否有表格线)
画板.创建 (参数_宽度, 参数_高度, 参数_背景颜色)
画板.画笔类型 (#画笔类型_实线)
画板.画笔颜色 (高级表格.表头背景颜色)
' 画表头背景颜色
.计次循环首 (高级表格.表头列数 + 1, ii)
.计次循环首 (高级表格.表头行数, i)
' 画横线
.如果真 (高级表格.表头行数 = 0)
到循环尾 ()
.如果真结束
画板.画笔粗细 (高级表格.取行高 (i - 1) × 2)
画板.画直线 (0, y, 参数_宽度, y)
y = y + 高级表格.取行高 (i - 1)
.计次循环尾 ()
.如果真 (高级表格.表头列数 = 0)
到循环尾 ()
.如果真结束
' 画竖线
画板.画笔粗细 (高级表格.取列宽 (ii - 1) × 2)
画板.画直线 (x, 0, x, 参数_高度)
x = x + 高级表格.取列宽 (ii - 1)
.计次循环尾 () ' 画笔粗细,为什么用宽度/高度乘以2,因为画笔较粗的时候,起点是画笔的中点

由于个人需要,只做了支持图片和文字型的内容。