qrloanrestore.cpp

一个不错的销售系统

//---------------------------------------------------------------------------
#include <vcl.h>
#pragma hdrstop

#include "QrLoanRestore.h"
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma resource "*.dfm"
TfrmLoanRestore *frmLoanRestore;
//---------------------------------------------------------------------------
__fastcall TfrmLoanRestore::TfrmLoanRestore(TComponent* Owner)
        : TForm(Owner)
{
}
//---------------------------------------------------------------------------
void __fastcall TfrmLoanRestore::QuickRep1BeforePrint(
      TCustomQuickRep *Sender, bool &PrintReport)
{
        Query1->Active = false;
        Query1->Open();        
}
//---------------------------------------------------------------------------
void __fastcall TfrmLoanRestore::FormActivate(TObject *Sender)
{
        Query1->Open();        
}
//---------------------------------------------------------------------------