rm_e_xls.hpp

这是一个功能强大

// CodeGear C++Builder
// Copyright (c) 1995, 2007 by CodeGear
// All rights reserved

// (DO NOT EDIT: machine generated header) 'Rm_e_xls.pas' rev: 11.00

#ifndef Rm_e_xlsHPP
#define Rm_e_xlsHPP

#pragma delphiheader begin
#pragma option push
#pragma option -w-      // All warnings off
#pragma option -Vx      // Zero-length empty class member functions
#pragma pack(push,8)
#include <System.hpp>	// Pascal unit
#include <Sysinit.hpp>	// Pascal unit
#include <Sysutils.hpp>	// Pascal unit
#include <Windows.hpp>	// Pascal unit
#include <Messages.hpp>	// Pascal unit
#include <Classes.hpp>	// Pascal unit
#include <Graphics.hpp>	// Pascal unit
#include <Forms.hpp>	// Pascal unit
#include <Stdctrls.hpp>	// Pascal unit
#include <Controls.hpp>	// Pascal unit
#include <Dialogs.hpp>	// Pascal unit
#include <Extctrls.hpp>	// Pascal unit
#include <Buttons.hpp>	// Pascal unit
#include <Comctrls.hpp>	// Pascal unit
#include <Shellapi.hpp>	// Pascal unit
#include <Comobj.hpp>	// Pascal unit
#include <Rm_common.hpp>	// Pascal unit
#include <Rm_class.hpp>	// Pascal unit
#include <Rm_e_main.hpp>	// Pascal unit
#include <Rm_wawexcel.hpp>	// Pascal unit
#include <Jpeg.hpp>	// Pascal unit
#include <Variants.hpp>	// Pascal unit

//-- user supplied -----------------------------------------------------------

namespace Rm_e_xls
{
//-- type declarations -------------------------------------------------------
class DELPHICLASS TRMXLSExport;
class PASCALIMPLEMENTATION TRMXLSExport : public Rm_class::TRMExportFilter 
{
	typedef Rm_class::TRMExportFilter inherited;
	
private:
	double FScaleX;
	double FScaleY;
	int FExportPrecision;
	bool FShowAfterExport;
	bool FExportImages;
	bool FExportFrames;
	Graphics::TPixelFormat FPixelFormat;
	Rm_e_main::TRMEFImageFormat FExportImageFormat;
	Jpeg::TJPEGQualityRange FJPEGQuality;
	int FSheetCount;
	int FPagesOfSheet;
	int FTotalPage;
	Rm_wawexcel::TwawXLSWorkbook* FWorkBook;
	Rm_e_main::TRMIEMList* FMatrixList;
	int FLeftMargin;
	int FTopMargin;
	int FRightMargin;
	int FBottomMargin;
	Rm_common::TRMPrinterOrientation FPageOr;
	int FPageSize;
	bool FCompressFile;
	void __fastcall DoAfterExport(const AnsiString aFileName);
	void __fastcall ExportPages(void);
	
protected:
	virtual void __fastcall OnBeginDoc(void);
	virtual void __fastcall OnEndDoc(void);
	virtual void __fastcall OnBeginPage(void);
	virtual void __fastcall OnEndPage(void);
	virtual void __fastcall OnExportPage(const Rm_class::TRMEndPage* aPage);
	
public:
	__fastcall virtual TRMXLSExport(Classes::TComponent* AOwner);
	__fastcall virtual ~TRMXLSExport(void);
	virtual Word __fastcall ShowModal(void);
	
__published:
	__property bool ShowAfterExport = {read=FShowAfterExport, write=FShowAfterExport, nodefault};
	__property int ExportPrecision = {read=FExportPrecision, write=FExportPrecision, nodefault};
	__property int PagesOfSheet = {read=FPagesOfSheet, write=FPagesOfSheet, nodefault};
	__property bool ExportImages = {read=FExportImages, write=FExportImages, nodefault};
	__property bool ExportFrames = {read=FExportFrames, write=FExportFrames, nodefault};
	__property Rm_e_main::TRMEFImageFormat ExportImageFormat = {read=FExportImageFormat, write=FExportImageFormat, nodefault};
	__property Jpeg::TJPEGQualityRange JPEGQuality = {read=FJPEGQuality, write=FJPEGQuality, default=100};
	__property Graphics::TPixelFormat PixelFormat = {read=FPixelFormat, write=FPixelFormat, default=6};
	__property double ScaleX = {read=FScaleX, write=FScaleX};
	__property double ScaleY = {read=FScaleY, write=FScaleY};
	__property bool CompressFile = {read=FCompressFile, write=FCompressFile, nodefault};
};


class DELPHICLASS TRMXLSExportForm;
class PASCALIMPLEMENTATION TRMXLSExportForm : public Forms::TForm 
{
	typedef Forms::TForm inherited;
	
__published:
	Stdctrls::TButton* btnOK;
	Stdctrls::TButton* btnCancel;
	Stdctrls::TEdit* edtExportFileName;
	Buttons::TSpeedButton* btnFileName;
	Stdctrls::TGroupBox* GroupBox1;
	Stdctrls::TLabel* Label1;
	Dialogs::TSaveDialog* SaveDialog;
	Stdctrls::TRadioButton* rdbPrintAll;
	Stdctrls::TRadioButton* rbdPrintCurPage;
	Stdctrls::TRadioButton* rbdPrintPages;
	Stdctrls::TEdit* edtPages;
	Stdctrls::TLabel* Label2;
	Stdctrls::TGroupBox* GroupBox2;
	Stdctrls::TCheckBox* chkShowAfterGenerate;
	Stdctrls::TCheckBox* chkExportFrames;
	Stdctrls::TGroupBox* gbExportImages;
	Stdctrls::TLabel* lblExportImageFormat;
	Stdctrls::TLabel* lblJPEGQuality;
	Stdctrls::TLabel* Label4;
	Stdctrls::TComboBox* cmbImageFormat;
	Stdctrls::TEdit* edJPEGQuality;
	Comctrls::TUpDown* UpDown1;
	Stdctrls::TComboBox* cmbPixelFormat;
	Stdctrls::TCheckBox* chkExportImages;
	Stdctrls::TEdit* edPages;
	Comctrls::TUpDown* UpDown2;
	Stdctrls::TLabel* Label3;
	Stdctrls::TCheckBox* chkWYB;
	void __fastcall FormCreate(System::TObject* Sender);
	void __fastcall btnFileNameClick(System::TObject* Sender);
	void __fastcall FormCloseQuery(System::TObject* Sender, bool &CanClose);
	void __fastcall rbdPrintPagesClick(System::TObject* Sender);
	void __fastcall edtPagesEnter(System::TObject* Sender);
	void __fastcall chkExportFramesClick(System::TObject* Sender);
	void __fastcall edJPEGQualityKeyPress(System::TObject* Sender, char &Key);
	void __fastcall cmbImageFormatChange(System::TObject* Sender);
	
private:
	void __fastcall Localize(void);
public:
	#pragma option push -w-inl
	/* TCustomForm.Create */ inline __fastcall virtual TRMXLSExportForm(Classes::TComponent* AOwner) : Forms::TForm(AOwner) { }
	#pragma option pop
	#pragma option push -w-inl
	/* TCustomForm.CreateNew */ inline __fastcall virtual TRMXLSExportForm(Classes::TComponent* AOwner, int Dummy) : Forms::TForm(AOwner, Dummy) { }
	#pragma option pop
	#pragma option push -w-inl
	/* TCustomForm.Destroy */ inline __fastcall virtual ~TRMXLSExportForm(void) { }
	#pragma option pop
	
public:
	#pragma option push -w-inl
	/* TWinControl.CreateParented */ inline __fastcall TRMXLSExportForm(HWND ParentWindow) : Forms::TForm(ParentWindow) { }
	#pragma option pop
	
};


//-- var, const, procedure ---------------------------------------------------

}	/* namespace Rm_e_xls */
using namespace Rm_e_xls;
#pragma pack(pop)
#pragma option pop

#pragma delphiheader end.
//-- end unit ----------------------------------------------------------------
#endif	// Rm_e_xls