|
——此文章摘自《Delphi 数据库开发经典案例解析》定价￥特价￥购买>> 完成期末结帐功能 期末结帐功能和前面的凭证过帐一样是依靠在程序中调用sf_期末结帐存储过程完成的由SQL Server在后台执行因此不需要再制作窗体界面在程序主窗体的【期末结帐】菜单的响应函数中添加相应的处理代码完成期末结帐的功能具体代码参看节代码中NClick的函数代码(其功能为执行期末结帐的储存过程) 完成资产负债表报表输出功能 关于利用QuickRep控件制作报表的方法我们在第一章进销存系统中已经由详细的说明这里就不再赘述 新建一个窗体将其Name属性改为FinalReportCaption属性改为资产负债表并为其添加一个QuickRep和一个ADOTable控件在QuickRep控件的各个Band上分别放置相应的QRSysData控件QRLabel控件和QRDBText控件如图所示其中QRDBText控件DataField属性设置为相应QRLabel的标题两个控件属性设置如表所示 图 资产负债表报表窗体 当需要显示【资产负债表】报表时首先需要提示用户输入统计的会计期间默认是当前会计期间确定后调用sf_计算资产负债表存储过程计算资产负债表最后在报表窗体中显示报表菜单的响应函数处理具体代码参看节代码中NClick的函数代码(其功能为资产负债报表的生成和打印) 编译并运行系统 至此我们完成了整个系统的制作选择Run | Run菜单命令或按F键编译并运行程序可以看到前面节中介绍的程序 |
