1object MouseaActionDialog: TMouseaActionDialog
2  Left = 412
3  Height = 449
4  Top = 225
5  Width = 627
6  BorderIcons = [biSystemMenu]
7  BorderStyle = bsDialog
8  Caption = 'MouseaActionDialog'
9  ClientHeight = 449
10  ClientWidth = 627
11  OnCreate = FormCreate
12  Position = poScreenCenter
13  LCLVersion = '2.1.0.0'
14  object BtnLabel: TLabel
15    AnchorSideLeft.Control = Owner
16    AnchorSideRight.Control = ActionLabel
17    AnchorSideRight.Side = asrBottom
18    Left = 6
19    Height = 15
20    Top = 159
21    Width = 90
22    Anchors = [akTop, akLeft, akRight]
23    BorderSpacing.Left = 6
24    Caption = 'BtnLabel'
25    ParentColor = False
26  end
27  object ActionLabel: TLabel
28    AnchorSideLeft.Control = Owner
29    AnchorSideTop.Control = ActionBox
30    AnchorSideTop.Side = asrCenter
31    Left = 6
32    Height = 15
33    Top = 10
34    Width = 90
35    BorderSpacing.Left = 6
36    Caption = 'ActionLabel'
37    Constraints.MinWidth = 90
38    ParentColor = False
39  end
40  object OptLabel: TLabel
41    AnchorSideLeft.Control = CaretCheck
42    AnchorSideTop.Control = CaretCheck
43    AnchorSideTop.Side = asrBottom
44    AnchorSideRight.Control = Owner
45    AnchorSideRight.Side = asrBottom
46    Left = 102
47    Height = 16
48    Top = 60
49    Width = 519
50    Anchors = [akTop, akLeft, akRight]
51    AutoSize = False
52    BorderSpacing.Top = 6
53    BorderSpacing.Right = 6
54    Caption = ' '
55    ParentColor = False
56  end
57  object PriorLabel: TLabel
58    AnchorSideLeft.Control = Owner
59    AnchorSideTop.Control = PriorSpin
60    AnchorSideTop.Side = asrCenter
61    Left = 6
62    Height = 15
63    Top = 109
64    Width = 53
65    BorderSpacing.Left = 6
66    Caption = 'PriorLabel'
67    ParentColor = False
68  end
69  object CapturePanel: TPanel
70    AnchorSideLeft.Control = chkUpRestrict
71    AnchorSideTop.Control = chkUpRestrict
72    AnchorSideTop.Side = asrBottom
73    AnchorSideRight.Control = chkUpRestrict
74    AnchorSideRight.Side = asrBottom
75    AnchorSideBottom.Control = ButtonPanel1
76    Left = 255
77    Height = 68
78    Top = 335
79    Width = 368
80    Anchors = [akTop, akLeft, akRight, akBottom]
81    BevelOuter = bvLowered
82    BevelWidth = 2
83    ClientHeight = 68
84    ClientWidth = 368
85    Color = clBtnShadow
86    ParentColor = False
87    TabOrder = 13
88    OnMouseDown = CapturePanelMouseDown
89    object PaintBox1: TPaintBox
90      Left = 2
91      Height = 64
92      Top = 2
93      Width = 364
94      Align = alClient
95      Anchors = [akTop, akRight, akBottom]
96      OnMouseDown = CapturePanelMouseDown
97      OnMouseWheel = PaintBox1MouseWheel
98      OnMouseWheelHorz = PaintBox1MouseWheelHorz
99    end
100  end
101  object ShiftCheck: TCheckBox
102    AnchorSideLeft.Control = DirCheck
103    AnchorSideTop.Control = DirCheck
104    AnchorSideTop.Side = asrBottom
105    Left = 102
106    Height = 19
107    Top = 236
108    Width = 77
109    AllowGrayed = True
110    Caption = 'ShiftCheck'
111    TabOrder = 8
112  end
113  object AltCheck: TCheckBox
114    AnchorSideLeft.Control = ShiftCheck
115    AnchorSideTop.Control = ShiftCheck
116    AnchorSideTop.Side = asrBottom
117    Left = 102
118    Height = 19
119    Top = 255
120    Width = 68
121    AllowGrayed = True
122    Caption = 'AltCheck'
123    TabOrder = 9
124  end
125  object CtrlCheck: TCheckBox
126    AnchorSideLeft.Control = AltCheck
127    AnchorSideTop.Control = AltCheck
128    AnchorSideTop.Side = asrBottom
129    Left = 102
130    Height = 19
131    Top = 274
132    Width = 72
133    AllowGrayed = True
134    Caption = 'CtrlCheck'
135    TabOrder = 10
136  end
137  object BtnDefault: TButton
138    AnchorSideLeft.Control = CtrlCheck
139    AnchorSideTop.Control = CtrlCheck
140    AnchorSideTop.Side = asrBottom
141    AnchorSideRight.Control = Owner
142    AnchorSideRight.Side = asrBottom
143    AnchorSideBottom.Side = asrBottom
144    Left = 102
145    Height = 25
146    Top = 299
147    Width = 82
148    AutoSize = True
149    BorderSpacing.Top = 6
150    Caption = 'BtnDefault'
151    OnClick = BtnDefaultClick
152    TabOrder = 11
153  end
154  object CaretCheck: TCheckBox
155    AnchorSideLeft.Control = ActionBox
156    AnchorSideTop.Control = ActionBox
157    AnchorSideTop.Side = asrBottom
158    Left = 102
159    Height = 19
160    Top = 35
161    Width = 81
162    BorderSpacing.Top = 6
163    Caption = 'CaretCheck'
164    TabOrder = 1
165  end
166  object ActionBox: TComboBox
167    AnchorSideLeft.Control = ActionLabel
168    AnchorSideLeft.Side = asrBottom
169    AnchorSideTop.Control = Owner
170    AnchorSideRight.Control = Owner
171    AnchorSideRight.Side = asrBottom
172    Left = 102
173    Height = 23
174    Top = 6
175    Width = 519
176    Anchors = [akTop, akLeft, akRight]
177    BorderSpacing.Around = 6
178    ItemHeight = 15
179    OnChange = ActionBoxChange
180    Style = csDropDownList
181    TabOrder = 0
182  end
183  object ButtonPanel1: TButtonPanel
184    AnchorSideLeft.Control = Owner
185    AnchorSideTop.Side = asrBottom
186    AnchorSideRight.Control = Owner
187    AnchorSideRight.Side = asrBottom
188    Left = 6
189    Height = 34
190    Top = 409
191    Width = 615
192    OKButton.Name = 'OKButton'
193    OKButton.DefaultCaption = True
194    HelpButton.Name = 'HelpButton'
195    HelpButton.DefaultCaption = True
196    CloseButton.Name = 'CloseButton'
197    CloseButton.DefaultCaption = True
198    CancelButton.Name = 'CancelButton'
199    CancelButton.DefaultCaption = True
200    TabOrder = 14
201    ShowButtons = [pbOK, pbCancel]
202  end
203  object OptBox: TComboBox
204    AnchorSideLeft.Control = OptLabel
205    AnchorSideTop.Control = OptLabel
206    AnchorSideTop.Side = asrBottom
207    AnchorSideRight.Control = Owner
208    AnchorSideRight.Side = asrBottom
209    Left = 102
210    Height = 23
211    Top = 76
212    Width = 519
213    Anchors = [akTop, akLeft, akRight]
214    BorderSpacing.Right = 6
215    Enabled = False
216    ItemHeight = 15
217    Style = csDropDownList
218    TabOrder = 2
219  end
220  object PriorSpin: TSpinEdit
221    AnchorSideLeft.Control = OptLabel
222    AnchorSideTop.Control = OptBox
223    AnchorSideTop.Side = asrBottom
224    Left = 102
225    Height = 23
226    Top = 105
227    Width = 60
228    BorderSpacing.Top = 6
229    MaxValue = 3
230    TabOrder = 3
231  end
232  object Opt2Spin: TSpinEdit
233    AnchorSideLeft.Control = OptLabel
234    AnchorSideTop.Control = OptBox
235    AnchorSideTop.Side = asrBottom
236    AnchorSideRight.Control = Owner
237    AnchorSideRight.Side = asrBottom
238    Left = 561
239    Height = 23
240    Top = 105
241    Width = 60
242    Anchors = [akTop, akRight]
243    BorderSpacing.Top = 6
244    BorderSpacing.Right = 6
245    MaxValue = 999
246    TabOrder = 4
247  end
248  object Opt2Label: TLabel
249    AnchorSideLeft.Control = Owner
250    AnchorSideTop.Control = Opt2Spin
251    AnchorSideTop.Side = asrCenter
252    AnchorSideRight.Control = Opt2Spin
253    Left = 501
254    Height = 15
255    Top = 109
256    Width = 54
257    Anchors = [akTop, akRight]
258    BorderSpacing.Left = 6
259    BorderSpacing.Right = 6
260    Caption = 'Opt2Label'
261    ParentColor = False
262  end
263  object chkUpRestrict: TCheckListBox
264    AnchorSideLeft.Control = ButtonBox
265    AnchorSideLeft.Side = asrBottom
266    AnchorSideBottom.Control = BtnDefault
267    Left = 255
268    Height = 170
269    Top = 159
270    Width = 368
271    Anchors = [akTop, akRight, akBottom]
272    BorderSpacing.Around = 6
273    ItemHeight = 0
274    TabOrder = 12
275  end
276  object ButtonBox: TComboBox
277    AnchorSideLeft.Control = PriorSpin
278    AnchorSideTop.Control = chkUpRestrict
279    AnchorSideRight.Control = chkUpRestrict
280    Left = 102
281    Height = 23
282    Top = 159
283    Width = 147
284    Anchors = [akTop, akLeft, akRight]
285    ItemHeight = 15
286    OnChange = ButtonBoxChange
287    Style = csDropDownList
288    TabOrder = 5
289  end
290  object ClickBox: TComboBox
291    AnchorSideLeft.Control = ButtonBox
292    AnchorSideTop.Control = ButtonBox
293    AnchorSideTop.Side = asrBottom
294    AnchorSideRight.Control = ButtonBox
295    AnchorSideRight.Side = asrBottom
296    Left = 102
297    Height = 23
298    Top = 188
299    Width = 147
300    Anchors = [akTop, akLeft, akRight]
301    BorderSpacing.Top = 6
302    ItemHeight = 15
303    Style = csDropDownList
304    TabOrder = 6
305  end
306  object DirCheck: TCheckBox
307    AnchorSideLeft.Control = ButtonBox
308    AnchorSideTop.Control = ClickBox
309    AnchorSideTop.Side = asrBottom
310    Left = 102
311    Height = 19
312    Top = 217
313    Width = 68
314    BorderSpacing.Top = 6
315    Caption = 'DirCheck'
316    OnChange = DirCheckChange
317    TabOrder = 7
318  end
319end
320