home *** CD-ROM | disk | FTP | other *** search
/ Chip 2003 February / Chip_2003-02_cd1.bin / zkuste / delphi / kompon / d34567 / KADAO77.ZIP / KADaoCommonDirectives.pas < prev    next >
Pascal/Delphi Source File  |  2002-09-04  |  4KB  |  176 lines
  1. //******************************************************************************
  2. // COMMON PREPROCESSOR DIRECTIVES
  3. //******************************************************************************
  4. {$DEFINE DYNADAO}        //This is the preffered way to use DAO - disable if
  5.                          //one of the bottom options are enabled
  6. {DEFINE DAO35}           //Disable DYNADAO and DAO36 to USE
  7. {DEFINE DAO36}           //Disable DYNADAO and DAO35 to USE
  8. //******************************************************************************
  9. // Protection for absent-minded people
  10. //******************************************************************************
  11. {$IFDEF DYNADAO}
  12.   {$IFDEF DAO36}
  13.    YOU CANNOT DEFINE BOTH DYNADAO AND DAO36
  14.   {$ENDIF}
  15.   {$IFDEF DAO35}
  16.    YOU CANNOT DEFINE BOTH DYNADAO AND DAO35
  17.   {$ENDIF}
  18. {$ELSE}
  19.   {$IFDEF DAO36}
  20.      {$IFDEF DAO35}
  21.         YOU CANNOT DEFINE BOTH DAO35 AND DAO36
  22.      {$ENDIF}
  23.   {$ENDIF}
  24. {$ENDIF}
  25. {$IFNDEF DYNADAO}
  26.   {$IFNDEF DAO35}
  27.    {$IFNDEF DAO36}
  28.       YOU MUST DEFINE DAO35 OR DAO36 OR DYNADAO
  29.      {$ENDIF}
  30.   {$ENDIF}
  31. {$ENDIF}
  32. //******************************************************************************
  33. {**************************************************** defines for C++Builder 1 }
  34. {$IFDEF VER93}
  35.   {$DEFINE D1UP}
  36.   {$DEFINE D2UP}
  37.   {$DEFINE CBUILDER}
  38.   {$DEFINE CBUILDER1}
  39.   {$DEFINE CBUILDER1UP}
  40. {$ENDIF}
  41.  
  42. {********************************************************  defines for Delphi 3 }
  43. {$IFDEF VER100}
  44.   {$DEFINE DELPHI}
  45.   {$DEFINE DELPHI3}
  46.   {$DEFINE D1UP}
  47.   {$DEFINE D2UP}
  48.   {$DEFINE D3UP}
  49. {$ENDIF}
  50.  
  51. {****************************************************  defines for C++Builder 3 }
  52. {$IFDEF VER110}
  53.   {$DEFINE D1UP}
  54.   {$DEFINE D2UP}
  55.   {$DEFINE D3UP}
  56.   {$DEFINE CBUILDER}
  57.   {$DEFINE CBUILDER3}
  58.   {$DEFINE CBUILDER1UP}
  59.   {$DEFINE CBUILDER3UP}
  60. {$ENDIF}
  61.  
  62. {********************************************************  defines for Delphi 4 }
  63. {$IFDEF VER120}
  64.   {$DEFINE DELPHI}
  65.   {$DEFINE DELPHI4}
  66.   {$DEFINE D1UP}
  67.   {$DEFINE D2UP}
  68.   {$DEFINE D3UP}
  69.   {$DEFINE D4UP}
  70. {$ENDIF}
  71.  
  72. {****************************************************  defines for C++Builder 4 }
  73. {$IFDEF VER125}
  74.   {$DEFINE D1UP}
  75.   {$DEFINE D2UP}
  76.   {$DEFINE D3UP}
  77.   {$DEFINE D4UP}
  78.   {$DEFINE CBUILDER}
  79.   {$DEFINE CBUILDER4}
  80.   {$DEFINE CBUILDER1UP}
  81.   {$DEFINE CBUILDER3UP}
  82.   {$DEFINE CBUILDER4UP}
  83. {$ENDIF}
  84.  
  85. {************************************* defines for Delphi 5 and/or C++Builder 5 }
  86. {$IFDEF VER130}
  87.   {$DEFINE D1UP}
  88.   {$DEFINE D2UP}
  89.   {$DEFINE D3UP}
  90.   {$DEFINE D4UP}
  91.   {$DEFINE D5UP}
  92.   {$IFNDEF BCB}
  93.     {$DEFINE DELPHI}
  94.     {$DEFINE DELPHI5}
  95.   {$ELSE}
  96.     {$DEFINE CBUILDER}
  97.     {$DEFINE CBUILDER5}
  98.     {$DEFINE CBUILDER1UP}
  99.     {$DEFINE CBUILDER3UP}
  100.     {$DEFINE CBUILDER4UP}
  101.     {$DEFINE CBUILDER5UP}
  102.   {$ENDIF}
  103. {$ENDIF}
  104.  
  105. {*********************************************************  defines for Delphi 6 }
  106. {$IFDEF VER140}
  107.   {$IFNDEF BCB}
  108.     {$DEFINE DELPHI}
  109.     {$DEFINE DELPHI6}
  110.   {$ELSE}
  111.     {$DEFINE CBUILDER}
  112.     {$DEFINE CBUILDER6}
  113.     {$DEFINE CBUILDER1UP}
  114.     {$DEFINE CBUILDER3UP}
  115.     {$DEFINE CBUILDER4UP}
  116.     {$DEFINE CBUILDER5UP}
  117.     {$DEFINE CBUILDER6UP}
  118.   {$ENDIF}
  119.   {$DEFINE D1UP}
  120.   {$DEFINE D2UP}
  121.   {$DEFINE D3UP}
  122.   {$DEFINE D4UP}
  123.   {$DEFINE D5UP}
  124.   {$DEFINE D6UP}
  125. {$ENDIF}
  126.  
  127. {*********************************************************  defines for Delphi 7 }
  128. {$IFDEF VER150}
  129.   {$IFNDEF BCB}
  130.     {$DEFINE DELPHI}
  131.     {$DEFINE DELPHI7}
  132.   {$ELSE}
  133.     {$DEFINE CBUILDER}
  134.     {$DEFINE CBUILDER7}
  135.     {$DEFINE CBUILDER1UP}
  136.     {$DEFINE CBUILDER3UP}
  137.     {$DEFINE CBUILDER4UP}
  138.     {$DEFINE CBUILDER5UP}
  139.     {$DEFINE CBUILDER6UP}
  140.     {$DEFINE CBUILDER7UP}
  141.   {$ENDIF}
  142.   {$DEFINE D1UP}
  143.   {$DEFINE D2UP}
  144.   {$DEFINE D3UP}
  145.   {$DEFINE D4UP}
  146.   {$DEFINE D5UP}
  147.   {$DEFINE D6UP}
  148.   {$DEFINE D7UP}
  149. {$ENDIF}
  150.  
  151. {$IFDEF D6UP}
  152.   {$WARN UNIT_PLATFORM OFF}
  153. {$ENDIF}
  154.  
  155. {$IFDEF D7UP}
  156.   {$WARN UNSAFE_CODE OFF}
  157.   {$WARN UNSAFE_TYPE OFF}
  158.   {$WARN UNSAFE_CAST OFF}
  159. {$ENDIF}
  160.  
  161. {$IFDEF WIN32}
  162.   {$DEFINE MSWINDOWS}
  163.   {$DEFINE 32BIT}
  164. {$ENDIF}
  165.  
  166. {$IFDEF DELPHI}
  167.   {$IFDEF D2UP}
  168.     {$DEFINE DELPHI_32BIT}
  169.   {$ENDIF}
  170. {$ENDIF}
  171.  
  172. {$IFDEF CBUILDER}
  173.   {$DEFINE CBUILDER_32BIT}
  174. {$ENDIF}
  175. //******************************************************************************
  176.