LZScene
1object ShaderUniformEditor: TShaderUniformEditor
2Left = 1793
3Height = 344
4Top = 237
5Width = 440
6BorderStyle = bsDialog
7Caption = 'Autofill of uniforms'
8ClientHeight = 344
9ClientWidth = 440
10Color = clBtnFace
11Font.Color = clWindowText
12Font.Height = -11
13Font.Name = 'Tahoma'
14OnDestroy = FormDestroy
15Position = poScreenCenter
16LCLVersion = '1.2.6.0'
17object Labe1: TLabel
18Left = 8
19Height = 13
20Top = 5
21Width = 88
22Caption = 'Available Uniforms'
23ParentColor = False
24end
25object Label1: TLabel
26Left = 223
27Height = 13
28Top = 5
29Width = 78
30Caption = 'Avaiblable Value'
31ParentColor = False
32end
33object Label2: TLabel
34Left = 223
35Height = 13
36Top = 97
37Width = 79
38Caption = 'Texture Sampler'
39ParentColor = False
40end
41object Label3: TLabel
42Left = 223
43Height = 13
44Top = 143
45Width = 176
46Caption = 'Swizzle of texture color components '
47ParentColor = False
48end
49object Label4: TLabel
50Left = 223
51Height = 13
52Top = 51
53Width = 131
54Caption = 'Texture Image/Attachment'
55ParentColor = False
56end
57object LBUniforms: TListBox
58Left = 8
59Height = 313
60Top = 24
61Width = 209
62ItemHeight = 0
63OnClick = LBUniformsClick
64OnKeyPress = LBUniformsKeyPress
65TabOrder = 0
66end
67object AutoSetBox: TComboBox
68Left = 223
69Height = 21
70Top = 24
71Width = 209
72ItemHeight = 13
73OnChange = AutoSetBoxChange
74Style = csDropDownList
75TabOrder = 1
76end
77object SamplerBox: TComboBox
78Left = 223
79Height = 21
80Top = 116
81Width = 209
82Enabled = False
83ItemHeight = 13
84OnChange = SamplerBoxChange
85Style = csDropDownList
86TabOrder = 2
87end
88object Panel1: TPanel
89Left = 223
90Height = 143
91Top = 162
92Width = 209
93ClientHeight = 143
94ClientWidth = 209
95TabOrder = 3
96object RedGroup: TRadioGroup
97Left = 8
98Height = 129
99Top = 8
100Width = 50
101AutoFill = True
102Caption = 'RED'
103ChildSizing.LeftRightSpacing = 6
104ChildSizing.EnlargeHorizontal = crsHomogenousChildResize
105ChildSizing.EnlargeVertical = crsHomogenousChildResize
106ChildSizing.ShrinkHorizontal = crsScaleChilds
107ChildSizing.ShrinkVertical = crsScaleChilds
108ChildSizing.Layout = cclLeftToRightThenTopToBottom
109ChildSizing.ControlsPerLine = 1
110ClientHeight = 111
111ClientWidth = 46
112Color = clRed
113Items.Strings = (
114'R'
115'G'
116'B'
117'A'
118'0'
119'1'
120)
121OnClick = ColorGroupClick
122ParentColor = False
123TabOrder = 0
124end
125object GreenGroup: TRadioGroup
126Tag = 1
127Left = 55
128Height = 129
129Top = 8
130Width = 50
131AutoFill = True
132Caption = 'GREEN'
133ChildSizing.LeftRightSpacing = 6
134ChildSizing.EnlargeHorizontal = crsHomogenousChildResize
135ChildSizing.EnlargeVertical = crsHomogenousChildResize
136ChildSizing.ShrinkHorizontal = crsScaleChilds
137ChildSizing.ShrinkVertical = crsScaleChilds
138ChildSizing.Layout = cclLeftToRightThenTopToBottom
139ChildSizing.ControlsPerLine = 1
140ClientHeight = 111
141ClientWidth = 46
142Color = clGreen
143Items.Strings = (
144'R'
145'G'
146'B'
147'A'
148'0'
149'1'
150)
151OnClick = ColorGroupClick
152ParentColor = False
153TabOrder = 1
154end
155object BlueGroup: TRadioGroup
156Tag = 2
157Left = 102
158Height = 129
159Top = 8
160Width = 50
161AutoFill = True
162Caption = 'BLUE'
163ChildSizing.LeftRightSpacing = 6
164ChildSizing.EnlargeHorizontal = crsHomogenousChildResize
165ChildSizing.EnlargeVertical = crsHomogenousChildResize
166ChildSizing.ShrinkHorizontal = crsScaleChilds
167ChildSizing.ShrinkVertical = crsScaleChilds
168ChildSizing.Layout = cclLeftToRightThenTopToBottom
169ChildSizing.ControlsPerLine = 1
170ClientHeight = 111
171ClientWidth = 46
172Color = clBlue
173Items.Strings = (
174'R'
175'G'
176'B'
177'A'
178'0'
179'1'
180)
181OnClick = ColorGroupClick
182ParentColor = False
183TabOrder = 2
184end
185object AlphaGroup: TRadioGroup
186Tag = 3
187Left = 150
188Height = 129
189Top = 8
190Width = 50
191AutoFill = True
192Caption = 'ALPHA'
193ChildSizing.LeftRightSpacing = 6
194ChildSizing.EnlargeHorizontal = crsHomogenousChildResize
195ChildSizing.EnlargeVertical = crsHomogenousChildResize
196ChildSizing.ShrinkHorizontal = crsScaleChilds
197ChildSizing.ShrinkVertical = crsScaleChilds
198ChildSizing.Layout = cclLeftToRightThenTopToBottom
199ChildSizing.ControlsPerLine = 1
200ClientHeight = 111
201ClientWidth = 46
202Color = clWhite
203Items.Strings = (
204'R'
205'G'
206'B'
207'A'
208'0'
209'1'
210)
211OnClick = ColorGroupClick
212ParentColor = False
213TabOrder = 3
214end
215end
216object TextureBox: TComboBox
217Left = 223
218Height = 21
219Top = 70
220Width = 209
221Enabled = False
222ItemHeight = 13
223OnChange = TextureBoxChange
224Style = csDropDownList
225TabOrder = 4
226end
227object Button1: TButton
228Left = 360
229Height = 25
230Top = 312
231Width = 73
232Caption = 'Done'
233ModalResult = 1
234TabOrder = 5
235end
236end
237