blob: 38973457900873652ebb87519c022bf5d5eb39b8 (
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
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
|
{
fpGUI IDE - Maximus
Copyright (C) 2012 - 2013 Graeme Geldenhuys
See the file COPYING.modifiedLGPL, included in this distribution,
for details about redistributing fpGUI.
This program is distributed in the hope that it will be useful,
but WITHOUT ANY WARRANTY; without even the implied warranty of
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
Description:
---
}
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
cMacroPrefix = '${';
cMacroSuffix = '}';
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.
|