forked from erikkaashoek/NanoVNA-App
-
Notifications
You must be signed in to change notification settings - Fork 11
/
Copy pathColourPickerUnit.dfm
215 lines (215 loc) · 4.48 KB
/
ColourPickerUnit.dfm
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
209
210
211
212
213
214
215
object ColourPickerForm: TColourPickerForm
Left = 0
Top = 0
BorderIcons = []
BorderStyle = bsToolWindow
Caption = 'Colour'
ClientHeight = 377
ClientWidth = 321
Color = clBtnFace
DoubleBuffered = True
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'Tahoma'
Font.Style = []
FormStyle = fsStayOnTop
OldCreateOrder = False
SnapBuffer = 6
OnClose = FormClose
OnCreate = FormCreate
OnDestroy = FormDestroy
OnHide = FormHide
PixelsPerInch = 96
TextHeight = 16
object Label1: TLabel
Left = 129
Top = 282
Width = 26
Height = 16
Alignment = taRightJustify
Caption = 'Red '
end
object Label2: TLabel
Left = 117
Top = 306
Width = 38
Height = 16
Alignment = taRightJustify
Caption = 'Green '
end
object Label3: TLabel
Left = 127
Top = 329
Width = 28
Height = 16
Alignment = taRightJustify
Caption = 'Blue '
end
object Label4: TLabel
Left = 103
Top = 352
Width = 52
Height = 16
Alignment = taRightJustify
Caption = 'Hex BGR '
end
object ColourNameLabel: TLabel
Left = 8
Top = 6
Width = 100
Height = 16
Caption = 'ColourNameLabel'
end
object LuminosityArrowPaintBox: TPaintBox
Left = 292
Top = 12
Width = 29
Height = 265
OnMouseDown = LuminosityPaintBoxMouseDown
OnMouseMove = LuminosityPaintBoxMouseMove
OnPaint = LuminosityArrowPaintBoxPaint
end
object SpectrumPanel: TPanel
Left = 8
Top = 24
Width = 258
Height = 242
BevelOuter = bvLowered
Caption = 'SpectrumPanel'
ShowCaption = False
TabOrder = 0
TabStop = True
object SpectrumPaintBox: TPaintBox
Left = 1
Top = 1
Width = 256
Height = 240
Align = alClient
OnMouseDown = SpectrumPaintBoxMouseDown
OnMouseMove = SpectrumPaintBoxMouseMove
OnPaint = SpectrumPaintBoxPaint
ExplicitLeft = -71
ExplicitTop = -39
ExplicitHeight = 256
end
end
object LuminosityPanel: TPanel
Left = 276
Top = 24
Width = 17
Height = 242
BevelOuter = bvLowered
Caption = 'LuminosityPanel'
ShowCaption = False
TabOrder = 1
TabStop = True
object LuminosityPaintBox: TPaintBox
Left = 1
Top = 1
Width = 15
Height = 240
Align = alClient
OnMouseDown = LuminosityPaintBoxMouseDown
OnMouseMove = LuminosityPaintBoxMouseMove
OnPaint = LuminosityPaintBoxPaint
ExplicitWidth = 16
ExplicitHeight = 256
end
end
object ColourPanel: TPanel
Left = 8
Top = 279
Width = 91
Height = 91
BevelOuter = bvLowered
Caption = 'LuminosityPanel'
ShowCaption = False
TabOrder = 8
object ColourPaintBox: TPaintBox
Left = 1
Top = 1
Width = 89
Height = 89
Align = alClient
OnPaint = ColourPaintBoxPaint
ExplicitLeft = 146
ExplicitTop = -40
ExplicitWidth = 39
ExplicitHeight = 256
end
end
object RedSpinEdit: TSpinEdit
Left = 159
Top = 279
Width = 58
Height = 26
MaxValue = 255
MinValue = 0
TabOrder = 2
Value = 0
OnChange = EditChange
end
object GreenSpinEdit: TSpinEdit
Left = 159
Top = 303
Width = 58
Height = 26
MaxValue = 255
MinValue = 0
TabOrder = 3
Value = 0
OnChange = EditChange
end
object BlueSpinEdit: TSpinEdit
Left = 159
Top = 326
Width = 58
Height = 26
MaxValue = 255
MinValue = 0
TabOrder = 4
Value = 0
OnChange = EditChange
end
object HexEdit: TEdit
Left = 159
Top = 349
Width = 58
Height = 24
TabOrder = 5
Text = 'HexEdit'
OnChange = EditChange
end
object CancelButton: TButton
Left = 233
Top = 345
Width = 76
Height = 25
Cursor = crHandPoint
Caption = 'Cancel'
TabOrder = 7
OnClick = CancelButtonClick
end
object OKButton: TButton
Left = 233
Top = 279
Width = 76
Height = 25
Cursor = crHandPoint
Caption = 'OK'
Default = True
TabOrder = 6
OnClick = OKButtonClick
end
object RestoreButton: TButton
Left = 233
Top = 312
Width = 76
Height = 25
Cursor = crHandPoint
Caption = 'Restore'
TabOrder = 9
OnClick = RestoreButtonClick
end
end