今天给大家分享的是报表功能,非常实用
1. 第一步需要建一个测试表,效果如下:
使用的PL/SQL创建
2.创建一个主窗体,添加2个EditMask控件
设置Mask格式和Mask类型如图右侧
3.添加3个按钮和一个数据窗口控件
命名规范 :mask编辑框为em_start和em_end
按钮为cb_check,cb_print,cb_close
DW为dw_1
在关闭按钮中添加事件
close(parent),表示关闭当前控件的父级窗口
打印按钮中添加事件
dw_1.print(),简易打印
窗口命名为w_main
4.连接本地数据库,上一期讲解过数据库操作,此次就不细讲了
新建一个Gird数据窗口
添加2个参数对象对应起始时间和结束时间
点击如图第二行进行添加传参变量
写sql脚本点击return如下
下一步下一步OK
5.添加标尺,表格调整
勾选Show Ruler添加标尺
插入标题,页码
点击如图插入页码
显示效果如图
添加字段名Text属性,更改文本格式
6.在主窗口数据窗口控件中添加数据对象如图
在查询按钮点击事件中添加代码
7.创建连接方法f_conn
复制如图代码
创建如图方法
8.在app对象中添加方法,完成
最终运行如图