表2 统计报表界面对象的属性设置
类名
属性名
属性值
说明
TForm
Name
FormStatisticsReport
TQuickRep
QuickRep
报表
DataSet
FormSearchAchievement.ADODataSet
数据源
TQRGroup
QRGroup1
组头
Master
FooterBand
QRBand1
组脚
Expression
STR(EntranceYear)+STR(Term)+STR(PlanCourseOrder)+ClassID
分组条件,要与SQL语句中的Order By部分相同
TQRBand
DetailBand1
细节带
BandType
rbDetail
放置了学号、姓名、总评成绩、平时成绩、期中成绩和期末成绩等六个TQRDBText组件,其DataSet与QuickRep相同也指向FormSearchAchievement.ADODataSet,DataField属性设置为各对应字段名(StudentID、StudentName、Achievement、Achievement1、Achievement2和Achievement3)
组脚,用于输出每组的统计信息
rbGroupFooter
组头中放置了11个TQRLabel组件和4个TQRDBText组件(考试类别、专业、班级和课程),4个TQRDBText组件的DataSet设置为FormSearchAchievement.ADODataSet,DataField属性设置为对应的字段名(如图3)。组脚中放置的都是TQRLabel组件,除中文显示的以外,其他的都在程序运行时根据实际动态显示。
⑴ 因需要在报表中显示平均成绩,因此需要在窗体类的private部分定义存放平均值的数组,相关代码如下:
private
GroupAverage : Array [0..3] of Double; // 平均
·2024年12月目录 ·2024年11月目录 ·2024年10月目录 ·2024年9月目录 ·2024年8月目录 ·2024年7月目录 ·2024年6月目录 ·2024年5月目录 ·2024年4月目录 ·2024年3月目录 ·2024年2月目录 ·2024年1月目录 ·2023年12月目录 ·2023年11月目录