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

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

#ifndef DbsrveHPP
#define DbsrveHPP

#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 <Windows.hpp>	// Pascal unit
#include <Messages.hpp>	// Pascal unit
#include <Sysutils.hpp>	// Pascal unit
#include <Classes.hpp>	// Pascal unit
#include <Graphics.hpp>	// Pascal unit
#include <Controls.hpp>	// Pascal unit
#include <Forms.hpp>	// Pascal unit
#include <Dialogs.hpp>	// Pascal unit
#include <Dbrv.hpp>	// Pascal unit
#include <Richview.hpp>	// Pascal unit
#include <Rvedit.hpp>	// Pascal unit
#include <Sclrview.hpp>	// Pascal unit
#include <Db.hpp>	// Pascal unit
#include <Rvscroll.hpp>	// Pascal unit

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

namespace Dbsrve
{
//-- type declarations -------------------------------------------------------
class DELPHICLASS TDBSRichViewEdit;
typedef void __fastcall (__closure *TDBSRVCustomFormatEvent)(TDBSRichViewEdit* Sender, Classes::TStream* Stream, bool &DoDefault);

class DELPHICLASS TInnerDBRichViewEdit;
class PASCALIMPLEMENTATION TInnerDBRichViewEdit : public Dbrv::TDBRichViewEdit 
{
	typedef Dbrv::TDBRichViewEdit inherited;
	
protected:
	DYNAMIC void __fastcall DoFormat(void);
public:
	#pragma option push -w-inl
	/* TDBRichViewEdit.Create */ inline __fastcall virtual TInnerDBRichViewEdit(Classes::TComponent* AOwner) : Dbrv::TDBRichViewEdit(AOwner) { }
	#pragma option pop
	#pragma option push -w-inl
	/* TDBRichViewEdit.Destroy */ inline __fastcall virtual ~TInnerDBRichViewEdit(void) { }
	#pragma option pop
	
public:
	#pragma option push -w-inl
	/* TWinControl.CreateParented */ inline __fastcall TInnerDBRichViewEdit(HWND ParentWindow) : Dbrv::TDBRichViewEdit(ParentWindow) { }
	#pragma option pop
	
};


class PASCALIMPLEMENTATION TDBSRichViewEdit : public Sclrview::TSRichViewEdit 
{
	typedef Sclrview::TSRichViewEdit inherited;
	
private:
	bool __fastcall GetDBReadOnly(void);
	void __fastcall SetDBReadOnly(const bool Value);
	
protected:
	Classes::TNotifyEvent FOnLoadDocument;
	Classes::TNotifyEvent FOnNewDocument;
	TDBSRVCustomFormatEvent FOnLoadCustomFormat;
	TDBSRVCustomFormatEvent FOnSaveCustomFormat;
	AnsiString __fastcall GetDataField();
	Db::TDataSource* __fastcall GetDataSource(void);
	bool __fastcall GetAutoDisplay(void);
	Dbrv::TRVDBFieldFormat __fastcall GetFieldFormat(void);
	bool __fastcall GetIgnoreEscape(void);
	void __fastcall SetDataField(const AnsiString Value);
	void __fastcall SetDataSource(const Db::TDataSource* Value);
	void __fastcall SetAutoDisplay(const bool Value);
	void __fastcall SetFieldFormat(const Dbrv::TRVDBFieldFormat Value);
	void __fastcall SetIgnoreEscape(const bool Value);
	HIDESBASE Dbrv::TDBRichViewEdit* __fastcall GetExternalRV(void);
	HIDESBASE void __fastcall SetExternalRV(const Dbrv::TDBRichViewEdit* Value);
	Dbrv::TDBRichViewEdit* __fastcall GetRichViewEdit(void);
	virtual void __fastcall SetRichViewEdit(Rvedit::TRichViewEdit* Value);
	void __fastcall SetDBRichViewEdit(Dbrv::TDBRichViewEdit* Value);
	void __fastcall HookOnLoadCustomFormat(Richview::TCustomRichView* Sender, Classes::TStream* Stream, bool &DoDefault);
	void __fastcall HookOnSaveCustomFormat(Richview::TCustomRichView* Sender, Classes::TStream* Stream, bool &DoDefault);
	DYNAMIC Rvedit::TRichViewEdit* __fastcall CreateRichViewEditObject(void);
	DYNAMIC bool __fastcall isSRV(void);
	
public:
	__fastcall virtual TDBSRichViewEdit(Classes::TComponent* AOwner);
	__property Dbrv::TDBRichViewEdit* RichViewEdit = {read=GetRichViewEdit, write=SetDBRichViewEdit};
	
__published:
	__property bool AutoDisplay = {read=GetAutoDisplay, write=SetAutoDisplay, nodefault};
	__property bool IgnoreEscape = {read=GetIgnoreEscape, write=SetIgnoreEscape, nodefault};
	__property AnsiString DataField = {read=GetDataField, write=SetDataField};
	__property Db::TDataSource* DataSource = {read=GetDataSource, write=SetDataSource};
	__property Dbrv::TRVDBFieldFormat FieldFormat = {read=GetFieldFormat, write=SetFieldFormat, nodefault};
	__property Dbrv::TDBRichViewEdit* ExternalRV = {read=GetExternalRV, write=SetExternalRV};
	__property Classes::TNotifyEvent OnLoadDocument = {read=FOnLoadDocument, write=FOnLoadDocument};
	__property Classes::TNotifyEvent OnNewDocument = {read=FOnNewDocument, write=FOnNewDocument};
	__property TDBSRVCustomFormatEvent OnLoadCustomFormat = {read=FOnLoadCustomFormat, write=FOnLoadCustomFormat};
	__property TDBSRVCustomFormatEvent OnSaveCustomFormat = {read=FOnSaveCustomFormat, write=FOnSaveCustomFormat};
	__property bool ReadOnly = {read=GetDBReadOnly, write=SetDBReadOnly, default=0};
public:
	#pragma option push -w-inl
	/* TSRichViewEdit.Destroy */ inline __fastcall virtual ~TDBSRichViewEdit(void) { }
	#pragma option pop
	
public:
	#pragma option push -w-inl
	/* TWinControl.CreateParented */ inline __fastcall TDBSRichViewEdit(HWND ParentWindow) : Sclrview::TSRichViewEdit(ParentWindow) { }
	#pragma option pop
	
};


//-- var, const, procedure ---------------------------------------------------
extern PACKAGE void __fastcall Register(void);

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

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