fwqd3.cpp

售后服务系统优质的售后服务是企业生存和市场竞争的保障

//---------------------------------------------------------------------------

#include <vcl.h>
#pragma hdrstop
#include "getfwclqd.h"
#include "fwqd3.h"

//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma resource "*.dfm"
TFwQdForm3 *FwQdForm3;
//---------------------------------------------------------------------------
__fastcall TFwQdForm3::TFwQdForm3(TComponent* Owner)
        : TForm(Owner)
{
}
//---------------------------------------------------------------------------



void __fastcall TFwQdForm3::QRSubDetail1BeforePrint(TQRCustomBand *Sender,
      bool &PrintBand)
{
        gysfy = QRSubDetail1->DataSet->FieldByName("mfpjfy")->AsFloat + QRSubDetail1->DataSet->FieldByName("mffwfy")->AsFloat + QRSubDetail1->DataSet->FieldByName("gyswgfy")->AsFloat + QRSubDetail1->DataSet->FieldByName("gysjtfy")->AsFloat;
        ryfy = QRSubDetail1->DataSet->FieldByName("yfryfy")->AsFloat + QRSubDetail1->DataSet->FieldByName("yfrywgfy")->AsFloat + QRSubDetail1->DataSet->FieldByName("yfryjtfy")->AsFloat;
        QRLabel29->Caption = String(gysfy);
        QRLabel30->Caption = String(ryfy);

        ljgysfy += gysfy;
        ljryfy += ryfy;
        ljkhfy += QRSubDetail1->DataSet->FieldByName("sskhfy")->AsFloat;
        ljfwspj += QRSubDetail1->DataSet->FieldByName("mfpjfwsfy")->AsFloat;

        hjgysfy += gysfy;
        hjryfy += ryfy;
        hjkhfy += QRSubDetail1->DataSet->FieldByName("sskhfy")->AsFloat;
        hjfwspj += QRSubDetail1->DataSet->FieldByName("mfpjfwsfy")->AsFloat;
}
//---------------------------------------------------------------------------

void __fastcall TFwQdForm3::QRBand3BeforePrint(TQRCustomBand *Sender,
      bool &PrintBand)
{
        QRLabel32->Caption = String(ljgysfy);
        QRLabel36->Caption = String(ljryfy);
        QRLabel37->Caption = String(ljfwspj);
        QRLabel38->Caption = String(ljkhfy);
}
//---------------------------------------------------------------------------

void __fastcall TFwQdForm3::QRBand2AfterPrint(TQRCustomBand *Sender,
      bool BandPrinted)
{
        ljgysfy = ljryfy = ljkhfy = ljfwspj = 0;

}
//---------------------------------------------------------------------------

void __fastcall TFwQdForm3::QRBand4BeforePrint(TQRCustomBand *Sender,
      bool &PrintBand)
{
        QRLabel22->Caption = String(hjgysfy);
        QRLabel27->Caption = String(hjryfy);
        QRLabel39->Caption = String(hjfwspj);
        QRLabel35->Caption = String(hjkhfy);
}
//---------------------------------------------------------------------------