// Borland C++ Builder
// Copyright (c) 1995, 1999 by Borland International
// All rights reserved

// (DO NOT EDIT: machine generated header) 'RVDocParams.pas' rev: 4.00

#ifndef RVDocParamsHPP
#define RVDocParamsHPP

#pragma delphiheader begin
#pragma option push -w-
#include <RVTypes.hpp>	// Pascal unit
#include <RVFMisc.hpp>	// Pascal unit
#include <RVScroll.hpp>	// Pascal unit
#include <RVStyle.hpp>	// Pascal unit
#include <RVFuncs.hpp>	// Pascal unit
#include <Forms.hpp>	// Pascal unit
#include <SysUtils.hpp>	// Pascal unit
#include <Printers.hpp>	// Pascal unit
#include <Classes.hpp>	// Pascal unit
#include <SysInit.hpp>	// Pascal unit
#include <System.hpp>	// Pascal unit

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

namespace Rvdocparams
{
//-- type declarations -------------------------------------------------------
class DELPHICLASS TRVDocParameters;
#pragma pack(push, 4)
class PASCALIMPLEMENTATION TRVDocParameters : public Classes::TPersistent 
{
	typedef Classes::TPersistent inherited;
	
private:
	Extended FPageWidth;
	Extended FPageHeight;
	Extended FLeftMargin;
	Extended FRightMargin;
	Extended FTopMargin;
	Extended FBottomMargin;
	Extended FHeaderY;
	Extended FFooterY;
	Rvstyle::TRVUnits FUnits;
	Printers::TPrinterOrientation FOrientation;
	int FZoomPercent;
	Rvscroll::TRVZoomMode FZoomMode;
	bool FMirrorMargins;
	bool __fastcall StorePageHeight(void);
	bool __fastcall StorePageWidth(void);
	bool __fastcall StoreBottomMargin(void);
	bool __fastcall StoreLeftMargin(void);
	bool __fastcall StoreRightMargin(void);
	bool __fastcall StoreTopMargin(void);
	bool __fastcall StoreHeaderY(void);
	bool __fastcall StoreFooterY(void);
	
public:
	__fastcall TRVDocParameters(void);
	void __fastcall Reset(void);
	void __fastcall ResetLayout(void);
	void __fastcall ConvertToUnits(Rvstyle::TRVUnits AUnits);
	virtual void __fastcall Assign(Classes::TPersistent* Source);
	bool __fastcall AreAllValuesDefault(void);
	int __fastcall GetRVFLineCount(void);
	void __fastcall SaveToRVF(Classes::TStream* Stream);
	void __fastcall ReadProperyFromString(const AnsiString s);
	void __fastcall SaveToRTF(Classes::TStream* Stream);
	int __fastcall ToTwips(Extended Value);
	Extended __fastcall FromTwips(int Value);
	Extended __fastcall UnitsPerInch(Rvstyle::TRVUnits Units);
	
__published:
	__property Extended PageWidth = {read=FPageWidth, write=FPageWidth, stored=StorePageWidth};
	__property Extended PageHeight = {read=FPageHeight, write=FPageHeight, stored=StorePageHeight};
	__property Rvstyle::TRVUnits Units = {read=FUnits, write=FUnits, default=0};
	__property Printers::TPrinterOrientation Orientation = {read=FOrientation, write=FOrientation, default=0
		};
	__property Extended LeftMargin = {read=FLeftMargin, write=FLeftMargin, stored=StoreLeftMargin};
	__property Extended RightMargin = {read=FRightMargin, write=FRightMargin, stored=StoreRightMargin};
		
	__property Extended TopMargin = {read=FTopMargin, write=FTopMargin, stored=StoreTopMargin};
	__property Extended BottomMargin = {read=FBottomMargin, write=FBottomMargin, stored=StoreBottomMargin
		};
	__property Extended HeaderY = {read=FHeaderY, write=FHeaderY, stored=StoreHeaderY};
	__property Extended FooterY = {read=FFooterY, write=FFooterY, stored=StoreFooterY};
	__property int ZoomPercent = {read=FZoomPercent, write=FZoomPercent, default=100};
	__property Rvscroll::TRVZoomMode ZoomMode = {read=FZoomMode, write=FZoomMode, default=2};
	__property bool MirrorMargins = {read=FMirrorMargins, write=FMirrorMargins, default=0};
public:
	#pragma option push -w-inl
	/* TPersistent.Destroy */ inline __fastcall virtual ~TRVDocParameters(void) { }
	#pragma option pop
	
};

#pragma pack(pop)

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

}	/* namespace Rvdocparams */
#if !defined(NO_IMPLICIT_NAMESPACE_USE)
using namespace Rvdocparams;
#endif
#pragma option pop	// -w-

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