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
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
|
object SmallOrderedSetEditDlg: TSmallOrderedSetEditDlg
Left = 407
Height = 241
Top = 264
Width = 221
Caption = 'SmallOrderedSetEditDlg'
ClientHeight = 241
ClientWidth = 221
LCLVersion = '1.9.0.0'
object ButtonPanel1: TButtonPanel
Left = 6
Height = 36
Top = 199
Width = 209
OKButton.Name = 'OKButton'
OKButton.DefaultCaption = True
HelpButton.Name = 'HelpButton'
HelpButton.DefaultCaption = True
CloseButton.Name = 'CloseButton'
CloseButton.DefaultCaption = True
CancelButton.Name = 'CancelButton'
CancelButton.DefaultCaption = True
TabOrder = 1
ShowButtons = [pbOK, pbCancel]
end
object HeaderLabel: TLabel
AnchorSideLeft.Control = Owner
AnchorSideTop.Control = Owner
AnchorSideRight.Control = Owner
AnchorSideRight.Side = asrBottom
Left = 6
Height = 13
Top = 6
Width = 209
Anchors = [akTop, akLeft, akRight]
BorderSpacing.Around = 6
Caption = 'HeaderLabel'
ParentColor = False
Visible = False
end
object ItemsTreeView: TTreeView
AnchorSideLeft.Control = Owner
AnchorSideTop.Control = HeaderLabel
AnchorSideTop.Side = asrBottom
AnchorSideRight.Control = MoveUpBitBtn
AnchorSideBottom.Control = ButtonPanel1
Left = 6
Height = 168
Top = 25
Width = 175
Anchors = [akTop, akLeft, akRight, akBottom]
BorderSpacing.Around = 6
HideSelection = False
Images = ImageList1
ReadOnly = True
RowSelect = True
ScrollBars = ssAutoBoth
ShowButtons = False
ShowRoot = False
TabOrder = 0
OnAdvancedCustomDrawItem = ItemsTreeViewAdvancedCustomDrawItem
OnMouseDown = ItemsTreeViewMouseDown
OnSelectionChanged = ItemsTreeViewSelectionChanged
Options = [tvoAutoItemHeight, tvoKeepCollapsedNodes, tvoReadOnly, tvoRowSelect, tvoShowLines, tvoToolTips, tvoThemedDraw]
end
object MoveUpBitBtn: TBitBtn
AnchorSideRight.Control = Owner
AnchorSideRight.Side = asrBottom
Left = 187
Height = 28
Top = 40
Width = 28
Anchors = [akTop, akRight]
AutoSize = True
BorderSpacing.Around = 6
Glyph.Data = {
36040000424D3604000000000000360000002800000010000000100000000100
2000000000000004000064000000640000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000137E2DFF117C2BFF0F7B29FF0D7A28FF0C79
27FF000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000127E2DFF107D2BFF0E7B29FF0C7A27FF0B79
26FF000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000127F2DFF107D2BFF0E7C28FF0C7A27FF0A79
25FF000000000000000000000000000000000000000000000000000000000000
000000000000000000000000000012802DFF107E2BFF0E7C29FF0C7B27FF0B7A
26FF000000000000000000000000000000000000000000000000000000000000
000000000000000000000000000012802DFF107F2BFF0E7D29FF0D7C28FF0B7A
26FF000000000000000000000000000000000000000000000000000000000000
000000000000000000000000000013822EFF11802CFF0F7F2BFF0E7D29FF0D7B
28FF000000000000000000000000000000000000000000000000000000000000
0000188432FF178431FF158430FF14832FFF12822EFF11802CFF0F7E2AFF0E7C
29FF0E7B29FF0E7B29FF0F7B2AFF000000000000000000000000000000000000
000000000000178532FF168531FF158430FF14832FFF12812DFF117F2CFF107E
2BFF107D2BFF107C2BFF00000000000000000000000000000000000000000000
00000000000000000000178532FF168531FF158430FF14822FFF13802DFF127F
2DFF127E2CFF0000000000000000000000000000000000000000000000000000
0000000000000000000000000000178532FF168431FF158330FF15812FFF1480
2FFF000000000000000000000000000000000000000000000000000000000000
000000000000000000000000000000000000178432FF168331FF168231FF0000
0000000000000000000000000000000000000000000000000000000000000000
00000000000000000000000000000000000000000000178332FF000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000
}
OnClick = MoveUpBitBtnClick
ParentShowHint = False
ShowHint = True
TabOrder = 2
end
object MoveDownBitBtn: TBitBtn
AnchorSideTop.Control = MoveUpBitBtn
AnchorSideTop.Side = asrBottom
AnchorSideRight.Control = Owner
AnchorSideRight.Side = asrBottom
Left = 187
Height = 28
Top = 74
Width = 28
Anchors = [akTop, akRight]
AutoSize = True
BorderSpacing.Around = 6
Glyph.Data = {
36040000424D3604000000000000360000002800000010000000100000000100
2000000000000004000064000000640000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
000000000000000000000000000000000000000000000F7B2AFF000000000000
0000000000000000000000000000000000000000000000000000000000000000
000000000000000000000000000000000000107C2BFF0E7B29FF0D7A27FF0000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000127E2DFF107D2BFF0E7B28FF0C7A27FF0B79
26FF000000000000000000000000000000000000000000000000000000000000
0000000000000000000014802EFF127F2DFF107E2BFF0E7C29FF0C7A27FF0B79
26FF0A7925FF0000000000000000000000000000000000000000000000000000
000000000000168231FF15812FFF13802DFF107F2BFF0E7D29FF0C7B27FF0B7A
26FF0B7926FF0B7926FF00000000000000000000000000000000000000000000
0000178332FF178331FF158330FF13822EFF11802CFF0F7E2AFF0D7D29FF0C7B
27FF0C7A27FF0C7A27FF0D7A28FF000000000000000000000000000000000000
000000000000000000000000000014832FFF12812DFF10802CFF0F7E2AFF0E7C
29FF000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000158430FF13822EFF12812DFF107F2BFF0F7E
2AFF000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000158430FF14832FFF13822EFF12802DFF117E
2CFF000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000168531FF158430FF14822FFF14812EFF137F
2DFF000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000178532FF168431FF168330FF158130FF1480
2FFF000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000188532FF178432FF178331FF178231FF1680
30FF000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000
}
OnClick = MoveDownBitBtnClick
ParentShowHint = False
ShowHint = True
TabOrder = 3
end
object ImageList1: TImageList
left = 66
top = 72
end
end
|
