IDE: fixed ButtonPanel height in Mouse Action dialog

git-svn-id: trunk@41041 -
This commit is contained in:
maxim 2013-05-05 15:48:52 +00:00
parent e63627537c
commit daba7b658a

View File

@ -1,17 +1,17 @@
object MouseaActionDialog: TMouseaActionDialog
Left = 314
Height = 267
Height = 255
Top = 217
Width = 362
Width = 374
AutoSize = True
BorderIcons = [biSystemMenu]
BorderStyle = bsDialog
Caption = 'MouseaActionDialog'
ClientHeight = 267
ClientWidth = 362
ClientHeight = 255
ClientWidth = 374
OnCreate = FormCreate
Position = poScreenCenter
LCLVersion = '0.9.31'
LCLVersion = '1.1'
object BtnLabel: TLabel
AnchorSideLeft.Control = Owner
AnchorSideTop.Control = ButtonBox
@ -19,9 +19,9 @@ object MouseaActionDialog: TMouseaActionDialog
AnchorSideRight.Control = ActionLabel
AnchorSideRight.Side = asrBottom
Left = 6
Height = 16
Top = 143
Width = 64
Height = 13
Top = 136
Width = 55
Anchors = [akTop, akLeft, akRight]
BorderSpacing.Left = 6
Caption = 'BtnLabel'
@ -32,9 +32,9 @@ object MouseaActionDialog: TMouseaActionDialog
AnchorSideTop.Control = ActionBox
AnchorSideTop.Side = asrCenter
Left = 6
Height = 16
Top = 9
Width = 64
Height = 13
Top = 10
Width = 55
BorderSpacing.Left = 6
Caption = 'ActionLabel'
ParentColor = False
@ -45,10 +45,10 @@ object MouseaActionDialog: TMouseaActionDialog
AnchorSideTop.Side = asrBottom
AnchorSideRight.Control = Owner
AnchorSideRight.Side = asrBottom
Left = 76
Left = 67
Height = 16
Top = 60
Width = 280
Top = 56
Width = 301
Anchors = [akTop, akLeft, akRight]
AutoSize = False
BorderSpacing.Top = 6
@ -61,9 +61,9 @@ object MouseaActionDialog: TMouseaActionDialog
AnchorSideTop.Control = PriorSpin
AnchorSideTop.Side = asrCenter
Left = 6
Height = 16
Top = 108
Width = 54
Height = 13
Top = 103
Width = 47
BorderSpacing.Left = 6
Caption = 'PriorLabel'
ParentColor = False
@ -73,29 +73,29 @@ object MouseaActionDialog: TMouseaActionDialog
AnchorSideTop.Control = ShiftCheck
AnchorSideTop.Side = asrBottom
AnchorSideRight.Control = BtnDefault
AnchorSideBottom.Control = BtnDefault
AnchorSideBottom.Side = asrBottom
AnchorSideBottom.Control = ButtonPanel1
Left = 6
Height = 25
Top = 194
Width = 262
Height = 27
Top = 182
Width = 279
Anchors = [akTop, akLeft, akRight, akBottom]
BorderSpacing.Left = 6
BorderSpacing.Top = 6
BorderSpacing.Right = 6
BorderSpacing.Bottom = 6
BevelOuter = bvLowered
BevelWidth = 2
ClientHeight = 25
ClientWidth = 262
ClientHeight = 27
ClientWidth = 279
Color = clBtnShadow
ParentColor = False
TabOrder = 2
OnMouseDown = CapturePanelMouseDown
object PaintBox1: TPaintBox
Left = 2
Height = 21
Height = 23
Top = 2
Width = 258
Width = 275
Align = alClient
OnMouseDown = CapturePanelMouseDown
OnMouseWheel = PaintBox1MouseWheel
@ -105,10 +105,10 @@ object MouseaActionDialog: TMouseaActionDialog
AnchorSideLeft.Control = ButtonBox
AnchorSideTop.Control = ButtonBox
AnchorSideTop.Side = asrBottom
Left = 76
Height = 19
Top = 169
Width = 77
Left = 67
Height = 17
Top = 159
Width = 69
AllowGrayed = True
BorderSpacing.Top = 6
Caption = 'ShiftCheck'
@ -119,10 +119,10 @@ object MouseaActionDialog: TMouseaActionDialog
AnchorSideLeft.Side = asrBottom
AnchorSideTop.Control = ShiftCheck
AnchorSideTop.Side = asrCenter
Left = 159
Height = 19
Top = 169
Width = 68
Left = 142
Height = 17
Top = 159
Width = 60
AllowGrayed = True
BorderSpacing.Left = 6
Caption = 'AltCheck'
@ -133,30 +133,28 @@ object MouseaActionDialog: TMouseaActionDialog
AnchorSideLeft.Side = asrBottom
AnchorSideTop.Control = ShiftCheck
AnchorSideTop.Side = asrCenter
Left = 233
Height = 19
Top = 169
Width = 72
Left = 208
Height = 17
Top = 159
Width = 64
AllowGrayed = True
BorderSpacing.Left = 6
Caption = 'CtrlCheck'
TabOrder = 8
end
object BtnDefault: TButton
AnchorSideLeft.Control = CtrlCheck
AnchorSideLeft.Side = asrBottom
AnchorSideTop.Control = ShiftCheck
AnchorSideTop.Side = asrBottom
AnchorSideTop.Control = CapturePanel
AnchorSideTop.Side = asrCenter
AnchorSideRight.Control = Owner
AnchorSideRight.Side = asrBottom
AnchorSideBottom.Side = asrBottom
Left = 274
Height = 25
Top = 194
Width = 82
Left = 291
Height = 23
Top = 184
Width = 77
Anchors = [akTop, akRight]
AutoSize = True
BorderSpacing.Left = 6
BorderSpacing.Top = 6
BorderSpacing.Right = 6
Caption = 'BtnDefault'
@ -168,10 +166,10 @@ object MouseaActionDialog: TMouseaActionDialog
AnchorSideLeft.Side = asrBottom
AnchorSideTop.Control = ClickBox
AnchorSideTop.Side = asrCenter
Left = 288
Height = 19
Top = 142
Width = 68
Left = 279
Height = 17
Top = 134
Width = 60
BorderSpacing.Around = 6
Caption = 'DirCheck'
TabOrder = 5
@ -180,12 +178,12 @@ object MouseaActionDialog: TMouseaActionDialog
AnchorSideLeft.Control = ButtonBox
AnchorSideLeft.Side = asrBottom
AnchorSideTop.Control = ButtonBox
Left = 182
Height = 23
Top = 140
Left = 173
Height = 21
Top = 132
Width = 100
BorderSpacing.Left = 6
ItemHeight = 15
ItemHeight = 13
Style = csDropDownList
TabOrder = 4
end
@ -194,13 +192,13 @@ object MouseaActionDialog: TMouseaActionDialog
AnchorSideLeft.Side = asrBottom
AnchorSideTop.Control = PriorSpin
AnchorSideTop.Side = asrBottom
Left = 76
Height = 23
Top = 140
Left = 67
Height = 21
Top = 132
Width = 100
BorderSpacing.Left = 6
BorderSpacing.Top = 12
ItemHeight = 15
ItemHeight = 13
OnChange = ButtonBoxChange
Style = csDropDownList
TabOrder = 3
@ -209,10 +207,10 @@ object MouseaActionDialog: TMouseaActionDialog
AnchorSideLeft.Control = ActionBox
AnchorSideTop.Control = ActionBox
AnchorSideTop.Side = asrBottom
Left = 76
Height = 19
Top = 35
Width = 81
Left = 67
Height = 17
Top = 33
Width = 74
BorderSpacing.Top = 6
Caption = 'CaretCheck'
TabOrder = 1
@ -223,30 +221,28 @@ object MouseaActionDialog: TMouseaActionDialog
AnchorSideTop.Control = Owner
AnchorSideRight.Control = Owner
AnchorSideRight.Side = asrBottom
Left = 76
Height = 23
Left = 67
Height = 21
Top = 6
Width = 280
Width = 301
Anchors = [akTop, akLeft, akRight]
BorderSpacing.Left = 6
BorderSpacing.Top = 6
BorderSpacing.Right = 6
ItemHeight = 15
ItemHeight = 13
OnChange = ActionBoxChange
Style = csDropDownList
TabOrder = 0
end
object ButtonPanel1: TButtonPanel
AnchorSideLeft.Control = Owner
AnchorSideTop.Control = BtnDefault
AnchorSideTop.Side = asrBottom
AnchorSideRight.Control = Owner
AnchorSideRight.Side = asrBottom
Left = 6
Height = 36
Top = 225
Width = 350
Anchors = [akTop, akLeft, akRight, akBottom]
Height = 34
Top = 215
Width = 362
OKButton.Name = 'OKButton'
OKButton.DefaultCaption = True
HelpButton.Name = 'HelpButton'
@ -264,14 +260,14 @@ object MouseaActionDialog: TMouseaActionDialog
AnchorSideTop.Side = asrBottom
AnchorSideRight.Control = Owner
AnchorSideRight.Side = asrBottom
Left = 76
Height = 23
Top = 76
Width = 280
Left = 67
Height = 21
Top = 72
Width = 301
Anchors = [akTop, akLeft, akRight]
BorderSpacing.Right = 6
Enabled = False
ItemHeight = 15
ItemHeight = 13
Style = csDropDownList
TabOrder = 11
end
@ -279,9 +275,9 @@ object MouseaActionDialog: TMouseaActionDialog
AnchorSideLeft.Control = OptLabel
AnchorSideTop.Control = OptBox
AnchorSideTop.Side = asrBottom
Left = 76
Height = 23
Top = 105
Left = 67
Height = 21
Top = 99
Width = 60
BorderSpacing.Top = 6
MaxValue = 3
@ -293,9 +289,9 @@ object MouseaActionDialog: TMouseaActionDialog
AnchorSideTop.Side = asrBottom
AnchorSideRight.Control = Owner
AnchorSideRight.Side = asrBottom
Left = 296
Height = 23
Top = 105
Left = 308
Height = 21
Top = 99
Width = 60
Anchors = [akTop, akRight]
BorderSpacing.Top = 6
@ -308,10 +304,10 @@ object MouseaActionDialog: TMouseaActionDialog
AnchorSideTop.Control = Opt2Spin
AnchorSideTop.Side = asrCenter
AnchorSideRight.Control = Opt2Spin
Left = 235
Height = 16
Top = 108
Width = 55
Left = 253
Height = 13
Top = 103
Width = 49
Anchors = [akTop, akRight]
BorderSpacing.Left = 6
BorderSpacing.Right = 6