blob: e676f9027107d29953ba823fe741007593def8c3 (
plain) (
blame)
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
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
197
198
199
200
201
202
203
204
205
206
207
208
|
object ModuleFonts: TModuleFonts
Left = 523
Top = 262
Width = 300
Height = 400
Caption = 'Select Module Fonts'
Color = clBtnFace
Constraints.MinHeight = 400
Constraints.MinWidth = 300
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
KeyPreview = True
Menu = MainMenu1
OldCreateOrder = False
Position = poScreenCenter
Scaled = False
OnShow = FormShow
PixelsPerInch = 96
TextHeight = 13
object Panel1: TPanel
Left = 0
Top = 313
Width = 292
Height = 41
Align = alBottom
BevelOuter = bvNone
TabOrder = 0
object btnReset: TBitBtn
Left = 82
Top = 8
Width = 102
Height = 29
Anchors = [akRight, akBottom]
Caption = '&Reset All'
TabOrder = 0
OnClick = btnResetClick
Glyph.Data = {
DE010000424DDE01000000000000760000002800000024000000120000000100
0400000000006801000000000000000000001000000000000000000000000000
80000080000000808000800000008000800080800000C0C0C000808080000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333444444
33333333333F8888883F33330000324334222222443333388F3833333388F333
000032244222222222433338F8833FFFFF338F3300003222222AAAAA22243338
F333F88888F338F30000322222A33333A2224338F33F8333338F338F00003222
223333333A224338F33833333338F38F00003222222333333A444338FFFF8F33
3338888300003AAAAAAA33333333333888888833333333330000333333333333
333333333333333333FFFFFF000033333333333344444433FFFF333333888888
00003A444333333A22222438888F333338F3333800003A2243333333A2222438
F38F333333833338000033A224333334422224338338FFFFF8833338000033A2
22444442222224338F3388888333FF380000333A2222222222AA243338FF3333
33FF88F800003333AA222222AA33A3333388FFFFFF8833830000333333AAAAAA
3333333333338888883333330000333333333333333333333333333333333333
0000}
NumGlyphs = 2
end
object btnOK: TBitBtn
Left = 194
Top = 8
Width = 94
Height = 29
Anchors = [akRight, akBottom]
TabOrder = 1
Kind = bkOK
end
end
object Panel2: TPanel
Left = 0
Top = 0
Width = 292
Height = 272
Align = alClient
BevelOuter = bvNone
Caption = 'Panel2'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 1
object Panel4: TPanel
Left = 0
Top = 0
Width = 292
Height = 32
Align = alTop
BevelOuter = bvNone
TabOrder = 0
object Label1: TLabel
Left = 3
Top = 8
Width = 82
Height = 13
Caption = 'Installed Modules'
end
end
object installTree: TTreeView
Left = 0
Top = 32
Width = 292
Height = 240
Align = alClient
HideSelection = False
Indent = 19
ReadOnly = True
TabOrder = 1
OnChange = installTreeChange
end
end
object Panel3: TPanel
Left = 0
Top = 272
Width = 292
Height = 41
Align = alBottom
BevelOuter = bvNone
TabOrder = 2
object Label2: TLabel
Left = 7
Top = 8
Width = 52
Height = 13
Anchors = [akLeft, akBottom]
Caption = 'Font Name'
end
object Label3: TLabel
Left = 192
Top = 8
Width = 44
Height = 13
Anchors = [akRight, akBottom]
Caption = 'Font Size'
end
object pnlFontComboBox: TPanel
Left = 80
Top = 2
Width = 103
Height = 25
Anchors = [akLeft, akTop, akRight]
BevelOuter = bvNone
Caption = 'Font ComboBox'
TabOrder = 0
end
object cmbSizeSel: TComboBox
Left = 242
Top = 4
Width = 44
Height = 21
Anchors = [akRight, akBottom]
ItemHeight = 13
TabOrder = 1
Text = '12'
OnChange = cmbSizeSelChange
Items.Strings = (
'8'
'9'
'10'
'11'
'12'
'13'
'14'
'15'
'16'
'17'
'18'
'19'
'20'
'21'
'22'
'23'
'24'
'25'
'26'
'27'
'28'
'29'
'30'
'32'
'34'
'36'
'38'
'40'
'50'
'60')
end
end
object MainMenu1: TMainMenu
Left = 200
object menuView: TMenuItem
Caption = '&View'
Checked = True
object viewAll: TMenuItem
Caption = 'Show &All Installed'
GroupIndex = 1
OnClick = viewAllClick
end
object viewUnicode: TMenuItem
Caption = 'Show &Unicode Only'
Checked = True
GroupIndex = 1
OnClick = viewUnicodeClick
end
end
end
end
|
