windowsonly.inc 3.0 KB

1234567891011121314151617181920212223242526272829303132333435363738394041424344454647484950515253
  1. {$IFNDEF WINDOWSONLY_INC}
  2. {$DEFINE WINDOWSONLY_INC}
  3. {**************************************************************************************************}
  4. { }
  5. { The contents of this file are subject to the Mozilla Public License Version 1.1 (the "License");}
  6. { you may not use this file except in compliance with the License. You may obtain a copy of the }
  7. { License at http://www.mozilla.org/MPL/ }
  8. { }
  9. { Software distributed under the License is distributed on an "AS IS" basis, WITHOUT WARRANTY OF }
  10. { ANY KIND, either express or implied. See the License for the specific language governing rights }
  11. { and limitations under the License. }
  12. { }
  13. { The Original Code is: windowsonly.inc, released on 2002-07-04. }
  14. { }
  15. { You may retrieve the latest version of this file at the JCL home page, }
  16. { located at http://jcl.sourceforge.net/ }
  17. { }
  18. {**************************************************************************************************}
  19. { }
  20. { Last modified: $Date:: $ }
  21. { Revision: $Rev:: $ }
  22. { Author: $Author:: $ }
  23. { }
  24. {**************************************************************************************************}
  25. {$IFNDEF JEDI_INC}
  26. ALERT_jedi_inc_missing
  27. // This inc file depends on jedi.inc which has to
  28. // be included first (usually indirectly through
  29. // the inclusion of jcl.inc).
  30. {$ENDIF ~JEDI_INC}
  31. // Suppress platform warnings which are irrelevant
  32. // because the including unit can only be compiled
  33. // for the Windows platform anyway.
  34. {$IFDEF SUPPORTS_PLATFORM_WARNINGS}
  35. {$WARN UNIT_PLATFORM OFF}
  36. {$WARN SYMBOL_PLATFORM OFF}
  37. {$ENDIF SUPPORTS_PLATFORM_WARNINGS}
  38. // Cause a compilation error for any platform except Windows.
  39. {$IFNDEF MSWINDOWS}
  40. {$IFDEF SUPPORTS_COMPILETIME_MESSAGES}
  41. {$MESSAGE FATAL 'This unit is only supported on Windows!'}
  42. {$ELSE}
  43. 'This unit is only supported on Windows!'
  44. {$ENDIF SUPPORTS_COMPILETIME_MESSAGES}
  45. {$ENDIF ~MSWINDOWS}
  46. {$ENDIF ~WINDOWSONLY_INC}