blob: eac18c90738701602b2e4e72bc65b067ac0ebd7e (
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: TBoxLayout
Orientation = Vertical
object GrayCheckbox: TCheckbox
Text = 'Gray radio buttons'
OnClick = GrayCheckboxClick
end
object HorzBox: TBoxLayout
object ButtonBox1: TBoxLayout
Orientation = Vertical
object Radio1a: TRadioButton
Checked = True
Text = 'Button 1 a'
end
object Radio1b: TRadioButton
Text = 'Button 1 b'
end
end
object ButtonBox2: TBoxLayout
Orientation = Vertical
object Radio2a: TRadioButton
Text = 'Button 2 a'
end
object Radio2b: TRadioButton
Checked = True
Text = 'Button 2 b'
end
end
end
end
end
|
