ConditionalDefines.pas 563 B

1234567891011121314151617181920212223242526272829303132333435
  1. unit ConditionalDefines;
  2. interface
  3. type
  4. TModuleType = (mtAll, mtCompile);
  5. var
  6. {$IFDEF _mGuangDong}
  7. _IsGuangDong: Boolean = True;
  8. {$ELSE}
  9. _IsGuangDong: Boolean = False;
  10. {$ENDIF}
  11. {$IFDEF _mCompile}
  12. _ModuleType: TModuleType = mtCompile;
  13. {$ELSE}
  14. _ModuleType: TModuleType = mtAll;
  15. {$ENDIF}
  16. {$IFDEF _mEncrypt}
  17. _IsEncrypt: Boolean = True;
  18. {$ELSE}
  19. _IsEncrypt: Boolean = False;
  20. {$ENDIF}
  21. {$IFDEF _mDebugView}
  22. _IsDebugView: Boolean = True;
  23. {$ELSE}
  24. _IsDebugView: Boolean = False;
  25. {$ENDIF}
  26. implementation
  27. end.