home *** CD-ROM | disk | FTP | other *** search
/ Magazyn Internet 2000 May / MICD_2000_05.iso / CBuilder5 / INSTALL / DATA1.CAB / Program_Built_Files / Include / Vcl / drintf.hpp < prev    next >
C/C++ Source or Header  |  2000-02-01  |  4KB  |  116 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) 'DRIntf.pas' rev: 5.00
  6.  
  7. #ifndef DRIntfHPP
  8. #define DRIntfHPP
  9.  
  10. #pragma delphiheader begin
  11. #pragma option push -w-
  12. #pragma option push -Vx
  13. #include <DBTables.hpp>    // Pascal unit
  14. #include <Db.hpp>    // Pascal unit
  15. #include <Bde.hpp>    // Pascal unit
  16. #include <Dialogs.hpp>    // Pascal unit
  17. #include <Forms.hpp>    // Pascal unit
  18. #include <Controls.hpp>    // Pascal unit
  19. #include <Graphics.hpp>    // Pascal unit
  20. #include <Classes.hpp>    // Pascal unit
  21. #include <Messages.hpp>    // Pascal unit
  22. #include <Windows.hpp>    // Pascal unit
  23. #include <SysUtils.hpp>    // Pascal unit
  24. #include <SysInit.hpp>    // Pascal unit
  25. #include <System.hpp>    // Pascal unit
  26.  
  27. //-- user supplied -----------------------------------------------------------
  28.  
  29. namespace Drintf
  30. {
  31. //-- type declarations -------------------------------------------------------
  32. #pragma pack(push, 1)
  33. struct TID
  34. {
  35.     Byte Reserved[6];
  36. } ;
  37. #pragma pack(pop)
  38.  
  39. #pragma pack(push, 1)
  40. struct TDatabaseID
  41. {
  42.     Byte Reserved[6];
  43. } ;
  44. #pragma pack(pop)
  45.  
  46. #pragma pack(push, 1)
  47. struct TTableID
  48. {
  49.     Byte Reserved[6];
  50. } ;
  51. #pragma pack(pop)
  52.  
  53. #pragma pack(push, 1)
  54. struct TFieldID
  55. {
  56.     Byte Reserved[6];
  57. } ;
  58. #pragma pack(pop)
  59.  
  60. #pragma pack(push, 1)
  61. struct TAttrID
  62. {
  63.     Byte Reserved[6];
  64. } ;
  65. #pragma pack(pop)
  66.  
  67. //-- var, const, procedure ---------------------------------------------------
  68. extern PACKAGE TID NullID;
  69. extern PACKAGE TAttrID NullAttrID;
  70. extern PACKAGE TDatabaseID NullDatabaseID;
  71. extern PACKAGE TTableID NullTableID;
  72. extern PACKAGE TFieldID NullFieldID;
  73. extern PACKAGE AnsiString __fastcall QualifyTableName(Dbtables::TDatabase* Database, const AnsiString 
  74.     TableName);
  75. extern PACKAGE AnsiString __fastcall QualifyTableNameByName(const AnsiString SessionName, const AnsiString 
  76.     DatabaseName, const AnsiString TableName);
  77. extern PACKAGE Bde::hDBIDR __fastcall CurrentDictionary(void);
  78. extern PACKAGE bool __fastcall IsNullID(const void *ID);
  79. extern PACKAGE void __fastcall DictionaryDeactivate(void);
  80. extern PACKAGE bool __fastcall DictionaryActive(void);
  81. extern PACKAGE TDatabaseID __fastcall FindDatabaseID(const AnsiString Database);
  82. extern PACKAGE TTableID __fastcall FindTableID(const TDatabaseID &Database, const AnsiString Table);
  83.     
  84. extern PACKAGE TFieldID __fastcall FindFieldID(const TTableID &Table, const AnsiString Field);
  85. extern PACKAGE TAttrID __fastcall GetAttrID(const TFieldID &FieldID);
  86. extern PACKAGE TAttrID __fastcall FindAttrID(const AnsiString AttrName);
  87. extern PACKAGE AnsiString __fastcall GetAttrName(const TAttrID &AttrID);
  88. extern PACKAGE void __fastcall GetAttrNames(Classes::TGetStrProc Proc);
  89. extern PACKAGE void __fastcall AssociateAttr(const TAttrID &AttrID, const TFieldID &FieldID);
  90. extern PACKAGE void __fastcall UnassociateAttr(const TFieldID &FieldID);
  91. extern PACKAGE TAttrID __fastcall NewAttr(Db::TField* Field, const TFieldID &FieldID, const AnsiString 
  92.     AttrName, const TAttrID &Parent);
  93. extern PACKAGE void __fastcall UpdateAttr(Db::TField* Field, const TFieldID &FieldID, const TAttrID 
  94.     &AttrID);
  95. extern PACKAGE void __fastcall UpdateField(Db::TField* Field, const TFieldID &FieldID, const TAttrID 
  96.     &AttrID);
  97. extern PACKAGE Db::TField* __fastcall CreateField(Classes::TComponent* Owner, Db::TDataSet* Dataset, 
  98.     const AnsiString FullName, const AnsiString Origin, const TFieldID &FieldID, const TAttrID &AttrID)
  99.     ;
  100. extern PACKAGE AnsiString __fastcall GetControlClass(const TAttrID &AttrID);
  101. extern PACKAGE bool __fastcall HasConstraints(Dbtables::TDBDataSet* Dataset);
  102. extern PACKAGE void __fastcall UpdateConstraints(Dbtables::TDBDataSet* Dataset, Db::TCheckConstraints* 
  103.     Constraints);
  104. extern PACKAGE void __fastcall UpdateDataset(Dbtables::TDBDataSet* Dataset);
  105.  
  106. }    /* namespace Drintf */
  107. #if !defined(NO_IMPLICIT_NAMESPACE_USE)
  108. using namespace Drintf;
  109. #endif
  110. #pragma option pop    // -w-
  111. #pragma option pop    // -Vx
  112.  
  113. #pragma delphiheader end.
  114. //-- end unit ----------------------------------------------------------------
  115. #endif    // DRIntf
  116.