blob: 018f8c4e370d9e53a8d4742658b9d30d9f16038a (
plain)
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
|
object RadioButtonForm: TRadioButtonForm
BorderWidth = 8
Text = 'Radio button test'
object Box: TFBoxLayout
Orientation = Vertical
object GrayCheckbox: TCheckbox
Text = 'Gray radio buttons'
OnClick = GrayCheckboxClick
end
object HorzBox: TFBoxLayout
object ButtonBox1: TFBoxLayout
Orientation = Vertical
object Radio1a: TRadioButton
Checked = True
Text = 'Button 1 a'
end
object Radio1b: TRadioButton
Text = 'Button 1 b'
end
end
object ButtonBox2: TFBoxLayout
Orientation = Vertical
object Radio2a: TRadioButton
Text = 'Button 2 a'
end
object Radio2b: TRadioButton
Checked = True
Text = 'Button 2 b'
end
end
end
end
end
|
