mirror of
				https://gitlab.com/freepascal.org/lazarus/lazarus.git
				synced 2025-11-04 16:34:24 +01:00 
			
		
		
		
	
		
			
				
	
	
		
			268 lines
		
	
	
		
			6.4 KiB
		
	
	
	
		
			Plaintext
		
	
	
	
	
	
			
		
		
	
	
			268 lines
		
	
	
		
			6.4 KiB
		
	
	
	
		
			Plaintext
		
	
	
	
	
	
object MouseaActionDialog: TMouseaActionDialog
 | 
						|
  Left = 314
 | 
						|
  Height = 267
 | 
						|
  Top = 217
 | 
						|
  Width = 362
 | 
						|
  AutoSize = True
 | 
						|
  BorderIcons = [biSystemMenu]
 | 
						|
  BorderStyle = bsDialog
 | 
						|
  Caption = 'MouseaActionDialog'
 | 
						|
  ClientHeight = 267
 | 
						|
  ClientWidth = 362
 | 
						|
  OnCreate = FormCreate
 | 
						|
  Position = poScreenCenter
 | 
						|
  LCLVersion = '0.9.29'
 | 
						|
  object BtnLabel: TLabel
 | 
						|
    AnchorSideLeft.Control = Owner
 | 
						|
    AnchorSideTop.Control = ButtonBox
 | 
						|
    AnchorSideTop.Side = asrCenter
 | 
						|
    AnchorSideRight.Control = ActionLabel
 | 
						|
    AnchorSideRight.Side = asrBottom
 | 
						|
    Left = 6
 | 
						|
    Height = 16
 | 
						|
    Top = 143
 | 
						|
    Width = 64
 | 
						|
    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 = 16
 | 
						|
    Top = 9
 | 
						|
    Width = 64
 | 
						|
    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 = 76
 | 
						|
    Height = 16
 | 
						|
    Top = 60
 | 
						|
    Width = 280
 | 
						|
    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 = 16
 | 
						|
    Top = 108
 | 
						|
    Width = 54
 | 
						|
    BorderSpacing.Left = 6
 | 
						|
    Caption = 'PriorLabel'
 | 
						|
    ParentColor = False
 | 
						|
  end
 | 
						|
  object CapturePanel: TPanel
 | 
						|
    AnchorSideLeft.Control = Owner
 | 
						|
    AnchorSideTop.Control = ShiftCheck
 | 
						|
    AnchorSideTop.Side = asrBottom
 | 
						|
    AnchorSideRight.Control = BtnDefault
 | 
						|
    AnchorSideBottom.Control = BtnDefault
 | 
						|
    AnchorSideBottom.Side = asrBottom
 | 
						|
    Left = 6
 | 
						|
    Height = 25
 | 
						|
    Top = 194
 | 
						|
    Width = 262
 | 
						|
    Anchors = [akTop, akLeft, akRight, akBottom]
 | 
						|
    BorderSpacing.Left = 6
 | 
						|
    BorderSpacing.Top = 6
 | 
						|
    BorderSpacing.Right = 6
 | 
						|
    BevelOuter = bvLowered
 | 
						|
    BevelWidth = 2
 | 
						|
    Color = clBtnShadow
 | 
						|
    ParentColor = False
 | 
						|
    TabOrder = 2
 | 
						|
    OnMouseDown = CapturePanelMouseDown
 | 
						|
  end
 | 
						|
  object ShiftCheck: TCheckBox
 | 
						|
    AnchorSideLeft.Control = ButtonBox
 | 
						|
    AnchorSideTop.Control = ButtonBox
 | 
						|
    AnchorSideTop.Side = asrBottom
 | 
						|
    Left = 76
 | 
						|
    Height = 19
 | 
						|
    Top = 169
 | 
						|
    Width = 77
 | 
						|
    AllowGrayed = True
 | 
						|
    BorderSpacing.Top = 6
 | 
						|
    Caption = 'ShiftCheck'
 | 
						|
    TabOrder = 6
 | 
						|
  end
 | 
						|
  object AltCheck: TCheckBox
 | 
						|
    AnchorSideLeft.Control = ShiftCheck
 | 
						|
    AnchorSideLeft.Side = asrBottom
 | 
						|
    AnchorSideTop.Control = ShiftCheck
 | 
						|
    AnchorSideTop.Side = asrCenter
 | 
						|
    Left = 159
 | 
						|
    Height = 19
 | 
						|
    Top = 169
 | 
						|
    Width = 68
 | 
						|
    AllowGrayed = True
 | 
						|
    BorderSpacing.Left = 6
 | 
						|
    Caption = 'AltCheck'
 | 
						|
    TabOrder = 7
 | 
						|
  end
 | 
						|
  object CtrlCheck: TCheckBox
 | 
						|
    AnchorSideLeft.Control = AltCheck
 | 
						|
    AnchorSideLeft.Side = asrBottom
 | 
						|
    AnchorSideTop.Control = ShiftCheck
 | 
						|
    AnchorSideTop.Side = asrCenter
 | 
						|
    Left = 233
 | 
						|
    Height = 19
 | 
						|
    Top = 169
 | 
						|
    Width = 72
 | 
						|
    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
 | 
						|
    AnchorSideRight.Control = Owner
 | 
						|
    AnchorSideRight.Side = asrBottom
 | 
						|
    AnchorSideBottom.Side = asrBottom
 | 
						|
    Left = 274
 | 
						|
    Height = 25
 | 
						|
    Top = 194
 | 
						|
    Width = 82
 | 
						|
    Anchors = [akTop, akRight]
 | 
						|
    AutoSize = True
 | 
						|
    BorderSpacing.Left = 6
 | 
						|
    BorderSpacing.Top = 6
 | 
						|
    BorderSpacing.Right = 6
 | 
						|
    Caption = 'BtnDefault'
 | 
						|
    OnClick = BtnDefaultClick
 | 
						|
    TabOrder = 9
 | 
						|
  end
 | 
						|
  object DirCheck: TCheckBox
 | 
						|
    AnchorSideLeft.Control = ClickBox
 | 
						|
    AnchorSideLeft.Side = asrBottom
 | 
						|
    AnchorSideTop.Control = ClickBox
 | 
						|
    AnchorSideTop.Side = asrCenter
 | 
						|
    Left = 288
 | 
						|
    Height = 19
 | 
						|
    Top = 142
 | 
						|
    Width = 68
 | 
						|
    BorderSpacing.Around = 6
 | 
						|
    Caption = 'DirCheck'
 | 
						|
    TabOrder = 5
 | 
						|
  end
 | 
						|
  object ClickBox: TComboBox
 | 
						|
    AnchorSideLeft.Control = ButtonBox
 | 
						|
    AnchorSideLeft.Side = asrBottom
 | 
						|
    AnchorSideTop.Control = ButtonBox
 | 
						|
    Left = 182
 | 
						|
    Height = 23
 | 
						|
    Top = 140
 | 
						|
    Width = 100
 | 
						|
    BorderSpacing.Left = 6
 | 
						|
    ItemHeight = 15
 | 
						|
    Style = csDropDownList
 | 
						|
    TabOrder = 4
 | 
						|
  end
 | 
						|
  object ButtonBox: TComboBox
 | 
						|
    AnchorSideLeft.Control = BtnLabel
 | 
						|
    AnchorSideLeft.Side = asrBottom
 | 
						|
    AnchorSideTop.Control = PriorSpin
 | 
						|
    AnchorSideTop.Side = asrBottom
 | 
						|
    Left = 76
 | 
						|
    Height = 23
 | 
						|
    Top = 140
 | 
						|
    Width = 100
 | 
						|
    BorderSpacing.Left = 6
 | 
						|
    BorderSpacing.Top = 12
 | 
						|
    ItemHeight = 15
 | 
						|
    Style = csDropDownList
 | 
						|
    TabOrder = 3
 | 
						|
  end
 | 
						|
  object CaretCheck: TCheckBox
 | 
						|
    AnchorSideLeft.Control = ActionBox
 | 
						|
    AnchorSideTop.Control = ActionBox
 | 
						|
    AnchorSideTop.Side = asrBottom
 | 
						|
    Left = 76
 | 
						|
    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 = 76
 | 
						|
    Height = 23
 | 
						|
    Top = 6
 | 
						|
    Width = 280
 | 
						|
    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
 | 
						|
    AnchorSideTop.Control = BtnDefault
 | 
						|
    AnchorSideTop.Side = asrBottom
 | 
						|
    Left = 6
 | 
						|
    Height = 36
 | 
						|
    Top = 225
 | 
						|
    Width = 350
 | 
						|
    Anchors = [akTop, akLeft, akRight, akBottom]
 | 
						|
    TabOrder = 10
 | 
						|
    ShowButtons = [pbOK, pbCancel]
 | 
						|
  end
 | 
						|
  object OptBox: TComboBox
 | 
						|
    AnchorSideLeft.Control = OptLabel
 | 
						|
    AnchorSideTop.Control = OptLabel
 | 
						|
    AnchorSideTop.Side = asrBottom
 | 
						|
    AnchorSideRight.Control = Owner
 | 
						|
    AnchorSideRight.Side = asrBottom
 | 
						|
    Left = 76
 | 
						|
    Height = 23
 | 
						|
    Top = 76
 | 
						|
    Width = 280
 | 
						|
    Anchors = [akTop, akLeft, akRight]
 | 
						|
    BorderSpacing.Right = 6
 | 
						|
    Enabled = False
 | 
						|
    ItemHeight = 15
 | 
						|
    Style = csDropDownList
 | 
						|
    TabOrder = 11
 | 
						|
  end
 | 
						|
  object PriorSpin: TSpinEdit
 | 
						|
    AnchorSideLeft.Control = OptLabel
 | 
						|
    AnchorSideTop.Control = OptBox
 | 
						|
    AnchorSideTop.Side = asrBottom
 | 
						|
    Left = 76
 | 
						|
    Height = 23
 | 
						|
    Top = 105
 | 
						|
    Width = 60
 | 
						|
    BorderSpacing.Top = 6
 | 
						|
    MaxValue = 3
 | 
						|
    TabOrder = 12
 | 
						|
  end
 | 
						|
end
 |