unit ConditionalDefines; interface type TModuleType = (mtAll, mtCompile); var {$IFDEF _mGuangDong} _IsGuangDong: Boolean = True; {$ELSE} _IsGuangDong: Boolean = False; {$ENDIF} {$IFDEF _mCompile} _ModuleType: TModuleType = mtCompile; {$ELSE} _ModuleType: TModuleType = mtAll; {$ENDIF} {$IFDEF _mEncrypt} _IsEncrypt: Boolean = True; {$ELSE} _IsEncrypt: Boolean = False; {$ENDIF} {$IFDEF _mDebugView} _IsDebugView: Boolean = True; {$ELSE} _IsDebugView: Boolean = False; {$ENDIF} implementation end.