.版本 2
.支持库 eGrid
.程序集 窗口程序集_启动窗口
.程序集变量 配置路径, 文本型
.子程序 __启动窗口_创建完毕
.局部变量 aa, 整数型
.局部变量 bb, 整数型
.局部变量 列宽, 整数型
.局部变量 列号, 整数型
.局部变量 列数, 整数型
配置路径 = 取运行目录 () + “\列宽配置.ini”
' -----------------------------------------------------------------------------------读入列宽并置列宽
.计次循环首 (5, 列数)
列宽 = 到整数 (读配置项 (配置路径, “高级表格”, 到文本 (列数 - 1) + “列宽”, “80”))
列号 = 到整数 (读配置项 (配置路径, “高级表格”, 到文本 (列数 - 1) + “列号”, “4”))
高级表格1.置列宽 (列号, 列宽)
.计次循环尾 ()
' -----------------------------------------------------------------------------------插入行和数据
.计次循环首 (100, aa)
高级表格1.插入行 (到文本 (aa), 0)
.计次循环首 (高级表格1.列数, bb)
高级表格1.置数据 (aa, bb, 1, “测试数据” + 到文本 (aa))
.计次循环尾 ()
.计次循环尾 ()
.子程序 _高级表格1_列宽被改变
.参数 列号, 整数型
.局部变量 列数, 整数型
' -----------------------------------------------------------------------------------写出列宽数据
.计次循环首 (5, 列数)
.如果真 (列数 - 1 = 列号)
写配置项 (配置路径, “高级表格”, 到文本 (列数 - 1) + “列宽”, 到文本 (高级表格1.取列宽 (列号)))
写配置项 (配置路径, “高级表格”, 到文本 (列数 - 1) + “列号”, 到文本 (列号))
跳出循环 ()
.如果真结束
.计次循环尾 ()