| Line | |
|---|
| 1 | {$EXTENDEDSYNTAX ON}
|
|---|
| 2 | {$VARSTRINGCHECKS ON}
|
|---|
| 3 | {$TYPEDADDRESS OFF}
|
|---|
| 4 | {$OPENSTRINGS ON}
|
|---|
| 5 | {$LONGSTRINGS ON}
|
|---|
| 6 |
|
|---|
| 7 | //{$IOCHECKS ON}
|
|---|
| 8 | //{$OVERFLOWCHECKS OFF}
|
|---|
| 9 |
|
|---|
| 10 | //{$TYPEINFO OFF}
|
|---|
| 11 | //{$DEBUGINFO ON}
|
|---|
| 12 | //{$LOCALSYMBOLS ON}
|
|---|
| 13 |
|
|---|
| 14 | //{$E-}
|
|---|
| 15 | //{$S-}
|
|---|
| 16 | {$Z1}
|
|---|
| 17 |
|
|---|
| 18 | {$IFDEF FPC} // freepascal
|
|---|
| 19 | {$MODE DELPHI}
|
|---|
| 20 | //{$SMARTLINK ON}
|
|---|
| 21 | {$ELSE} // delphi
|
|---|
| 22 | {$APPTYPE GUI}
|
|---|
| 23 | {$MINSTACKSIZE $00010000}
|
|---|
| 24 | {$MAXSTACKSIZE $01000000}
|
|---|
| 25 | {$IMAGEBASE $00400000}
|
|---|
| 26 |
|
|---|
| 27 | {$ALIGN ON}
|
|---|
| 28 | {$BOOLEVAL OFF}
|
|---|
| 29 | {$STACKFRAMES OFF}
|
|---|
| 30 |
|
|---|
| 31 | {$WRITEABLECONST ON}
|
|---|
| 32 | {$SAFEDIVIDE OFF}
|
|---|
| 33 | {$IMPORTEDDATA OFF}
|
|---|
| 34 | {$DEFINITIONINFO ON}
|
|---|
| 35 |
|
|---|
| 36 | {$IFOPT O-}
|
|---|
| 37 | {$DEFINE DEBUG}
|
|---|
| 38 | {$ENDIF}
|
|---|
| 39 |
|
|---|
| 40 | {$F-,K-,N+}
|
|---|
| 41 | {$ENDIF}
|
|---|
| 42 |
|
|---|
| 43 | {$IFDEF DEBUG}
|
|---|
| 44 | {$ASSERTIONS ON}
|
|---|
| 45 | {$RANGECHECKS ON}
|
|---|
| 46 | {$ELSE}
|
|---|
| 47 | {$ASSERTIONS OFF}
|
|---|
| 48 | {$RANGECHECKS OFF}
|
|---|
| 49 | {$ENDIF}
|
|---|
| 50 |
|
|---|
Note:
See
TracBrowser
for help on using the repository browser.