rm_e_txt.hpp

这是一个功能强大

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

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

#ifndef Rm_e_txtHPP
#define Rm_e_txtHPP

#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 <Dialogs.hpp>	// Pascal unit
#include <Stdctrls.hpp>	// Pascal unit
#include <Controls.hpp>	// Pascal unit
#include <Rm_common.hpp>	// Pascal unit
#include <Rm_class.hpp>	// Pascal unit

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

namespace Rm_e_txt
{
//-- type declarations -------------------------------------------------------
class DELPHICLASS TRMExportViewInfo;
class PASCALIMPLEMENTATION TRMExportViewInfo : public System::TObject 
{
	typedef System::TObject inherited;
	
private:
	AnsiString FText;
	Rm_class::TRMReportView* FView;
	
public:
	__fastcall TRMExportViewInfo(AnsiString aText, System::TObject* aObj);
	__property AnsiString Text = {read=FText, write=FText};
	__property Rm_class::TRMReportView* View = {read=FView, write=FView};
public:
	#pragma option push -w-inl
	/* TObject.Destroy */ inline __fastcall virtual ~TRMExportViewInfo(void) { }
	#pragma option pop
	
};


class DELPHICLASS TRMExportOneLine;
class PASCALIMPLEMENTATION TRMExportOneLine : public System::TObject 
{
	typedef System::TObject inherited;
	
public:
	TRMExportViewInfo* operator[](int Index) { return Items[Index]; }
	
private:
	Classes::TList* FList;
	TRMExportViewInfo* __fastcall GetItem(int Index);
	
public:
	__fastcall TRMExportOneLine(void);
	__fastcall virtual ~TRMExportOneLine(void);
	int __fastcall Count(void);
	void __fastcall Clear(void);
	void __fastcall Add(AnsiString aText, System::TObject* aObj);
	__property TRMExportViewInfo* Items[int Index] = {read=GetItem/*, default*/};
};


class DELPHICLASS TRMExportLines;
class PASCALIMPLEMENTATION TRMExportLines : public System::TObject 
{
	typedef System::TObject inherited;
	
public:
	TRMExportOneLine* operator[](int Index) { return Items[Index]; }
	
private:
	Classes::TList* FList;
	double FScaleY;
	TRMExportOneLine* __fastcall GetItem(int Index);
	
protected:
	void __fastcall Clear(void);
	
public:
	__fastcall TRMExportLines(void);
	__fastcall virtual ~TRMExportLines(void);
	int __fastcall Count(void);
	void __fastcall Add(AnsiString aText, System::TObject* aObj);
	__property TRMExportOneLine* Items[int Index] = {read=GetItem/*, default*/};
};


class DELPHICLASS TRMTextExport;
class PASCALIMPLEMENTATION TRMTextExport : public Rm_class::TRMExportFilter 
{
	typedef Rm_class::TRMExportFilter inherited;
	
private:
	double FScaleX;
	double FScaleY;
	bool FKillEmptyLines;
	bool FConvertToOEM;
	bool FExportFrames;
	bool FUsePseudographic;
	bool FPageBreaks;
	Rm_class::TRMReportView* FCurReportView;
	TRMExportLines* FLines;
	
protected:
	virtual void __fastcall InternalOnePage(Rm_class::TRMEndPage* aPage, TRMExportLines* aLines);
	virtual void __fastcall OnText(const Types::TRect &aDrawRect, int x, int y, const AnsiString aText, Rm_class::TRMView* View);
	virtual void __fastcall OnExportPage(const Rm_class::TRMEndPage* aPage);
	
public:
	__fastcall virtual TRMTextExport(Classes::TComponent* AOwner);
	__fastcall virtual ~TRMTextExport(void);
	virtual Word __fastcall ShowModal(void);
	virtual void __fastcall OnEndPage(void);
	virtual void __fastcall OnBeginPage(void);
	
__published:
	__property double ScaleX = {read=FScaleX, write=FScaleX};
	__property double ScaleY = {read=FScaleY, write=FScaleY};
	__property bool KillEmptyLines = {read=FKillEmptyLines, write=FKillEmptyLines, default=1};
	__property bool ConvertToOEM = {read=FConvertToOEM, write=FConvertToOEM, default=0};
	__property bool ExportFrames = {read=FExportFrames, write=FExportFrames, default=0};
	__property bool UsePseudographic = {read=FUsePseudographic, write=FUsePseudographic, default=0};
	__property bool PageBreaks = {read=FPageBreaks, write=FPageBreaks, default=1};
};


class DELPHICLASS TRMTXTExportForm;
class PASCALIMPLEMENTATION TRMTXTExportForm : public Forms::TForm 
{
	typedef Forms::TForm inherited;
	
__published:
	Stdctrls::TGroupBox* GroupBox1;
	Stdctrls::TCheckBox* CB1;
	Stdctrls::TCheckBox* CB2;
	Stdctrls::TCheckBox* CB4;
	Stdctrls::TLabel* Label1;
	Stdctrls::TEdit* E1;
	Stdctrls::TButton* btnOK;
	Stdctrls::TButton* btnCancel;
	Stdctrls::TCheckBox* CB5;
	Stdctrls::TCheckBox* CB3;
	Stdctrls::TLabel* Label2;
	Stdctrls::TLabel* Label3;
	Stdctrls::TEdit* E2;
	void __fastcall CB3Click(System::TObject* Sender);
	void __fastcall FormCreate(System::TObject* Sender);
	
private:
	void __fastcall Localize(void);
public:
	#pragma option push -w-inl
	/* TCustomForm.Create */ inline __fastcall virtual TRMTXTExportForm(Classes::TComponent* AOwner) : Forms::TForm(AOwner) { }
	#pragma option pop
	#pragma option push -w-inl
	/* TCustomForm.CreateNew */ inline __fastcall virtual TRMTXTExportForm(Classes::TComponent* AOwner, int Dummy) : Forms::TForm(AOwner, Dummy) { }
	#pragma option pop
	#pragma option push -w-inl
	/* TCustomForm.Destroy */ inline __fastcall virtual ~TRMTXTExportForm(void) { }
	#pragma option pop
	
public:
	#pragma option push -w-inl
	/* TWinControl.CreateParented */ inline __fastcall TRMTXTExportForm(HWND ParentWindow) : Forms::TForm(ParentWindow) { }
	#pragma option pop
	
};


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

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

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