blob: 2e03f217412903ae2358b02a406200b974a3bde0 (
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
|
object BoxWindow: TBoxWindow
Text = 'Box layout'
BorderWidth = 8
object Layout: TBoxLayout
Spacing = 8
Orientation = Vertical
object BoxLayout: TBoxLayout
Spacing = 4
object Button1: TButton
Text = 'Button 1'
end
object Button2: TButton
Text = 'Button 2'
end
object Button3: TButton
Text = 'Button 3'
end
end
object FlipButton: TButton
Text = 'Switch to vertical'
OnClick = FlipOrientation
end
end
end
|