home *** CD-ROM | disk | FTP | other *** search
/ Chip 2000 January / Chip_2000-01_cd.bin / zkuste / Delphi / kolekce / d345 / cdbu.exe / CoolDBUtilities / CBuilder4 / CoolDBUtilsReg.hpp < prev    next >
Encoding:
C/C++ Source or Header  |  1999-09-03  |  2.9 KB  |  91 lines

  1. // Borland C++ Builder
  2. // Copyright (c) 1995, 1999 by Borland International
  3. // All rights reserved
  4.  
  5. // (DO NOT EDIT: machine generated header) 'CoolDBUtilsReg.pas' rev: 4.00
  6.  
  7. #ifndef CoolDBUtilsRegHPP
  8. #define CoolDBUtilsRegHPP
  9.  
  10. #pragma delphiheader begin
  11. #pragma option push -w-
  12. #include <DsgnIntf.hpp>    // Pascal unit
  13. #include <Forms.hpp>    // Pascal unit
  14. #include <DBTables.hpp>    // Pascal unit
  15. #include <Db.hpp>    // Pascal unit
  16. #include <Classes.hpp>    // Pascal unit
  17. #include <SysUtils.hpp>    // Pascal unit
  18. #include <Messages.hpp>    // Pascal unit
  19. #include <Windows.hpp>    // Pascal unit
  20. #include <SysInit.hpp>    // Pascal unit
  21. #include <System.hpp>    // Pascal unit
  22.  
  23. //-- user supplied -----------------------------------------------------------
  24.  
  25. namespace Cooldbutilsreg
  26. {
  27. //-- type declarations -------------------------------------------------------
  28. class DELPHICLASS TDatabaseNameProperty;
  29. #pragma pack(push, 4)
  30. class PASCALIMPLEMENTATION TDatabaseNameProperty : public Dsgnintf::TStringProperty 
  31. {
  32.     typedef Dsgnintf::TStringProperty inherited;
  33.     
  34. public:
  35.     virtual Dsgnintf::TPropertyAttributes __fastcall GetAttributes(void);
  36.     virtual AnsiString __fastcall GetValue(void);
  37.     virtual void __fastcall GetValues(Classes::TGetStrProc Proc);
  38.     virtual void __fastcall SetValue(const AnsiString Value);
  39. protected:
  40.     #pragma option push -w-inl
  41.     /* TPropertyEditor.Create */ inline __fastcall TDatabaseNameProperty(const Dsgnintf::_di_IFormDesigner 
  42.         ADesigner, int APropCount) : Dsgnintf::TStringProperty(ADesigner, APropCount) { }
  43.     #pragma option pop
  44.     
  45. public:
  46.     #pragma option push -w-inl
  47.     /* TPropertyEditor.Destroy */ inline __fastcall virtual ~TDatabaseNameProperty(void) { }
  48.     #pragma option pop
  49.     
  50. };
  51.  
  52. #pragma pack(pop)
  53.  
  54. class DELPHICLASS TDBCUAboutProperty;
  55. #pragma pack(push, 4)
  56. class PASCALIMPLEMENTATION TDBCUAboutProperty : public Dsgnintf::TClassProperty 
  57. {
  58.     typedef Dsgnintf::TClassProperty inherited;
  59.     
  60. public:
  61.     virtual void __fastcall Edit(void);
  62.     virtual Dsgnintf::TPropertyAttributes __fastcall GetAttributes(void);
  63.     virtual AnsiString __fastcall GetValue(void);
  64. protected:
  65.     #pragma option push -w-inl
  66.     /* TPropertyEditor.Create */ inline __fastcall TDBCUAboutProperty(const Dsgnintf::_di_IFormDesigner 
  67.         ADesigner, int APropCount) : Dsgnintf::TClassProperty(ADesigner, APropCount) { }
  68.     #pragma option pop
  69.     
  70. public:
  71.     #pragma option push -w-inl
  72.     /* TPropertyEditor.Destroy */ inline __fastcall virtual ~TDBCUAboutProperty(void) { }
  73.     #pragma option pop
  74.     
  75. };
  76.  
  77. #pragma pack(pop)
  78.  
  79. //-- var, const, procedure ---------------------------------------------------
  80. extern PACKAGE void __fastcall Register(void);
  81.  
  82. }    /* namespace Cooldbutilsreg */
  83. #if !defined(NO_IMPLICIT_NAMESPACE_USE)
  84. using namespace Cooldbutilsreg;
  85. #endif
  86. #pragma option pop    // -w-
  87.  
  88. #pragma delphiheader end.
  89. //-- end unit ----------------------------------------------------------------
  90. #endif    // CoolDBUtilsReg
  91.