lazarus/ide/mouseactiondialog.lfm
2015-05-27 20:21:43 +00:00

333 lines
8.0 KiB
Plaintext

object MouseaActionDialog: TMouseaActionDialog
Left = 414
Height = 400
Top = 225
Width = 620
BorderIcons = [biSystemMenu]
BorderStyle = bsDialog
Caption = 'MouseaActionDialog'
ClientHeight = 400
ClientWidth = 620
OnCreate = FormCreate
Position = poScreenCenter
LCLVersion = '1.5'
object BtnLabel: TLabel
AnchorSideLeft.Control = Owner
AnchorSideTop.Control = Panel1
AnchorSideRight.Control = ActionLabel
AnchorSideRight.Side = asrBottom
Left = 6
Height = 15
Top = 134
Width = 63
Anchors = [akTop, akLeft, akRight]
BorderSpacing.Left = 6
Caption = 'BtnLabel'
ParentColor = False
end
object ActionLabel: TLabel
AnchorSideLeft.Control = Owner
AnchorSideTop.Control = ActionBox
AnchorSideTop.Side = asrCenter
Left = 6
Height = 15
Top = 10
Width = 63
BorderSpacing.Left = 6
Caption = 'ActionLabel'
ParentColor = False
end
object OptLabel: TLabel
AnchorSideLeft.Control = CaretCheck
AnchorSideTop.Control = CaretCheck
AnchorSideTop.Side = asrBottom
AnchorSideRight.Control = Owner
AnchorSideRight.Side = asrBottom
Left = 75
Height = 16
Top = 60
Width = 539
Anchors = [akTop, akLeft, akRight]
AutoSize = False
BorderSpacing.Top = 6
BorderSpacing.Right = 6
Caption = ' '
ParentColor = False
end
object PriorLabel: TLabel
AnchorSideLeft.Control = Owner
AnchorSideTop.Control = PriorSpin
AnchorSideTop.Side = asrCenter
Left = 6
Height = 15
Top = 109
Width = 53
BorderSpacing.Left = 6
Caption = 'PriorLabel'
ParentColor = False
end
object CapturePanel: TPanel
AnchorSideLeft.Control = chkUpRestrict
AnchorSideTop.Control = BtnDefault
AnchorSideRight.Control = chkUpRestrict
AnchorSideRight.Side = asrBottom
AnchorSideBottom.Control = ButtonPanel1
Left = 181
Height = 62
Top = 292
Width = 433
Anchors = [akTop, akLeft, akRight, akBottom]
BevelOuter = bvLowered
BevelWidth = 2
ClientHeight = 62
ClientWidth = 433
Color = clBtnShadow
ParentColor = False
TabOrder = 11
OnMouseDown = CapturePanelMouseDown
object PaintBox1: TPaintBox
Left = 2
Height = 58
Top = 2
Width = 429
Align = alClient
Anchors = [akTop, akRight, akBottom]
OnMouseDown = CapturePanelMouseDown
OnMouseWheel = PaintBox1MouseWheel
end
end
object ShiftCheck: TCheckBox
AnchorSideLeft.Control = Panel1
AnchorSideTop.Control = Panel1
AnchorSideTop.Side = asrBottom
Left = 75
Height = 19
Top = 217
Width = 77
AllowGrayed = True
BorderSpacing.Top = 6
Caption = 'ShiftCheck'
TabOrder = 6
end
object AltCheck: TCheckBox
AnchorSideLeft.Control = ShiftCheck
AnchorSideTop.Control = ShiftCheck
AnchorSideTop.Side = asrBottom
Left = 75
Height = 19
Top = 242
Width = 68
AllowGrayed = True
BorderSpacing.Top = 6
Caption = 'AltCheck'
TabOrder = 7
end
object CtrlCheck: TCheckBox
AnchorSideLeft.Control = AltCheck
AnchorSideTop.Control = AltCheck
AnchorSideTop.Side = asrBottom
Left = 75
Height = 19
Top = 267
Width = 72
AllowGrayed = True
BorderSpacing.Top = 6
Caption = 'CtrlCheck'
TabOrder = 8
end
object BtnDefault: TButton
AnchorSideLeft.Control = CtrlCheck
AnchorSideTop.Control = CtrlCheck
AnchorSideTop.Side = asrBottom
AnchorSideRight.Control = Owner
AnchorSideRight.Side = asrBottom
AnchorSideBottom.Side = asrBottom
Left = 75
Height = 25
Top = 292
Width = 82
AutoSize = True
BorderSpacing.Top = 6
Caption = 'BtnDefault'
OnClick = BtnDefaultClick
TabOrder = 9
end
object CaretCheck: TCheckBox
AnchorSideLeft.Control = ActionBox
AnchorSideTop.Control = ActionBox
AnchorSideTop.Side = asrBottom
Left = 75
Height = 19
Top = 35
Width = 81
BorderSpacing.Top = 6
Caption = 'CaretCheck'
TabOrder = 1
end
object ActionBox: TComboBox
AnchorSideLeft.Control = ActionLabel
AnchorSideLeft.Side = asrBottom
AnchorSideTop.Control = Owner
AnchorSideRight.Control = Owner
AnchorSideRight.Side = asrBottom
Left = 75
Height = 23
Top = 6
Width = 539
Anchors = [akTop, akLeft, akRight]
BorderSpacing.Left = 6
BorderSpacing.Top = 6
BorderSpacing.Right = 6
ItemHeight = 15
OnChange = ActionBoxChange
Style = csDropDownList
TabOrder = 0
end
object ButtonPanel1: TButtonPanel
AnchorSideLeft.Control = Owner
AnchorSideTop.Side = asrBottom
AnchorSideRight.Control = Owner
AnchorSideRight.Side = asrBottom
Left = 6
Height = 34
Top = 360
Width = 608
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 = 12
ShowButtons = [pbOK, pbCancel]
end
object OptBox: TComboBox
AnchorSideLeft.Control = OptLabel
AnchorSideTop.Control = OptLabel
AnchorSideTop.Side = asrBottom
AnchorSideRight.Control = Owner
AnchorSideRight.Side = asrBottom
Left = 75
Height = 23
Top = 76
Width = 539
Anchors = [akTop, akLeft, akRight]
BorderSpacing.Right = 6
Enabled = False
ItemHeight = 15
Style = csDropDownList
TabOrder = 2
end
object PriorSpin: TSpinEdit
AnchorSideLeft.Control = OptLabel
AnchorSideTop.Control = OptBox
AnchorSideTop.Side = asrBottom
Left = 75
Height = 23
Top = 105
Width = 60
BorderSpacing.Top = 6
MaxValue = 3
TabOrder = 3
end
object Opt2Spin: TSpinEdit
AnchorSideLeft.Control = OptLabel
AnchorSideTop.Control = OptBox
AnchorSideTop.Side = asrBottom
AnchorSideRight.Control = Owner
AnchorSideRight.Side = asrBottom
Left = 554
Height = 23
Top = 105
Width = 60
Anchors = [akTop, akRight]
BorderSpacing.Top = 6
BorderSpacing.Right = 6
MaxValue = 999
TabOrder = 4
end
object Opt2Label: TLabel
AnchorSideLeft.Control = Owner
AnchorSideTop.Control = Opt2Spin
AnchorSideTop.Side = asrCenter
AnchorSideRight.Control = Opt2Spin
Left = 494
Height = 15
Top = 109
Width = 54
Anchors = [akTop, akRight]
BorderSpacing.Left = 6
BorderSpacing.Right = 6
Caption = 'Opt2Label'
ParentColor = False
end
object Panel1: TPanel
AnchorSideLeft.Control = PriorSpin
AnchorSideTop.Control = PriorSpin
AnchorSideTop.Side = asrBottom
Left = 75
Height = 77
Top = 134
Width = 100
AutoSize = True
BorderSpacing.Top = 6
BevelOuter = bvNone
ClientHeight = 77
ClientWidth = 100
TabOrder = 5
object DirCheck: TCheckBox
AnchorSideTop.Control = ClickBox
AnchorSideTop.Side = asrBottom
Left = 0
Height = 19
Top = 58
Width = 68
BorderSpacing.Top = 6
Caption = 'DirCheck'
OnChange = DirCheckChange
TabOrder = 2
end
object ClickBox: TComboBox
AnchorSideTop.Control = ButtonBox
AnchorSideTop.Side = asrBottom
Left = 0
Height = 23
Top = 29
Width = 100
BorderSpacing.Top = 6
ItemHeight = 15
Style = csDropDownList
TabOrder = 1
end
object ButtonBox: TComboBox
AnchorSideLeft.Side = asrBottom
AnchorSideTop.Side = asrBottom
Left = 0
Height = 23
Top = 0
Width = 100
ItemHeight = 15
OnChange = ButtonBoxChange
Style = csDropDownList
TabOrder = 0
end
end
object chkUpRestrict: TCheckListBox
AnchorSideLeft.Control = Panel1
AnchorSideLeft.Side = asrBottom
AnchorSideTop.Control = Panel1
AnchorSideBottom.Control = BtnDefault
Left = 181
Height = 152
Top = 134
Width = 433
Anchors = [akTop, akLeft, akRight, akBottom]
BorderSpacing.Left = 6
BorderSpacing.Right = 6
ItemHeight = 0
TabOrder = 10
end
end