blob: 625a20409e75f0526499bd9d58253bc00397f5d1 (
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
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
|
object fmCustomizeToolbar: TfmCustomizeToolbar
Left = 264
Top = 202
BorderStyle = bsDialog
Caption = 'Customize Toolbar'
ClientHeight = 363
ClientWidth = 518
Color = clBtnFace
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'Tahoma'
Font.Style = []
KeyPreview = True
OldCreateOrder = False
Position = poOwnerFormCenter
OnClose = FormClose
OnCreate = FormCreate
OnDestroy = FormDestroy
OnKeyDown = FormKeyDown
DesignSize = (
518
363)
PixelsPerInch = 96
TextHeight = 13
object laAvailable: TLabel
Left = 8
Top = 5
Width = 87
Height = 13
Caption = 'A&vailable buttons:'
FocusControl = lbAvailable
end
object laAdded: TLabel
Left = 310
Top = 5
Width = 93
Height = 13
Caption = 'Buttons on &toolbar:'
FocusControl = lbAdded
end
object Bevel1: TBevel
Left = 8
Top = 323
Width = 501
Height = 2
Anchors = [akLeft, akRight, akBottom]
end
object bnAdd: TButton
Left = 215
Top = 24
Width = 88
Height = 25
Caption = '&Add >>'
TabOrder = 1
OnClick = bnAddClick
end
object bnRemove: TButton
Left = 215
Top = 49
Width = 88
Height = 25
Caption = '<< &Remove'
TabOrder = 2
OnClick = bnRemoveClick
end
object lbAdded: TListBox
Left = 310
Top = 24
Width = 200
Height = 292
Style = lbOwnerDrawFixed
DragMode = dmAutomatic
IntegralHeight = True
ItemHeight = 24
TabOrder = 5
OnClick = lbAvailableClick
OnDragDrop = lbAddedDragDrop
OnDragOver = lbAddedDragOver
OnDrawItem = lbAvailableDrawItem
end
object lbAvailable: TListBox
Left = 8
Top = 24
Width = 200
Height = 292
Style = lbOwnerDrawFixed
Anchors = [akLeft, akTop, akBottom]
DragMode = dmAutomatic
IntegralHeight = True
ItemHeight = 24
TabOrder = 0
OnClick = lbAvailableClick
OnDragDrop = lbAvailableDragDrop
OnDragOver = lbAvailableDragOver
OnDrawItem = lbAvailableDrawItem
end
object bnUp: TButton
Left = 215
Top = 80
Width = 88
Height = 25
Caption = '&Up'
TabOrder = 3
OnClick = bnUpClick
end
object bnDown: TButton
Left = 215
Top = 105
Width = 88
Height = 25
Caption = '&Down'
TabOrder = 4
OnClick = bnDownClick
end
object bnOK: TButton
Left = 8
Top = 330
Width = 77
Height = 25
Anchors = [akLeft, akBottom]
Caption = 'OK'
Default = True
TabOrder = 6
OnClick = bnOKClick
end
object bnCancel: TButton
Left = 91
Top = 330
Width = 77
Height = 25
Anchors = [akLeft, akBottom]
Cancel = True
Caption = '&Cancel'
TabOrder = 7
OnClick = bnCancelClick
end
object bnReset: TButton
Left = 380
Top = 331
Width = 130
Height = 25
Anchors = [akRight, akBottom]
Caption = 'R&eset to Default'
TabOrder = 8
OnClick = bnResetClick
end
object tiScroll: TTimer
Enabled = False
Interval = 250
OnTimer = tiScrollTimer
Left = 376
Top = 212
end
end
|
