home *** CD-ROM | disk | FTP | other *** search
/ Chip 2001 October / Chip_2001-10_cd1.bin / zkuste / delphi / kompon / d123456 / MOON20.ZIP / AH_DEF.INC next >
Text File  |  2001-07-06  |  2KB  |  94 lines
  1. (*$define iso_latin1 *)
  2. (*@/// Compiler switches for version checks *)
  3. (*$ifdef ver140 *)
  4.   (*$define delphi_6 *)
  5. (*$else *)
  6.   (*$ifdef ver130 *)
  7.     (*$define delphi_5 *)
  8.   (*$else *)
  9.     (*$ifdef ver120 *)
  10.       (*$define delphi_4 *)
  11.     (*$else *)
  12.       (*$ifdef ver110 *)
  13.         (*$define builder_3 *)
  14.       (*$else *)
  15.         (*$ifdef ver100 *)
  16.           (*$define delphi_3 *)
  17.         (*$else *)
  18.           (*$ifdef ver95 *)
  19.             (*$define builder_1 *)
  20.           (*$endif *)
  21.           (*$ifdef ver90 *)
  22.             (*$define delphi_2 *)
  23.           (*$else *)
  24.             (*$ifdef ver80 *)
  25.               (*$define Delphi_1 *)
  26.             (*$else
  27.               (*$define bp_7 *)
  28.             (*$endif *)
  29.           (*$endif *)
  30.         (*$endif *)
  31.       (*$endif *)
  32.     (*$endif *)
  33.   (*$endif *)
  34. (*$endif *)
  35.  
  36. (*$ifdef delphi_1 *)
  37.   (*$define delphi_ge_1 *)
  38. (*$endif *)
  39. (*$ifdef delphi_2 *)
  40.   (*$define delphi_gt_1 *)
  41.   (*$define delphi_ge_1 *)
  42.   (*$define delphi_ge_2 *)
  43. (*$endif *)
  44. (*$ifdef delphi_3 *)
  45.   (*$define delphi_gt_2 *)
  46.   (*$define delphi_gt_1 *)
  47.   (*$define delphi_ge_1 *)
  48.   (*$define delphi_ge_2 *)
  49.   (*$define delphi_ge_3 *)
  50. (*$endif *)
  51. (*$ifdef delphi_4 *)
  52.   (*$define delphi_gt_3 *)
  53.   (*$define delphi_gt_2 *)
  54.   (*$define delphi_gt_1 *)
  55.   (*$define delphi_ge_1 *)
  56.   (*$define delphi_ge_2 *)
  57.   (*$define delphi_ge_3 *)
  58.   (*$define delphi_ge_4 *)
  59. (*$endif *)
  60. (*$ifdef delphi_5 *)
  61.   (*$define delphi_gt_3 *)
  62.   (*$define delphi_gt_2 *)
  63.   (*$define delphi_gt_1 *)
  64.   (*$define delphi_ge_1 *)
  65.   (*$define delphi_ge_2 *)
  66.   (*$define delphi_ge_3 *)
  67.   (*$define delphi_ge_4 *)
  68.   (*$define delphi_ge_5 *)
  69. (*$endif *)
  70.  
  71. (*$ifdef delphi_6 *)
  72.   (*$define delphi_gt_4 *)
  73.   (*$define delphi_gt_3 *)
  74.   (*$define delphi_gt_2 *)
  75.   (*$define delphi_gt_1 *)
  76.   (*$define delphi_ge_1 *)
  77.   (*$define delphi_ge_2 *)
  78.   (*$define delphi_ge_3 *)
  79.   (*$define delphi_ge_4 *)
  80.   (*$define delphi_ge_5 *)
  81.   (*$define delphi_ge_6 *)
  82. (*$endif *)
  83.  
  84. { shortstring defined  :  use string in VCL methods }
  85. {             undefined:  use ansistring instead    }
  86.  
  87. (*$ifdef delphi_1 *)
  88.   (*$define shortstring *)
  89. (*$else *)
  90.   { The Delphi2/3 VCL only compiles with huge strings }
  91.   (*$undef shortstring *)
  92. (*$endif *)
  93. (*@\\\*)
  94.