// Borland C++ Builder
// Copyright (c) 1995, 2002 by Borland Software Corporation
// All rights reserved

// (DO NOT EDIT: machine generated header) 'DBSRVE.pas' rev: 6.00

#ifndef DBSRVEHPP
#define DBSRVEHPP

#pragma delphiheader begin
#pragma option push -w-
#pragma option push -Vx
#include <DB.hpp>	// Pascal unit
#include <SclRView.hpp>	// Pascal unit
#include <RVEdit.hpp>	// Pascal unit
#include <RichView.hpp>	// Pascal unit
#include <DBRV.hpp>	// Pascal unit
#include <Dialogs.hpp>	// Pascal unit
#include <Forms.hpp>	// Pascal unit
#include <Controls.hpp>	// Pascal unit
#include <Graphics.hpp>	// Pascal unit
#include <Classes.hpp>	// Pascal unit
#include <SysUtils.hpp>	// Pascal unit
#include <Messages.hpp>	// Pascal unit
#include <Windows.hpp>	// Pascal unit
#include <SysInit.hpp>	// Pascal unit
#include <System.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 PASCALIMPLEMENTATION TDBSRichViewEdit : public Sclrview::TSRichViewEdit 
{
	typedef Sclrview::TSRichViewEdit inherited;
	
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);
	HIDESBASE void __fastcall SetRichViewEdit(const 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 void __fastcall CreateRichViewEditObject(void);
	DYNAMIC bool __fastcall isSRV(void);
	
public:
	__fastcall virtual TDBSRichViewEdit(Classes::TComponent* AOwner);
	__property Dbrv::TDBRichViewEdit* RichViewEdit = {read=GetRichViewEdit, write=SetRichViewEdit};
	
__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};
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 option pop	// -w-
#pragma option pop	// -Vx

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