| 1 |
unit Data; |
| 2 |
interface |
| 3 |
uses Classes, Graphics, TypeDefs; |
| 4 |
|
| 5 |
const |
| 6 |
Version: String = 'v0.34a'; |
| 7 |
DBVersion: String = '0.3'; |
| 8 |
CrLf: String[2] = #13 + #10; |
| 9 |
|
| 10 |
var |
| 11 |
AppSettings: TAppSettings; |
| 12 |
AppSettingsFile: file of TAppSettings; |
| 13 |
|
| 14 |
{ |
| 15 |
const |
| 16 |
header_ident1_pc:Array[0..$13] of Byte= |
| 17 |
($1F,$27,$DC,$33,$DF,$BC,$03,$00,$31,$33,$52,$56,$40,$00,$14,$00,$10,$00,$08,$00); |
| 18 |
header_ident1_mac:Array[0..$13] of Byte= |
| 19 |
($61,$30,$C1,$23,$DF,$BC,$03,$00,$31,$33,$52,$56,$40,$00,$14,$00,$10,$00,$08,$00); |
| 20 |
header_ident2:Array[0..$F] of Byte= |
| 21 |
($99,$CF,$40,$00,$90,$4F,$63,$00,$F4,$55,$5F,$00,$90,$4F,$63,$00); |
| 22 |
} |
| 23 |
|
| 24 |
implementation |
| 25 |
|
| 26 |
end. |
