ArenaZ

1
object PlotColorsForm: TPlotColorsForm
2
  Left = 619
3
  Height = 354
4
  Top = 246
5
  Width = 268
6
  BorderIcons = [biSystemMenu]
7
  BorderStyle = bsDialog
8
  Caption = 'Plot Colours'
9
  ClientHeight = 354
10
  ClientWidth = 268
11
  Color = clBtnFace
12
  Font.Color = clWindowText
13
  Font.Height = -11
14
  Font.Name = 'Tahoma'
15
  FormStyle = fsStayOnTop
16
  KeyPreview = True
17
  OnCloseQuery = FormCloseQuery
18
  OnKeyDown = FormKeyDown
19
  OnShow = FormShow
20
  LCLVersion = '1.6.4.0'
21
  object Label9: TLabel
22
    Left = 14
23
    Height = 13
24
    Top = 281
25
    Width = 62
26
    Caption = 'Blend factor:'
27
    ParentColor = False
28
  end
29
  object Label10: TLabel
30
    Left = 140
31
    Height = 13
32
    Top = 281
33
    Width = 62
34
    Caption = 'Move factor:'
35
    ParentColor = False
36
  end
37
  object GroupBox1: TGroupBox
38
    Left = 0
39
    Height = 120
40
    Top = 0
41
    Width = 268
42
    Align = alTop
43
    Caption = '  Upper Plot Color  '
44
    ClientHeight = 99
45
    ClientWidth = 264
46
    Font.CharSet = ANSI_CHARSET
47
    Font.Color = clWindowText
48
    Font.Height = -13
49
    Font.Name = 'Tahoma'
50
    ParentFont = False
51
    TabOrder = 0
52
    object Label1: TLabel
53
      Left = 17
54
      Height = 13
55
      Top = 4
56
      Width = 32
57
      Alignment = taRightJustify
58
      Caption = 'Red :'
59
      Font.Color = clRed
60
      Font.Height = -11
61
      Font.Name = 'MS Sans Serif'
62
      Font.Style = [fsBold]
63
      ParentColor = False
64
      ParentFont = False
65
    end
66
    object Label2: TLabel
67
      Left = 9
68
      Height = 13
69
      Top = 26
70
      Width = 40
71
      Alignment = taRightJustify
72
      Caption = 'Green :'
73
      Font.CharSet = ANSI_CHARSET
74
      Font.Color = clGreen
75
      Font.Height = -11
76
      Font.Name = 'Tahoma'
77
      Font.Style = [fsBold]
78
      ParentColor = False
79
      ParentFont = False
80
    end
81
    object Label3: TLabel
82
      Left = 19
83
      Height = 13
84
      Top = 48
85
      Width = 30
86
      Alignment = taRightJustify
87
      Caption = 'Blue :'
88
      Font.CharSet = ANSI_CHARSET
89
      Font.Color = clBlue
90
      Font.Height = -11
91
      Font.Name = 'Tahoma'
92
      Font.Style = [fsBold]
93
      ParentColor = False
94
      ParentFont = False
95
    end
96
    object Label4: TLabel
97
      Left = 8
98
      Height = 16
99
      Top = 70
100
      Width = 41
101
      Alignment = taRightJustify
102
      Caption = 'Alpha :'
103
      ParentColor = False
104
    end
105
    object UpperRed: TTrackBar
106
      Cursor = crHandPoint
107
      Left = 48
108
      Height = 30
109
      Top = 0
110
      Width = 203
111
      Max = 255
112
      OnChange = UpperRedChange
113
      PageSize = 8
114
      Position = 128
115
      TickMarks = tmTopLeft
116
      TickStyle = tsNone
117
      TabOrder = 0
118
    end
119
    object UpperGreen: TTrackBar
120
      Cursor = crHandPoint
121
      Left = 48
122
      Height = 30
123
      Top = 23
124
      Width = 203
125
      Max = 255
126
      OnChange = UpperGreenChange
127
      PageSize = 8
128
      Position = 128
129
      TickMarks = tmTopLeft
130
      TickStyle = tsNone
131
      TabOrder = 1
132
    end
133
    object UpperBlue: TTrackBar
134
      Cursor = crHandPoint
135
      Left = 48
136
      Height = 30
137
      Top = 47
138
      Width = 203
139
      Max = 255
140
      OnChange = UpperBlueChange
141
      PageSize = 8
142
      Position = 128
143
      TickMarks = tmTopLeft
144
      TickStyle = tsNone
145
      TabOrder = 2
146
    end
147
    object UpperAlpha: TTrackBar
148
      Cursor = crHandPoint
149
      Left = 48
150
      Height = 30
151
      Top = 69
152
      Width = 203
153
      Max = 1000
154
      OnChange = UpperAlphaChange
155
      PageSize = 8
156
      Position = 1000
157
      TickMarks = tmTopLeft
158
      TickStyle = tsNone
159
      TabOrder = 3
160
    end
161
  end
162
  object GroupBox2: TGroupBox
163
    Left = 0
164
    Height = 120
165
    Top = 120
166
    Width = 268
167
    Align = alTop
168
    Caption = '  Lower Plot Color  '
169
    ClientHeight = 99
170
    ClientWidth = 264
171
    Font.CharSet = ANSI_CHARSET
172
    Font.Color = clWindowText
173
    Font.Height = -13
174
    Font.Name = 'Tahoma'
175
    ParentFont = False
176
    TabOrder = 1
177
    object Label5: TLabel
178
      Left = 14
179
      Height = 13
180
      Top = 12
181
      Width = 32
182
      Alignment = taRightJustify
183
      Caption = 'Red :'
184
      Font.Color = clRed
185
      Font.Height = -11
186
      Font.Name = 'MS Sans Serif'
187
      Font.Style = [fsBold]
188
      ParentColor = False
189
      ParentFont = False
190
    end
191
    object Label6: TLabel
192
      Left = 6
193
      Height = 13
194
      Top = 34
195
      Width = 40
196
      Alignment = taRightJustify
197
      Caption = 'Green :'
198
      Font.CharSet = ANSI_CHARSET
199
      Font.Color = clGreen
200
      Font.Height = -11
201
      Font.Name = 'Tahoma'
202
      Font.Style = [fsBold]
203
      ParentColor = False
204
      ParentFont = False
205
    end
206
    object Label7: TLabel
207
      Left = 16
208
      Height = 13
209
      Top = 56
210
      Width = 30
211
      Alignment = taRightJustify
212
      Caption = 'Blue :'
213
      Font.CharSet = ANSI_CHARSET
214
      Font.Color = clBlue
215
      Font.Height = -11
216
      Font.Name = 'Tahoma'
217
      Font.Style = [fsBold]
218
      ParentColor = False
219
      ParentFont = False
220
    end
221
    object Label8: TLabel
222
      Left = 5
223
      Height = 16
224
      Top = 78
225
      Width = 41
226
      Alignment = taRightJustify
227
      Caption = 'Alpha :'
228
      ParentColor = False
229
    end
230
    object LowerRed: TTrackBar
231
      Cursor = crHandPoint
232
      Left = 45
233
      Height = 30
234
      Top = 8
235
      Width = 203
236
      Max = 255
237
      OnChange = LowerRedChange
238
      PageSize = 8
239
      Position = 128
240
      TickMarks = tmTopLeft
241
      TickStyle = tsNone
242
      TabOrder = 0
243
    end
244
    object LowerGreen: TTrackBar
245
      Cursor = crHandPoint
246
      Left = 45
247
      Height = 30
248
      Top = 31
249
      Width = 203
250
      Max = 255
251
      OnChange = LowerGreenChange
252
      PageSize = 8
253
      Position = 128
254
      TickMarks = tmTopLeft
255
      TickStyle = tsNone
256
      TabOrder = 1
257
    end
258
    object LowerBlue: TTrackBar
259
      Cursor = crHandPoint
260
      Left = 45
261
      Height = 30
262
      Top = 55
263
      Width = 203
264
      Max = 255
265
      OnChange = LowerBlueChange
266
      PageSize = 8
267
      Position = 128
268
      TickMarks = tmTopLeft
269
      TickStyle = tsNone
270
      TabOrder = 2
271
    end
272
    object LowerAlpha: TTrackBar
273
      Cursor = crHandPoint
274
      Left = 45
275
      Height = 30
276
      Top = 77
277
      Width = 203
278
      Max = 1000
279
      OnChange = LowerAlphaChange
280
      PageSize = 8
281
      Position = 1000
282
      TickMarks = tmTopLeft
283
      TickStyle = tsNone
284
      TabOrder = 3
285
    end
286
  end
287
  object UpperLowerLock: TCheckBox
288
    Left = 30
289
    Height = 19
290
    Top = 254
291
    Width = 199
292
    Caption = 'Lock Lower Color to Upper Color'
293
    Font.CharSet = ANSI_CHARSET
294
    Font.Color = clMaroon
295
    Font.Height = -11
296
    Font.Name = 'Tahoma'
297
    Font.Style = [fsBold]
298
    OnClick = UpperLowerLockClick
299
    ParentFont = False
300
    TabOrder = 2
301
  end
302
  object EditBlend: TEdit
303
    Left = 80
304
    Height = 21
305
    Top = 278
306
    Width = 50
307
    OnKeyDown = EditBlendKeyDown
308
    OnKeyPress = EditBlendKeyPress
309
    OnKeyUp = EditBlendKeyUp
310
    TabOrder = 3
311
  end
312
  object EditMove: TEdit
313
    Left = 206
314
    Height = 21
315
    Top = 278
316
    Width = 50
317
    OnKeyDown = EditBlendKeyDown
318
    OnKeyPress = EditMoveKeyPress
319
    OnKeyUp = EditMoveKeyUp
320
    TabOrder = 4
321
  end
322
  object ApplyBtn: TBitBtn
323
    Cursor = crHandPoint
324
    Left = 8
325
    Height = 30
326
    Hint = 'Update any changes made'
327
    Top = 309
328
    Width = 120
329
    Caption = 'Apply'
330
    Default = True
331
    Glyph.Data = {
332
      36030000424D3603000000000000360000002800000010000000100000000100
333
      18000000000000030000120B0000120B00000000000000000000FF00FFFF00FF
334
      FF00FFFF00FFFF00FF936035936035936035936035936035936035FF00FFFF00
335
      FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF936035936035C6923DE3B445F7
336
      CE4AF7CF4BE3BB47C79940936035936035FF00FFFF00FFFF00FFFF00FFFF00FF
337
      936035B57A36DD9838F0AD38F3B538F5BC3BF6BE3CF5BB3BF3B63BE1A33DB87F
338
      38936035FF00FFFF00FFFF00FF936035B27233DC872FE4922DDCA457D7BC8FD7
339
      C097D8C096D8C199D5B582E69E38E09233B47634936035FF00FFFF00FF936035
340
      CD6F28DA7B25D2A374F9FDFEF9FDFEF9FDFEF9FDFEF9FDFEF9FDFEDF8E32E08A
341
      2FD0782C936035FF00FF936035B4652BD3661FD27A37F9FDFED5B69ADA8229DE
342
      892DDF8A2FD9852DDC8227DD832DDA7B2AD67226B5682C936035936035C05A21
343
      CE5A17D07D47F9FDFED18C57DA711CDB7B29DC7822F9FDFED2905BD76D1CD56E
344
      25D26722C25E24936035936035C64C18CA5015CB6A36F9FDFED8AD91CD5F16D0
345
      641BCF5E0FF9FDFEF9FDFECD7F4CCF5A15CD5B1EC7521B936035936035C24212
346
      C54613C5480FD5A38CF5FCFFF9FDFEF9FDFEF9FDFEF9FDFEF9FDFEF9FDFECB70
347
      43C84B12C34917936035936035C15F39C9552DC95124C54918D08464E4BDAEE7
348
      C8BCE6C5B8F9FDFEF9FDFEF9FDFEC7663FC33E0CB84618936035936035B5704B
349
      D3765CD4785BD47555D06842CD6239CC5E33C74D1DF9FDFEF7F5F4CA7252C23D
350
      0FC24119AD5428936035FF00FF936035CD7C64D6816AD7836AD8846BD8856BD8
351
      846AD77F63F9FDFED59B89D27154D4775CC86F55936035FF00FFFF00FF936035
352
      B17855D88B7ADA8E7BDA8E7BDA8E7ADA8D79DB8C78D58974D78570D98974D483
353
      70B07450936035FF00FFFF00FFFF00FF936035B37F5DD79886E09E90E09E8FDF
354
      9D8EDF9C8CDF9A8ADE9888D38F7DB27B59936035FF00FFFF00FFFF00FFFF00FF
355
      FF00FF936035936035BE8E71D6A28FE4AEA1E4ADA0D5A08CBE8B6E9360359360
356
      35FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF93603593603593
357
      6035936035936035936035FF00FFFF00FFFF00FFFF00FFFF00FF
358
    }
359
    OnClick = ApplyBtnClick
360
    TabOrder = 5
361
    Visible = False
362
  end
363
  object BitBtn1: TBitBtn
364
    Left = 137
365
    Height = 30
366
    Top = 309
367
    Width = 120
368
    Caption = '&Close'
369
    Glyph.Data = {
370
      F6000000424DF600000000000000760000002800000010000000100000000100
371
      040000000000800000000000000000000000100000001000000000000000FFFF
372
      000000008400FF00FF0000FFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
373
      FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00330000000000
374
      0333330244444444033333022444444403333302224444440333330222044444
375
      0333330222044444033333022204444403333302220444440333330222044444
376
      0333330222044444033333022240444403333302220444440333330222044444
377
      0333330212044444033333021104444403333300000000000333
378
    }
379
    OnClick = BitBtn1Click
380
    TabOrder = 6
381
  end
382
end
383