rm_formreport.hpp

这是一个功能强大

	
__published:
	__property Rm_common::TRMPreviewZoom InitialZoom = {read=FInitialZoom, write=FInitialZoom, nodefault};
	__property Rm_common::TRMPreviewButtons PreviewButtons = {read=FPreviewButtons, write=FPreviewButtons, nodefault};
	__property Rm_preview::TRMPreview* Preview = {read=FPreview, write=FPreview};
	__property bool ShowProgress = {read=FShowProgress, write=FShowProgress, default=1};
	__property AnsiString ReportTitle = {read=FReportTitle, write=FReportTitle};
	__property bool ShowPrintDialog = {read=FShowPrintDialog, write=FShowPrintDialog, default=1};
	__property bool ModifyPrepared = {read=FModifyPrepared, write=FModifyPrepared, default=0};
public:
	#pragma option push -w-inl
	/* TPersistent.Destroy */ inline __fastcall virtual ~TRMReportSettings(void) { }
	#pragma option pop
	
};


class PASCALIMPLEMENTATION TRMCustomFormReport : public Classes::TComponent 
{
	typedef Classes::TComponent inherited;
	
private:
	AnsiString FAutoBooleanString;
	Rm_class::TRMReport* FReport;
	TRMPageHeaderFooter* FPageHeader;
	TRMPageHeaderFooter* FPageFooter;
	TRMPageHeaderFooter* FColumnFooter;
	Db::TDataSet* FDataSet;
	Db::TDataSet* FDetailDataSet;
	Classes::TList* FRMDataSets;
	TRMGroupItems* FGroups;
	TRMGridReportOptions FReportOptions;
	TRMGridFontOptions* FGridFontOptions;
	TRMPageLayout* FPageLayout;
	TRMScaleOptions* FScaleMode;
	TRMGridNumOptions* FGridNumOptions;
	TRMMasterDataBandOptions* FMasterDataBandOptions;
	TRMReportSettings* FReportSettings;
	void __fastcall SetGroups(TRMGroupItems* Value);
	Rm_class::TRMReport* __fastcall GetReport(void);
	void __fastcall SetPageHeader(TRMPageHeaderFooter* Value);
	void __fastcall SetPageFooter(TRMPageHeaderFooter* Value);
	void __fastcall SetColumnFooter(TRMPageHeaderFooter* Value);
	void __fastcall SetMasterDataBandOptions(TRMMasterDataBandOptions* Value);
	void __fastcall SetGridNumOptions(TRMGridNumOptions* Value);
	void __fastcall SetScaleMode(TRMScaleOptions* Value);
	void __fastcall SetPageLayout(TRMPageLayout* Value);
	void __fastcall SetGridFontOptions(TRMGridFontOptions* Value);
	void __fastcall ClearRMDataSets(void);
	void __fastcall OnAfterPreviewPageSetup(System::TObject* Sender);
	
protected:
	Classes::TStringList* FormWidth;
	int OffsX;
	int OffsY;
	int FormHeight;
	int PageWidth;
	int PageHeight;
	bool HaveDetailBand;
	int __fastcall CalcWidth(int aWidth);
	void __fastcall AddPage(void);
	void __fastcall CalcRect(Rm_class::TRMView* t, Rm_class::TRMCustomBandView* ParentBand, int aFormWidth);
	void __fastcall _InternalShowReport(int aFlag);
	void __fastcall SetMemoViewFormat(Rm_class::TRMMemoView* aView, Db::TField* aField);
	Rm_dataset::TRMDBDataSet* __fastcall AddRMDataSet(const Db::TDataSet* aDataSet);
	virtual bool __fastcall CreateReportFromGrid(void);
	__property TRMGroupItems* Groups = {read=FGroups, write=SetGroups};
	__property Db::TDataSet* DetailDataSet = {read=FDetailDataSet, write=FDetailDataSet};
	
public:
	Rm_dataset::TRMDBDataSet* MainDataSet;
	__fastcall virtual TRMCustomFormReport(Classes::TComponent* AOwner);
	__fastcall virtual ~TRMCustomFormReport(void);
	virtual void __fastcall Notification(Classes::TComponent* AComponent, Classes::TOperation Operation);
	void __fastcall AssignFont(Rm_class::TRMMemoView* aView, Graphics::TFont* aFont);
	void __fastcall PrintReport(void);
	void __fastcall ShowReport(void);
	void __fastcall DesignReport(void);
	void __fastcall BuildReport(void);
	bool __fastcall PageSetup(void);
	void __fastcall ChangePageLayout(Rm_printer::TRMPageSetting* aPageSetting);
	__property Rm_class::TRMReport* Report = {read=GetReport};
	
__published:
	__property Db::TDataSet* DataSet = {read=FDataSet, write=FDataSet};
	__property TRMGridReportOptions ReportOptions = {read=FReportOptions, write=FReportOptions, nodefault};
	__property TRMPageLayout* PageLayout = {read=FPageLayout, write=SetPageLayout};
	__property TRMPageHeaderFooter* PageHeader = {read=FPageHeader, write=SetPageHeader};
	__property TRMPageHeaderFooter* PageFooter = {read=FPageFooter, write=SetPageFooter};
	__property TRMPageHeaderFooter* ColumnFooter = {read=FColumnFooter, write=SetColumnFooter};
	__property TRMScaleOptions* ScaleMode = {read=FScaleMode, write=SetScaleMode};
	__property TRMMasterDataBandOptions* MasterDataBandOptions = {read=FMasterDataBandOptions, write=SetMasterDataBandOptions};
	__property TRMGridNumOptions* GridNumOptions = {read=FGridNumOptions, write=SetGridNumOptions};
	__property TRMGridFontOptions* GridFontOptions = {read=FGridFontOptions, write=SetGridFontOptions};
	__property TRMReportSettings* ReportSettings = {read=FReportSettings, write=FReportSettings};
	__property AnsiString AutoBooleanString = {read=FAutoBooleanString, write=FAutoBooleanString};
};


class PASCALIMPLEMENTATION TRMPageHeaderFooter : public Classes::TPersistent 
{
	typedef Classes::TPersistent inherited;
	
private:
	Classes::TStrings* FCaption;
	int FHeight;
	void __fastcall SetCaption(Classes::TStrings* Value);
	void __fastcall SetHeight(int Value);
	
protected:
	TRMCustomFormReport* ParentFormReport;
	void __fastcall GetStrings(Classes::TStrings* aStrings);
	
public:
	__fastcall TRMPageHeaderFooter(void);
	__fastcall virtual ~TRMPageHeaderFooter(void);
	virtual void __fastcall Assign(Classes::TPersistent* Source);
	void __fastcall Clear(void);
	void __fastcall Add(const AnsiString AStr, Graphics::TFont* AFont, Classes::TAlignment Align);
	void __fastcall LoadFromRichEdit(Comctrls::TRichEdit* ARichEdit);
	
__published:
	__property Classes::TStrings* Caption = {read=FCaption, write=SetCaption};
	__property int Height = {read=FHeight, write=SetHeight, default=20};
};


class PASCALIMPLEMENTATION TRMGroupItem : public Classes::TCollectionItem 
{
	typedef Classes::TCollectionItem inherited;
	
private:
	AnsiString FGroupFieldName;
	bool FFormNewPage;
	Classes::TComponent* __fastcall GetReport(void);
	
public:
	__fastcall virtual TRMGroupItem(Classes::TCollection* Collection);
	virtual void __fastcall Assign(Classes::TPersistent* Source);
	__property Classes::TComponent* Report = {read=GetReport};
	
__published:
	__property AnsiString GroupFieldName = {read=FGroupFieldName, write=FGroupFieldName};
	__property bool FormNewPage = {read=FFormNewPage, write=FFormNewPage, default=0};
public:
	#pragma option push -w-inl
	/* TCollectionItem.Destroy */ inline __fastcall virtual ~TRMGroupItem(void) { }
	#pragma option pop
	
};


class DELPHICLASS TRMPageAggr;
class PASCALIMPLEMENTATION TRMPageAggr : public Classes::TPersistent 
{
	typedef Classes::TPersistent inherited;
	
private:
	bool FAutoTotal;
	AnsiString FTotalFields;
	
public:
	virtual void __fastcall Assign(Classes::TPersistent* Source);
	
__published:
	__property bool AutoTotal = {read=FAutoTotal, write=FAutoTotal, nodefault};
	__property AnsiString TotalFields = {read=FTotalFields, write=FTotalFields};
public:
	#pragma option push -w-inl
	/* TPersistent.Destroy */ inline __fastcall virtual ~TRMPageAggr(void) { }
	#pragma option pop
	
public:
	#pragma option push -w-inl
	/* TObject.Create */ inline __fastcall TRMPageAggr(void) : Classes::TPersistent() { }
	#pragma option pop
	
};


class DELPHICLASS TRMGridPageAggrOptions;
class PASCALIMPLEMENTATION TRMGridPageAggrOptions : public Classes::TPersistent 
{
	typedef Classes::TPersistent inherited;
	
private:
	TRMPageAggr* FPageSum;
	TRMPageAggr* FPageSumTotal;
	
public:
	__fastcall TRMGridPageAggrOptions(void);
	__fastcall virtual ~TRMGridPageAggrOptions(void);
	virtual void __fastcall Assign(Classes::TPersistent* Source);
	
__published:
	__property TRMPageAggr* PageSum = {read=FPageSum, write=FPageSum};
	__property TRMPageAggr* PageSumTotal = {read=FPageSumTotal, write=FPageSumTotal};
};


class DELPHICLASS TRMCustomGridReport;
class PASCALIMPLEMENTATION TRMCustomGridReport : public Classes::TComponent 
{
	typedef Classes::TComponent inherited;
	
private:
	AnsiString FAutoBooleanString;
	Rm_gridreport::TRMGridReport* FReport;
	Classes::TList* FRMDataSets;
	TRMGroupItems* FGroups;
	TRMGridReportOptions FReportOptions;
	TRMGridFontOptions* FGridFontOptions;
	TRMPageLayout* FPageLayout;
	Rm_common::TRMBandMsg* FPageHeaderMsg;
	Rm_common::TRMBandMsg* FPageFooterMsg;
	Rm_common::TRMPageCaptionMsg* FPageCaptionMsg;
	TRMGridNumOptions* FGridNumOptions;
	TRMMasterDataBandOptions* FMasterDataBandOptions;
	TRMReportSettings* FReportSettings;
	int FGridFixedCols;
	TRMOnAfterCreateGridObjectEvent FOnAfterCreateGridFieldObject;
	void __fastcall SetGroups(TRMGroupItems* Value);
	Rm_gridreport::TRMGridReport* __fastcall GetReport(void);
	void __fastcall SetMasterDataBandOptions(TRMMasterDataBandOptions* Value);
	void __fastcall SetGridNumOptions(TRMGridNumOptions* Value);
	void __fastcall SetPageLayout(TRMPageLayout* Value);
	void __fastcall SetGridFontOptions(TRMGridFontOptions* Value);
	void __fastcall SetPageHeaderMsg(Rm_common::TRMBandMsg* Value);
	void __fastcall SetPageFooterMsg(Rm_common::TRMBandMsg* Value);
	void __fastcall SetPageCaptionMsg(Rm_common::TRMPageCaptionMsg* Value);
	void __fastcall ClearRMDataSets(void);
	void __fastcall OnAfterPreviewPageSetup(System::TObject* Sender);
	
protected:
	int OffsX;
	int OffsY;
	int FormHeight;
	int PageWidth;
	int PageHeight;
	bool HaveDetailBand;
	virtual bool __fastcall CreateReportFromGrid(void);
	void __fastcall _InternalShowReport(int aFlag);
	void __fastcall SetMemoViewFormat(Rm_class::TRMMemoView* aView, Db::TField* aField);
	Rm_dataset::TRMDBDataSet* __fastcall AddRMDataSet(const Db::TDataSet* aDataSet);
	void __fastcall AssignFont(Rm_class::TRMMemoView* aView, Graphics::TFont* aFont);
	__property TRMGroupItems* Groups = {read=FGroups, write=SetGroups};
	
public:
	__fastcall virtual TRMCustomGridReport(Classes::TComponent* AOwner);
	__fastcall virtual ~TRMCustomGridReport(void);
	void __fastcall PrintReport(void);
	void __fastcall ShowReport(void);
	void __fastcall DesignReport(void);
	void __fastcall BuildReport(void);
	bool __fastcall PageSetup(void);
	bool __fastcall PageHeaderFooterSetup(void);
	void __fastcall ChangePageLayout(Rm_printer::TRMPageSetting* aPageSetting);
	__property Rm_gridreport::TRMGridReport* Report = {read=GetReport};
	
__published:
	__property TRMGridReportOptions ReportOptions = {read=FReportOptions, write=FReportOptions, nodefault};
	__property TRMPageLayout* PageLayout = {read=FPageLayout, write=SetPageLayout};
	__property Rm_common::TRMBandMsg* PageHeaderMsg = {read=FPageHeaderMsg, write=SetPageHeaderMsg};
	__property Rm_common::TRMBandMsg* PageFooterMsg = {read=FPageFooterMsg, write=SetPageFooterMsg};
	__property Rm_common::TRMPageCaptionMsg* PageCaptionMsg = {read=FPageCaptionMsg, write=SetPageCaptionMsg};
	__property TRMMasterDataBandOptions* MasterDataBandOptions = {read=FMasterDataBandOptions, write=SetMasterDataBandOptions};
	__property TRMGridNumOptions* GridNumOptions = {read=FGridNumOptions, write=SetGridNumOptions};
	__property TRMGridFontOptions* GridFontOptions = {read=FGridFontOptions, write=SetGridFontOptions};
	__property TRMReportSettings* ReportSettings = {read=FReportSettings, write=FReportSettings};
	__property AnsiString AutoBooleanString = {read=FAutoBooleanString, write=FAutoBooleanString};
	__property int GridFixedCols = {read=FGridFixedCols, write=FGridFixedCols, default=0};
	__property TRMOnAfterCreateGridObjectEvent OnAfterCreateGridObjectEvent = {read=FOnAfterCreateGridFieldObject, write=FOnAfterCreateGridFieldObject};
};