1234567891011121314151617181920212223242526272829303132333435 |
- 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.
|