blob: 3570bcbf4690cd3209901a2f36dda4cfe3820899 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
|
unit ideconst;
{$mode objfpc}{$H+}
interface
uses
Classes, SysUtils;
const
cProjectExt = '.project';
// Project Options
cProjectOptions = 'ProjectOptions';
cOpenedUnits = 'OpenedUnits';
cUnits = 'Units';
// INI Environment
cEnvironment = 'Environment';
cEditor = 'Editor';
cShortcuts = 'Shortcuts';
cINIMakeOption = 'MakeOption';
cINIMakeOptionGrid = 'MakeOptionEnabled';
cINIUnitDir = 'UnitDir';
cINIUnitDirGrid = 'UnitDirEnabled';
// Predefined Macros
cMacro_FPCSrcDir = '${FPCSRCDIR}';
cMacro_FPGuiDir = '${FPGUIDIR}';
cMacro_FPGuiLibDir = '${FPGUILIBDIR}';
cMacro_SyntaxDefDir = '${SYNTAXDEFDIR}';
cMacro_TemplateDir = '${TEMPLATEDIR}';
cMacro_Compiler = '${COMPILER}';
cMacro_Debugger = '${DEBUGGER}';
cMacro_ExeExt = '${EXEEXT}';
cMacro_Target = '${TARGET}';
cMacro_ProjectDir = '${PROJDIR}';
OSTarget: String = {$I %FPCTARGETOS%};
CPUTarget: String = {$I %FPCTARGETCPU%};
FPCVersion: String = {$I %FPCVERSION%};
FPCDate: String = {$I %FPCDATE%};
// Unicode character used as grid check mark
cMultiplicationX = #$E2#$9C#$95;
cNormCheck = #$E2#$9C#$93;
cHeavyCheck = #$E2#$9C#$94;
cHeavyX = #$E2#$9C#$96;
cMedCircle = #$E2#$9A#$AB;
cCheck = cHeavyCheck;
{
U+2715 MULTIPLICATION X
UTF-8: 0xE2 0x9C 0x95
UTF-16: 0x2715
U+2713 CHECK MARK
UTF-8: 0xE2 0x9C 0x93
UTF-16: 0x2713
U+2714 HEAVY CHECK MARK
UTF-8: 0xE2 0x9C 0x94
UTF-16: 0x2714
U+2716 HEAVY MULTIPLICATION X
UTF-8: 0xE2 0x9C 0x96
UTF-16: 0x2716
U+26AB MEDIUM BLACK CIRCLE
UTF-8: 0xE2 0x9A 0xAB
UTF-16: 0x26AB
}
implementation
initialization
OSTarget := Lowercase(OSTarget);
end.
|
