MathgeomGLS
498 строк · 12.2 Кб
1object PlotColorsForm: TPlotColorsForm
2Left = 0
3Top = 0
4Margins.Left = 5
5Margins.Top = 5
6Margins.Right = 5
7Margins.Bottom = 5
8BorderIcons = [biSystemMenu]
9BorderStyle = bsDialog
10Caption = 'Plot Colours'
11ClientHeight = 620
12ClientWidth = 483
13Color = clBtnFace
14Font.Charset = DEFAULT_CHARSET
15Font.Color = clWindowText
16Font.Height = -19
17Font.Name = 'Tahoma'
18Font.Style = []
19FormStyle = fsStayOnTop
20KeyPreview = True
21Position = poDesigned
22OnCloseQuery = FormCloseQuery
23OnKeyDown = FormKeyDown
24OnShow = FormShow
25PixelsPerInch = 168
26TextHeight = 23
27object Label9: TLabel
28Left = 25
29Top = 492
30Width = 108
31Height = 23
32Margins.Left = 5
33Margins.Top = 5
34Margins.Right = 5
35Margins.Bottom = 5
36Caption = 'Blend factor:'
37end
38object Label10: TLabel
39Left = 245
40Top = 492
41Width = 105
42Height = 23
43Margins.Left = 5
44Margins.Top = 5
45Margins.Right = 5
46Margins.Bottom = 5
47Caption = 'Move factor:'
48end
49object GroupBox1: TGroupBox
50Left = 14
51Top = 11
52Width = 436
53Height = 210
54Margins.Left = 5
55Margins.Top = 5
56Margins.Right = 5
57Margins.Bottom = 5
58Caption = ' Upper Plot Color '
59Font.Charset = ANSI_CHARSET
60Font.Color = clWindowText
61Font.Height = -23
62Font.Name = 'Tahoma'
63Font.Style = []
64ParentFont = False
65TabOrder = 0
66object Label1: TLabel
67Left = 30
68Top = 39
69Width = 51
70Height = 24
71Margins.Left = 5
72Margins.Top = 5
73Margins.Right = 5
74Margins.Bottom = 5
75Alignment = taRightJustify
76Caption = 'Red :'
77Font.Charset = DEFAULT_CHARSET
78Font.Color = clRed
79Font.Height = -19
80Font.Name = 'MS Sans Serif'
81Font.Style = [fsBold]
82ParentFont = False
83end
84object Label2: TLabel
85Left = 12
86Top = 77
87Width = 69
88Height = 23
89Margins.Left = 5
90Margins.Top = 5
91Margins.Right = 5
92Margins.Bottom = 5
93Alignment = taRightJustify
94Caption = 'Green :'
95Font.Charset = ANSI_CHARSET
96Font.Color = clGreen
97Font.Height = -19
98Font.Name = 'Tahoma'
99Font.Style = [fsBold]
100ParentFont = False
101end
102object Label3: TLabel
103Left = 26
104Top = 116
105Width = 55
106Height = 23
107Margins.Left = 5
108Margins.Top = 5
109Margins.Right = 5
110Margins.Bottom = 5
111Alignment = taRightJustify
112Caption = 'Blue :'
113Font.Charset = ANSI_CHARSET
114Font.Color = clBlue
115Font.Height = -19
116Font.Name = 'Tahoma'
117Font.Style = [fsBold]
118ParentFont = False
119end
120object Label4: TLabel
121Left = 9
122Top = 154
123Width = 72
124Height = 28
125Margins.Left = 5
126Margins.Top = 5
127Margins.Right = 5
128Margins.Bottom = 5
129Alignment = taRightJustify
130Caption = 'Alpha :'
131end
132object UpperRed: TTrackBar
133Left = 79
134Top = 32
135Width = 355
136Height = 52
137Cursor = crHandPoint
138Margins.Left = 5
139Margins.Top = 5
140Margins.Right = 5
141Margins.Bottom = 5
142Ctl3D = False
143Max = 255
144ParentCtl3D = False
145PageSize = 8
146Position = 128
147TabOrder = 0
148ThumbLength = 26
149TickMarks = tmTopLeft
150TickStyle = tsNone
151OnChange = UpperRedChange
152end
153object UpperGreen: TTrackBar
154Left = 79
155Top = 72
156Width = 355
157Height = 52
158Cursor = crHandPoint
159Margins.Left = 5
160Margins.Top = 5
161Margins.Right = 5
162Margins.Bottom = 5
163Ctl3D = False
164Max = 255
165ParentCtl3D = False
166PageSize = 8
167Position = 128
168TabOrder = 1
169ThumbLength = 26
170TickMarks = tmTopLeft
171TickStyle = tsNone
172OnChange = UpperGreenChange
173end
174object UpperBlue: TTrackBar
175Left = 79
176Top = 114
177Width = 355
178Height = 52
179Cursor = crHandPoint
180Margins.Left = 5
181Margins.Top = 5
182Margins.Right = 5
183Margins.Bottom = 5
184Ctl3D = False
185Max = 255
186ParentCtl3D = False
187PageSize = 8
188Position = 128
189TabOrder = 2
190ThumbLength = 26
191TickMarks = tmTopLeft
192TickStyle = tsNone
193OnChange = UpperBlueChange
194end
195object UpperAlpha: TTrackBar
196Left = 79
197Top = 152
198Width = 355
199Height = 53
200Cursor = crHandPoint
201Margins.Left = 5
202Margins.Top = 5
203Margins.Right = 5
204Margins.Bottom = 5
205Ctl3D = False
206Max = 1000
207ParentCtl3D = False
208PageSize = 8
209Position = 1000
210TabOrder = 3
211ThumbLength = 26
212TickMarks = tmTopLeft
213TickStyle = tsNone
214OnChange = UpperAlphaChange
215end
216end
217object GroupBox2: TGroupBox
218Left = 14
219Top = 226
220Width = 436
221Height = 210
222Margins.Left = 5
223Margins.Top = 5
224Margins.Right = 5
225Margins.Bottom = 5
226Caption = ' Lower Plot Color '
227Font.Charset = ANSI_CHARSET
228Font.Color = clWindowText
229Font.Height = -23
230Font.Name = 'Tahoma'
231Font.Style = []
232ParentFont = False
233TabOrder = 1
234object Label5: TLabel
235Left = 30
236Top = 39
237Width = 51
238Height = 24
239Margins.Left = 5
240Margins.Top = 5
241Margins.Right = 5
242Margins.Bottom = 5
243Alignment = taRightJustify
244Caption = 'Red :'
245Font.Charset = DEFAULT_CHARSET
246Font.Color = clRed
247Font.Height = -19
248Font.Name = 'MS Sans Serif'
249Font.Style = [fsBold]
250ParentFont = False
251end
252object Label6: TLabel
253Left = 12
254Top = 77
255Width = 69
256Height = 23
257Margins.Left = 5
258Margins.Top = 5
259Margins.Right = 5
260Margins.Bottom = 5
261Alignment = taRightJustify
262Caption = 'Green :'
263Font.Charset = ANSI_CHARSET
264Font.Color = clGreen
265Font.Height = -19
266Font.Name = 'Tahoma'
267Font.Style = [fsBold]
268ParentFont = False
269end
270object Label7: TLabel
271Left = 26
272Top = 116
273Width = 55
274Height = 23
275Margins.Left = 5
276Margins.Top = 5
277Margins.Right = 5
278Margins.Bottom = 5
279Alignment = taRightJustify
280Caption = 'Blue :'
281Font.Charset = ANSI_CHARSET
282Font.Color = clBlue
283Font.Height = -19
284Font.Name = 'Tahoma'
285Font.Style = [fsBold]
286ParentFont = False
287end
288object Label8: TLabel
289Left = 9
290Top = 154
291Width = 72
292Height = 28
293Margins.Left = 5
294Margins.Top = 5
295Margins.Right = 5
296Margins.Bottom = 5
297Alignment = taRightJustify
298Caption = 'Alpha :'
299end
300object LowerRed: TTrackBar
301Left = 79
302Top = 32
303Width = 355
304Height = 52
305Cursor = crHandPoint
306Margins.Left = 5
307Margins.Top = 5
308Margins.Right = 5
309Margins.Bottom = 5
310Ctl3D = False
311Max = 255
312ParentCtl3D = False
313PageSize = 8
314Position = 128
315TabOrder = 0
316ThumbLength = 26
317TickMarks = tmTopLeft
318TickStyle = tsNone
319OnChange = LowerRedChange
320end
321object LowerGreen: TTrackBar
322Left = 79
323Top = 72
324Width = 355
325Height = 52
326Cursor = crHandPoint
327Margins.Left = 5
328Margins.Top = 5
329Margins.Right = 5
330Margins.Bottom = 5
331Ctl3D = False
332Max = 255
333ParentCtl3D = False
334PageSize = 8
335Position = 128
336TabOrder = 1
337ThumbLength = 26
338TickMarks = tmTopLeft
339TickStyle = tsNone
340OnChange = LowerGreenChange
341end
342object LowerBlue: TTrackBar
343Left = 79
344Top = 114
345Width = 355
346Height = 52
347Cursor = crHandPoint
348Margins.Left = 5
349Margins.Top = 5
350Margins.Right = 5
351Margins.Bottom = 5
352Ctl3D = False
353Max = 255
354ParentCtl3D = False
355PageSize = 8
356Position = 128
357TabOrder = 2
358ThumbLength = 26
359TickMarks = tmTopLeft
360TickStyle = tsNone
361OnChange = LowerBlueChange
362end
363object LowerAlpha: TTrackBar
364Left = 79
365Top = 152
366Width = 355
367Height = 53
368Cursor = crHandPoint
369Margins.Left = 5
370Margins.Top = 5
371Margins.Right = 5
372Margins.Bottom = 5
373Ctl3D = False
374Max = 1000
375ParentCtl3D = False
376PageSize = 8
377Position = 1000
378TabOrder = 3
379ThumbLength = 26
380TickMarks = tmTopLeft
381TickStyle = tsNone
382OnChange = LowerAlphaChange
383end
384end
385object UpperLowerLock: TCheckBox
386Left = 53
387Top = 445
388Width = 358
389Height = 29
390Margins.Left = 5
391Margins.Top = 5
392Margins.Right = 5
393Margins.Bottom = 5
394Caption = 'Lock Lower Color to Upper Color'
395Font.Charset = ANSI_CHARSET
396Font.Color = clMaroon
397Font.Height = -19
398Font.Name = 'Tahoma'
399Font.Style = [fsBold]
400ParentFont = False
401TabOrder = 2
402OnClick = UpperLowerLockClick
403end
404object EditBlend: TEdit
405Left = 140
406Top = 487
407Width = 88
408Height = 31
409Margins.Left = 5
410Margins.Top = 5
411Margins.Right = 5
412Margins.Bottom = 5
413TabOrder = 3
414OnKeyDown = EditBlendKeyDown
415OnKeyPress = EditBlendKeyPress
416OnKeyUp = EditBlendKeyUp
417end
418object EditMove: TEdit
419Left = 361
420Top = 487
421Width = 87
422Height = 31
423Margins.Left = 5
424Margins.Top = 5
425Margins.Right = 5
426Margins.Bottom = 5
427TabOrder = 4
428OnKeyDown = EditBlendKeyDown
429OnKeyPress = EditMoveKeyPress
430OnKeyUp = EditMoveKeyUp
431end
432object ApplyBtn: TBitBtn
433Left = 14
434Top = 541
435Width = 210
436Height = 52
437Cursor = crHandPoint
438Hint = 'Update any changes made'
439Margins.Left = 5
440Margins.Top = 5
441Margins.Right = 5
442Margins.Bottom = 5
443Caption = 'Apply'
444Default = True
445Glyph.Data = {
44636030000424D3603000000000000360000002800000010000000100000000100
44718000000000000030000120B0000120B00000000000000000000FF00FFFF00FF
448FF00FFFF00FFFF00FF936035936035936035936035936035936035FF00FFFF00
449FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF936035936035C6923DE3B445F7
450CE4AF7CF4BE3BB47C79940936035936035FF00FFFF00FFFF00FFFF00FFFF00FF
451936035B57A36DD9838F0AD38F3B538F5BC3BF6BE3CF5BB3BF3B63BE1A33DB87F
45238936035FF00FFFF00FFFF00FF936035B27233DC872FE4922DDCA457D7BC8FD7
453C097D8C096D8C199D5B582E69E38E09233B47634936035FF00FFFF00FF936035
454CD6F28DA7B25D2A374F9FDFEF9FDFEF9FDFEF9FDFEF9FDFEF9FDFEDF8E32E08A
4552FD0782C936035FF00FF936035B4652BD3661FD27A37F9FDFED5B69ADA8229DE
456892DDF8A2FD9852DDC8227DD832DDA7B2AD67226B5682C936035936035C05A21
457CE5A17D07D47F9FDFED18C57DA711CDB7B29DC7822F9FDFED2905BD76D1CD56E
45825D26722C25E24936035936035C64C18CA5015CB6A36F9FDFED8AD91CD5F16D0
459641BCF5E0FF9FDFEF9FDFECD7F4CCF5A15CD5B1EC7521B936035936035C24212
460C54613C5480FD5A38CF5FCFFF9FDFEF9FDFEF9FDFEF9FDFEF9FDFEF9FDFECB70
46143C84B12C34917936035936035C15F39C9552DC95124C54918D08464E4BDAEE7
462C8BCE6C5B8F9FDFEF9FDFEF9FDFEC7663FC33E0CB84618936035936035B5704B
463D3765CD4785BD47555D06842CD6239CC5E33C74D1DF9FDFEF7F5F4CA7252C23D
4640FC24119AD5428936035FF00FF936035CD7C64D6816AD7836AD8846BD8856BD8
465846AD77F63F9FDFED59B89D27154D4775CC86F55936035FF00FFFF00FF936035
466B17855D88B7ADA8E7BDA8E7BDA8E7ADA8D79DB8C78D58974D78570D98974D483
46770B07450936035FF00FFFF00FFFF00FF936035B37F5DD79886E09E90E09E8FDF
4689D8EDF9C8CDF9A8ADE9888D38F7DB27B59936035FF00FFFF00FFFF00FFFF00FF
469FF00FF936035936035BE8E71D6A28FE4AEA1E4ADA0D5A08CBE8B6E9360359360
47035FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF93603593603593
4716035936035936035936035FF00FFFF00FFFF00FFFF00FFFF00FF}
472TabOrder = 5
473Visible = False
474OnClick = ApplyBtnClick
475end
476object BitBtn1: TBitBtn
477Left = 240
478Top = 541
479Width = 210
480Height = 52
481Margins.Left = 5
482Margins.Top = 5
483Margins.Right = 5
484Margins.Bottom = 5
485Caption = '&Close'
486Glyph.Data = {
487F6000000424DF600000000000000760000002800000010000000100000000100
488040000000000800000000000000000000000100000001000000000000000FFFF
489000000008400FF00FF0000FFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
490FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00330000000000
4910333330244444444033333022444444403333302224444440333330222044444
4920333330222044444033333022204444403333302220444440333330222044444
4930333330222044444033333022240444403333302220444440333330222044444
4940333330212044444033333021104444403333300000000000333}
495TabOrder = 6
496OnClick = BitBtn1Click
497end
498end
499