• 全部
  • Windows SDK/API
  • 基础类
  • ActiveX
  • 数据库及相关技术
  • 网络及通讯开发
  • VCL组件使用和开发
  • 问答

替朋友提问:如何实现按页统计?

TopCat 2003-07-22 09:21:37
我一个朋友问我一个问题,是关于报表的,他想实现在每页上打印该页所有记录的金额统计,但是似乎没有直接的实现方法。还有,他想实现“共x页”的功能,好像也不好实现。

因为我自己没有做过数据库打印方面的工作,对此一窍不通,所以在这里提问,希望大虾们多多援手。
...全文
30 点赞 收藏 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
回复
发帖
C++ Builder
创建于2007-08-02

1.3w+

社区成员

C++ Builder相关内容讨论区
申请成为版主
帖子事件
创建了帖子
2003-07-22 09:21
社区公告
暂无公告