unit2.cpp

C++Builder高级应用开发指南随书源码

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

#include <vcl.h>
#pragma hdrstop

#include "Unit2.h"
#include "Unit3.h"
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma resource "*.dfm"
TfrmReport *frmReport;
//---------------------------------------------------------------------------
__fastcall TfrmReport::TfrmReport(TComponent* Owner)
    : TForm(Owner)
{
}
//---------------------------------------------------------------------------

void __fastcall TfrmReport::QuickRep1Preview(TObject *Sender)
{
    frmPreview->QRPreview1->QRPrinter = (TQRPrinter *)(Sender);
    frmPreview->Show();    
}
//---------------------------------------------------------------------------