ConditionalDefines.pas 449 B

1234567891011121314151617181920212223242526272829
  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. implementation
  22. end.