blob: d0e5f62f31f284cbeb5932ef0d34d4e79dbac9d9 (
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
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
|
object MainForm: TMainForm
Text = 'Widget tests'
BorderWidth = 8
WindowOptions = [woWindow]
object Box: TBoxLayout
CanExpandWidth = False
Spacing = 8
Orientation = Vertical
object Label: TLabel
CanExpandWidth = True
Text = 'Choose a test form:'
end
object CheckboxBtn: TButton
CanExpandWidth = True
Text = 'Check boxes'
OnClick = CheckboxBtnClick
end
object RadioButtonBtn: TButton
CanExpandWidth = True
Text = 'Radio buttons'
OnClick = RadioButtonBtnClick
end
object GroupBoxBtn: TButton
CanExpandWidth = True
Text = 'Group boxes'
OnClick = GroupBoxBtnClick
end
object EditBtn: TButton
CanExpandWidth = True
Text = 'Edit fields'
OnClick = EditBtnClick
end
object ScrollBarBtn: TButton
CanExpandWidth = True
Text = 'Scroll bars'
OnClick = ScrollBarBtnClick
end
object ScrollBoxBtn: TButton
CanExpandWidth = True
Text = 'Scroll boxes'
OnClick = ScrollBoxBtnClick
end
object ListBoxBtn: TButton
CanExpandWidth = True
Text = 'List boxes'
OnClick = ListBoxBtnClick
end
object ComboBoxBtn: TButton
CanExpandWidth = True
Text = 'Combo boxes'
OnClick = ComboBoxBtnClick
end
object GridBtn: TButton
CanExpandWidth = True
Text = 'Grids'
OnClick = GridBtnClick
end
object MenuBtn: TButton
CanExpandWidth = True
Text = 'Menus'
OnClick = MenuBtnClick
end
object PanelBtn: TButton
CanExpandWidth = True
Text = 'Panel'
OnClick = PanelBtnClick
end
object ProgressBarBtn: TButton
CanExpandWidth = True
Text = 'Progress Bar'
OnClick = ProgressBarBtnClick
end
object StdDialogBtn: TButton
CanExpandWidth = True
Text = 'Std Dialog'
OnClick = StdDialogBtnClick
Enabled = False
end
object Separator: TSeparator
end
object ExitBtn: TButton
CanExpandWidth = True
Text = 'Exit'
OnClick = ExitBtnClick
end
end
end
|
