社区
C++ Builder
帖子详情
替朋友提问:如何实现按页统计?
TopCat
2003-07-22 09:21:37
我一个朋友问我一个问题,是关于报表的,他想实现在每页上打印该页所有记录的金额统计,但是似乎没有直接的实现方法。还有,他想实现“共x页”的功能,好像也不好实现。
因为我自己没有做过数据库打印方面的工作,对此一窍不通,所以在这里提问,希望大虾们多多援手。
...全文
40
8
打赏
收藏
微信扫一扫
点击复制链接
分享
下载分享明细
分享
举报
写回复
8 条
回复
切换为时间正序
当前发帖距今超过3年,不再开放新的回复
发表回复
TopCat
2003-07-22
多谢回复,等待更详细的答案。
打赏
举报
回复
赞
xu_xinyu
2003-07-22
我觉得要根据每页打多少条记录来确定。
分别计算每页的合计再打印。
抛砖引玉。
打赏
举报
回复
赞
yydy
2003-07-22
gz
打赏
举报
回复
赞
TopCat
2003-07-22
多谢多谢,明日结帖~
打赏
举报
回复
赞
houzy123
2003-07-22
若要fastreport的我也有
打赏
举报
回复
赞
houzy123
2003-07-22
每页的行数20,多少页算出来了吧
__fastcall TListForm::TListForm(TComponent* Owner)
: TForm(Owner)
{
xx=1;
}
//---------------------------------------------------------------------------
void __fastcall TListForm::DetailBand1AfterPrint(TQRCustomBand *Sender,
bool BandPrinted)
{
if(xx<20)
xx++;
else
{
xx=1;
QuickRep->NewPage();
}
}
//---------------------------------------------------------------------------
打赏
举报
回复
赞
houzy123
2003-07-22
1.每页合计
原来我解答过此类问题,现再说一遍
1.对各统计项添加变量,例如基本工资jb_sheet,奖金jj_sheet
2.代码
__fastcall TListForm::TListForm(TComponent* Owner)
: TForm(Owner)
{
jb_sheet=0;初始化数据
jj_sheet=0;
}
//-----------------------------
void __fastcall TListForm::QRDBText5Print(TObject *sender,
AnsiString &Value)
{
jb_sheet+=StrToInt(Value);统计基本工资
}
//---------------------------------------------------------------------------
void __fastcall TListForm::QRDBText6Print(TObject *sender,
AnsiString &Value)
{
jj_sheet+=StrToInt(Value);统计奖金
}
//---------------------------------------------------------------------------
void __fastcall TListForm::PageFooterBand1BeforePrint(
TQRCustomBand *Sender, bool &PrintBand)
{
QRLabel8->Caption=IntToStr(jb_sheet);打印基本工资
QRLabel9->Caption=IntToStr(jj_sheet);打印奖金
}
//---------------------------------------------------------------------------
void __fastcall TListForm::PageFooterBand1AfterPrint(TQRCustomBand *Sender,
bool BandPrinted)
{
jb_sheet=0;下一页初始化数据
jj_sheet=0;
}
//-----------------------------------
打赏
举报
回复
赞
TopCat
2003-07-22
up
打赏
举报
回复
赞
相关推荐
MIT人工智能实验室:如何做研究?
文后,试试
实现
论文中所描述的程序的“玩具”版本。这无疑会加深理解。 可悲的是,很多AI实验室天生就是孤僻的,里面的成员主要阅读和引用自己学校实验室的 工作。要知道,其他的机构具有不同的思考问题的...
【经典】MIT人工智能实验室: 如何做研究?
如果觉得某人的论文有价值,跑上去,说:“我非常欣赏您的论文”,并
提问
一个问题。 获得到别的实验室进行暑期工作的机会。这样你会结识另外一群人,或许还会学到另外一种看待事物的方式。可以去问高年级同学如何...
我们如何学习:学会学习再学习
身边的
朋友
起身去洗手间的功夫,过来一个老外,想做在那个空座位上,我马上想表达的是 “这儿有人的! 脱口而出的是 “There is a person here!”(纯直翻的),那个老外听到之后愣了一下,随即反应过来,说,“OK, ...
【重温经典】MIT人工智能实验室: 如何做研究?丨附下载
如果觉得某人的论文有价值,跑上去,说:“我非常欣赏您的论文”,并
提问
一个问题。 获得到别的实验室进行暑期工作的机会 。这样你会结识另外一群人,或许还会学到另外一种看待事物的方式。可以去问高年级同学...
信息学竞赛初赛复习资料
信息学竞赛初赛(c++)初赛复习资料,主要是计算机的基础知识,帮助大家记忆
发帖
C++ Builder
微信扫一扫
点击复制链接
分享社区
下载分享明细
1.3w+
社区成员
10.2w+
社区内容
C++ Builder相关内容讨论区
社区管理员
加入社区
帖子事件
创建了帖子
2003-07-22 09:21
社区公告
暂无公告