// Borland C++ Builder // Copyright (c) 1995, 2005 by Borland Software Corporation // All rights reserved // (DO NOT EDIT: machine generated header) 'Rvsedit.pas' rev: 10.00 #ifndef RvseditHPP #define RvseditHPP #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 // Pascal unit #include // Pascal unit #include // Pascal unit #include // Pascal unit #include // Pascal unit #include // Pascal unit #include // Pascal unit #include // Pascal unit #include // Pascal unit #include // Pascal unit #include // Pascal unit #include // Pascal unit #include // Pascal unit #include // Pascal unit #include // Pascal unit #include // Pascal unit #include // Pascal unit #include // Pascal unit #include // Pascal unit //-- user supplied ----------------------------------------------------------- namespace Rvsedit { //-- type declarations ------------------------------------------------------- typedef TDefaultEditor TRVComponentEditor; ; class DELPHICLASS TRVSEditor; class PASCALIMPLEMENTATION TRVSEditor : public Designeditors::TDefaultEditor { typedef Designeditors::TDefaultEditor inherited; private: void __fastcall LoadStylesFromINIFile(void); void __fastcall SaveStylesToINIFile(void); protected: int VerbIndex; virtual void __fastcall EditProperty(const Designintf::_di_IProperty PropertyEditor, bool &Continue); public: virtual void __fastcall ExecuteVerb(int Index); virtual AnsiString __fastcall GetVerb(int Index); virtual int __fastcall GetVerbCount(void); public: #pragma option push -w-inl /* TComponentEditor.Create */ inline __fastcall virtual TRVSEditor(Classes::TComponent* AComponent, Designintf::_di_IDesigner ADesigner) : Designeditors::TDefaultEditor(AComponent, ADesigner) { } #pragma option pop public: #pragma option push -w-inl /* TObject.Destroy */ inline __fastcall virtual ~TRVSEditor(void) { } #pragma option pop }; class DELPHICLASS TRVEEditor; class PASCALIMPLEMENTATION TRVEEditor : public Designeditors::TDefaultEditor { typedef Designeditors::TDefaultEditor inherited; public: virtual void __fastcall ExecuteVerb(int Index); virtual AnsiString __fastcall GetVerb(int Index); virtual int __fastcall GetVerbCount(void); public: #pragma option push -w-inl /* TComponentEditor.Create */ inline __fastcall virtual TRVEEditor(Classes::TComponent* AComponent, Designintf::_di_IDesigner ADesigner) : Designeditors::TDefaultEditor(AComponent, ADesigner) { } #pragma option pop public: #pragma option push -w-inl /* TObject.Destroy */ inline __fastcall virtual ~TRVEEditor(void) { } #pragma option pop }; class DELPHICLASS TRVCodePageProperty; class PASCALIMPLEMENTATION TRVCodePageProperty : public Designeditors::TIntegerProperty { typedef Designeditors::TIntegerProperty inherited; public: virtual Designintf::TPropertyAttributes __fastcall GetAttributes(void); virtual AnsiString __fastcall GetValue(); virtual void __fastcall GetValues(Classes::TGetStrProc Proc); virtual void __fastcall SetValue(const AnsiString Value)/* overload */; public: #pragma option push -w-inl /* TPropertyEditor.Create */ inline __fastcall virtual TRVCodePageProperty(const Designintf::_di_IDesigner ADesigner, int APropCount) : Designeditors::TIntegerProperty(ADesigner, APropCount) { } #pragma option pop #pragma option push -w-inl /* TPropertyEditor.Destroy */ inline __fastcall virtual ~TRVCodePageProperty(void) { } #pragma option pop /* Hoisted overloads: */ public: inline void __fastcall SetValue(const WideString Value){ TPropertyEditor::SetValue(Value); } }; class DELPHICLASS TRVStyleTemplateIdProperty; class PASCALIMPLEMENTATION TRVStyleTemplateIdProperty : public Designeditors::TIntegerProperty { typedef Designeditors::TIntegerProperty inherited; private: Rvstyle::TRVStyleTemplateCollection* __fastcall GetCollection(void); public: virtual Designintf::TPropertyAttributes __fastcall GetAttributes(void); virtual AnsiString __fastcall GetValue(); virtual void __fastcall GetValues(Classes::TGetStrProc Proc); virtual void __fastcall SetValue(const AnsiString Value)/* overload */; public: #pragma option push -w-inl /* TPropertyEditor.Create */ inline __fastcall virtual TRVStyleTemplateIdProperty(const Designintf::_di_IDesigner ADesigner, int APropCount) : Designeditors::TIntegerProperty(ADesigner, APropCount) { } #pragma option pop #pragma option push -w-inl /* TPropertyEditor.Destroy */ inline __fastcall virtual ~TRVStyleTemplateIdProperty(void) { } #pragma option pop /* Hoisted overloads: */ public: inline void __fastcall SetValue(const WideString Value){ TPropertyEditor::SetValue(Value); } }; class DELPHICLASS TRVStyleTemplateCollectionProperty; class PASCALIMPLEMENTATION TRVStyleTemplateCollectionProperty : public Colnedit::TCollectionProperty { typedef Colnedit::TCollectionProperty inherited; public: virtual Designintf::TPropertyAttributes __fastcall GetAttributes(void); public: #pragma option push -w-inl /* TPropertyEditor.Create */ inline __fastcall virtual TRVStyleTemplateCollectionProperty(const Designintf::_di_IDesigner ADesigner, int APropCount) : Colnedit::TCollectionProperty(ADesigner, APropCount) { } #pragma option pop #pragma option push -w-inl /* TPropertyEditor.Destroy */ inline __fastcall virtual ~TRVStyleTemplateCollectionProperty(void) { } #pragma option pop }; class DELPHICLASS TRVStyleTemplateNameProperty; class PASCALIMPLEMENTATION TRVStyleTemplateNameProperty : public Designeditors::TStringProperty { typedef Designeditors::TStringProperty inherited; public: virtual Designintf::TPropertyAttributes __fastcall GetAttributes(void); virtual void __fastcall GetValues(Classes::TGetStrProc Proc); public: #pragma option push -w-inl /* TPropertyEditor.Create */ inline __fastcall virtual TRVStyleTemplateNameProperty(const Designintf::_di_IDesigner ADesigner, int APropCount) : Designeditors::TStringProperty(ADesigner, APropCount) { } #pragma option pop #pragma option push -w-inl /* TPropertyEditor.Destroy */ inline __fastcall virtual ~TRVStyleTemplateNameProperty(void) { } #pragma option pop }; //-- var, const, procedure --------------------------------------------------- extern PACKAGE void __fastcall Register(void); } /* namespace Rvsedit */ using namespace Rvsedit; #pragma pack(pop) #pragma option pop #pragma delphiheader end. //-- end unit ---------------------------------------------------------------- #endif // Rvsedit