mirror of
				https://gitlab.com/freepascal.org/lazarus/lazarus.git
				synced 2025-11-04 16:59:33 +01:00 
			
		
		
		
	IDE: fixed ButtonPanel height in Mouse Action dialog
git-svn-id: trunk@41041 -
This commit is contained in:
		
							parent
							
								
									e63627537c
								
							
						
					
					
						commit
						daba7b658a
					
				@ -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
 | 
			
		||||
 | 
			
		||||
		Loading…
	
		Reference in New Issue
	
	Block a user