| 窗口程序集名 | 保 留 | 保 留 | 备 注 |
| 窗口程序集_启动窗口 | | | |
| 变量名 | 类 型 | 数组 | 备 注 |
| 打印设置 | 打印设置信息 | |
如果真 (数据源1.
打印设置 () ＝
真)
打印设置 ＝ 数据源1.
取打印设置 ()编辑框1.内容 ＝
到文本 (打印设置.纸张类型
) 写配置项 (取运行目录 () ＋
“\打印配置项”,
“打印配置”,
“自定义纸张”, 编辑框1.内容
)
如果真 (编辑框2.内容 ＝
“” 或 编辑框3.内容 ＝
“”)信息框 (“请设置纸张宽和高”, 0, ,
)返回 ()
如果真 (编辑框4.内容 ＝
“”)信息框 (“纸张名称不能为空”, 0, ,
)返回 ()
如果 (打印机1.
置自定义纸张类型 (编辑框4.内容,
到整数 (编辑框2.内容
),
到整数 (编辑框3.内容
), 0, 0, 0, 0
) ＝
假)
信息框 (“置自定义纸张失败”, 0, ,
)
信息框 (“置自定义纸张成功”, 0, ,
)
数据源1.
从文件读 (取运行目录 () ＋
“\模板.grd”)编辑框1.内容 ＝
读配置项 (取运行目录 () ＋
“\打印配置项”,
“打印配置”,
“自定义纸张”,
)打印设置.纸张类型 ＝
到整数 (编辑框1.内容
)数据源1.
置打印设置 (打印设置
)表格1.
打印预览 ()表格1.
打印 (真,
“测试打印”)
