david
5678df5538
git-svn-id: https://192.168.0.254/svn/Componentes.Terceros.DevExpressVCL@31 05c56307-c608-d34a-929d-697000501d7a
53 lines
1.7 KiB
C++
53 lines
1.7 KiB
C++
//----------------------------------------------------------------------------
|
|
#ifndef dbtreeqrH
|
|
#define dbtreeqrH
|
|
//----------------------------------------------------------------------------
|
|
#include <vcl\ExtCtrls.hpp>
|
|
#include <vcl\StdCtrls.hpp>
|
|
#include <vcl\Dialogs.hpp>
|
|
#include <vcl\Forms.hpp>
|
|
#include <vcl\Controls.hpp>
|
|
#include <vcl\Graphics.hpp>
|
|
#include <vcl\Classes.hpp>
|
|
#include <vcl\SysUtils.hpp>
|
|
#include <vcl\Messages.hpp>
|
|
#include <vcl\Windows.hpp>
|
|
#include <vcl\System.hpp>
|
|
#include <vcl\DB.hpp>
|
|
#include <Qrctrls.hpp>
|
|
#include <quickrpt.hpp>
|
|
//----------------------------------------------------------------------------
|
|
class TQRListForm : public TForm
|
|
{
|
|
__published:
|
|
TQuickRep *QuickReport;
|
|
TQRBand *PageHeader;
|
|
TQRSysData *PageNumber;
|
|
TQRBand *Title;
|
|
TImage *Image2;
|
|
TQRLabel *QRLabel1;
|
|
TQRBand *Detail;
|
|
TQRDBText *QText;
|
|
TQRImage *Image;
|
|
TQRImage *ImageRect;
|
|
void __fastcall DataSource1DataChange(TObject *Sender, TField *Field);
|
|
void __fastcall QuickReportBeforePrint(TCustomQuickRep *Sender,
|
|
bool &PrintReport);
|
|
void __fastcall QuickReportAfterPrint(TObject *Sender);
|
|
void __fastcall DetailAfterPrint(TQRCustomBand *Sender,
|
|
bool BandPrinted);
|
|
void __fastcall DetailBeforePrint(TQRCustomBand *Sender,
|
|
bool &PrintBand);
|
|
private:
|
|
int ShapeCount;
|
|
TList* ShapeList;
|
|
int ImageLeft, QTextLeft, ImageRectLeft;
|
|
Graphics::TBitmap* bmp;
|
|
public:
|
|
virtual __fastcall TQRListForm(TComponent* AOwner);
|
|
};
|
|
//----------------------------------------------------------------------------
|
|
extern TQRListForm *QRListForm;
|
|
//----------------------------------------------------------------------------
|
|
#endif
|