You can not select more than 25 topics Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146
  1. {$IFDEF VER90}
  2. {$DEFINE _D2}
  3. {$DEFINE _D2orD3}
  4. {$DEFINE _D2orD3orD4}
  5. {$ENDIF}
  6. {$IFDEF VER100}
  7. {$DEFINE _D3}
  8. {$DEFINE _D3orHigher}
  9. {$DEFINE _D2orD3}
  10. {$DEFINE _D2orD3orD4}
  11. {$DEFINE _D3orD4}
  12. {$ENDIF}
  13. {$IFDEF VER120}
  14. {$DEFINE _D3orHigher}
  15. {$DEFINE _D3orD4}
  16. {$DEFINE _D4}
  17. {$DEFINE _D4orHigher}
  18. {$DEFINE _D2orD3orD4}
  19. {$ENDIF}
  20. {$IFDEF VER130}
  21. {$DEFINE _D3orHigher}
  22. {$DEFINE _D4orHigher}
  23. {$DEFINE _D5}
  24. {$DEFINE _D5orHigher}
  25. {$ENDIF}
  26. {$IFDEF VER140}
  27. {$DEFINE _D3orHigher}
  28. {$DEFINE _D4orHigher}
  29. {$DEFINE _D5orHigher}
  30. {$DEFINE _D6}
  31. {$DEFINE _D6orHigher}
  32. {$ENDIF}
  33. {$IFDEF VER150}
  34. {$DEFINE _D3orHigher}
  35. {$DEFINE _D4orHigher}
  36. {$DEFINE _D5orHigher}
  37. {$DEFINE _D6orHigher}
  38. {$DEFINE _D7}
  39. {$DEFINE _D7orHigher}
  40. {$WARN UNIT_DEPRECATED OFF}
  41. {$WARN SYMBOL_PLATFORM OFF}
  42. {$WARN UNSAFE_TYPE OFF}
  43. {$WARN UNSAFE_CAST OFF}
  44. {$WARN UNSAFE_CODE OFF}
  45. {$ENDIF}
  46. {$IFDEF VER160} // Delphi 8
  47. Delphi version 8 not supported! (delphi 8 is .net only)
  48. {$ENDIF}
  49. {$IFDEF VER170} // Delphi 2005
  50. {$DEFINE _D3orHigher}
  51. {$DEFINE _D4orHigher}
  52. {$DEFINE _D5orHigher}
  53. {$DEFINE _D6orHigher}
  54. {$DEFINE _D7}
  55. {$DEFINE _D7orHigher}
  56. {$DEFINE _D2005orHigher}
  57. {$WARN UNIT_DEPRECATED OFF}
  58. {$WARN SYMBOL_PLATFORM OFF}
  59. {$WARN UNSAFE_TYPE OFF}
  60. {$WARN UNSAFE_CAST OFF}
  61. {$WARN UNSAFE_CODE OFF}
  62. {$ENDIF}
  63. {$IFDEF VER180} // Delphi 2006
  64. {$DEFINE _D3orHigher}
  65. {$DEFINE _D4orHigher}
  66. {$DEFINE _D5orHigher}
  67. {$DEFINE _D6orHigher}
  68. {$DEFINE _D7}
  69. {$DEFINE _D7orHigher}
  70. {$DEFINE _D2005orHigher}
  71. {$DEFINE _D2006orHigher}
  72. {$WARN UNIT_DEPRECATED OFF}
  73. {$WARN SYMBOL_PLATFORM OFF}
  74. {$WARN UNSAFE_TYPE OFF}
  75. {$WARN UNSAFE_CAST OFF}
  76. {$WARN UNSAFE_CODE OFF}
  77. {$ENDIF}
  78. {$IFDEF _D2005orHigher}
  79. // by Thaddy de Koning:
  80. {$IFDEF VER185} // Delphi 2007 ( and Highlander )
  81. {$DEFINE _D3orHigher}
  82. {$DEFINE _D4orHigher}
  83. {$DEFINE _D5orHigher}
  84. {$DEFINE _D6orHigher}
  85. {$DEFINE _D7}
  86. {$DEFINE _D7orHigher}
  87. {$DEFINE _D2005orHigher}
  88. {$DEFINE _D2006orHigher}
  89. {$DEFINE _D2007orHigher}
  90. {$WARN UNIT_DEPRECATED OFF}
  91. {$WARN SYMBOL_PLATFORM OFF}
  92. {$WARN UNSAFE_TYPE OFF}
  93. {$WARN UNSAFE_CAST OFF}
  94. {$WARN UNSAFE_CODE OFF}
  95. {$ENDIF}
  96. {$INLINE OFF}
  97. {$ENDIF}
  98. {$IFDEF FPC}
  99. {------------------------------------
  100. by Thaddy de Koning:
  101. FPC version 2.1.1 is very compatible with Delphi and kol now.
  102. You can simply use the $(DELPHI)\source\rtl\win\*.pas files from Delphi 4/5 instead of the prepared files that were needed for
  103. FPC1.X
  104. That is all to have full compatibility.
  105. ------------------------------------}
  106. {$DEFINE PAS_VERSION}
  107. {$IFDEF VER2}
  108. {$DEFINE _D3orHigher}
  109. {$DEFINE _D4orHigher}
  110. {$DEFINE _D5orHigher}
  111. {$DEFINE _D6orHigher}
  112. {$DEFINE _D7}
  113. {$DEFINE _D7orHigher}
  114. {$ENDIF VER2}
  115. {$IFDEF WINCE}
  116. {$DEFINE USE_PROP}
  117. {$DEFINE UNICODE_CTRLS}
  118. {$DEFINE NOT_USE_RICHEDIT}
  119. {$ENDIF WINCE}
  120. {$ELSE FPC}
  121. {$DEFINE cpu86}
  122. {$ENDIF FPC}
  123. {$IFNDEF _NOT_KOLCtrlWrapper_}
  124. {$DEFINE _KOLCtrlWrapper_}
  125. {$ENDIF}
  126. {$IFNDEF _NOT_KOLCtrlWrapper_}
  127. {$DEFINE _KOLCtrlWrapper_}
  128. {$ENDIF}