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
|
object ComponentListEditorForm: TComponentListEditorForm
Left = 346
Height = 240
Top = 283
Width = 320
Caption = 'ComponentListEditorForm'
ClientHeight = 240
ClientWidth = 320
OnClose = FormClose
OnCreate = FormCreate
OnDestroy = FormDestroy
Position = poScreenCenter
LCLVersion = '1.7'
object ChildrenListBox: TListBox
Left = 0
Height = 198
Top = 42
Width = 320
Align = alClient
ItemHeight = 0
MultiSelect = True
OnClick = ChildrenListBoxClick
TabOrder = 0
end
object tbCommands: TToolBar
Left = 0
Height = 42
Top = 0
Width = 320
AutoSize = True
ButtonHeight = 40
ButtonWidth = 44
ShowCaptions = True
TabOrder = 1
object tbAdd: TToolButton
Left = 1
Top = 2
Caption = 'Add'
DropdownMenu = menuAddItem
end
object tbDelete: TToolButton
Left = 45
Top = 2
Caption = 'Delete'
OnClick = tbDeleteClick
end
object tbMoveUp: TToolButton
Left = 89
Top = 2
Caption = 'Up'
OnClick = tbMoveUpClick
end
object tbMoveDown: TToolButton
Left = 133
Top = 2
Caption = 'Down'
OnClick = tbMoveDownClick
end
end
object menuAddItem: TPopupMenu
left = 88
top = 96
end
end
|
