mirror of
				https://gitlab.com/freepascal.org/lazarus/lazarus.git
				synced 2025-11-04 10:19:52 +01:00 
			
		
		
		
	
		
			
				
	
	
		
			307 lines
		
	
	
		
			8.1 KiB
		
	
	
	
		
			Plaintext
		
	
	
	
	
	
			
		
		
	
	
			307 lines
		
	
	
		
			8.1 KiB
		
	
	
	
		
			Plaintext
		
	
	
	
	
	
object ExampleManagerForm: TExampleManagerForm
 | 
						|
  Left = 356
 | 
						|
  Height = 495
 | 
						|
  Top = 130
 | 
						|
  Width = 870
 | 
						|
  Caption = 'ExampleManagerForm'
 | 
						|
  ClientHeight = 495
 | 
						|
  ClientWidth = 870
 | 
						|
  OnClose = FormClose
 | 
						|
  OnCreate = FormCreate
 | 
						|
  Position = poScreenCenter
 | 
						|
  LCLVersion = '1.3'
 | 
						|
  object ProjectsGroupBox: TGroupBox
 | 
						|
    Left = 0
 | 
						|
    Height = 326
 | 
						|
    Top = 123
 | 
						|
    Width = 457
 | 
						|
    Align = alClient
 | 
						|
    BorderSpacing.Top = 3
 | 
						|
    Caption = 'Projects'
 | 
						|
    ClientHeight = 308
 | 
						|
    ClientWidth = 453
 | 
						|
    TabOrder = 0
 | 
						|
    object ProjectsListBox: TListBox
 | 
						|
      AnchorSideLeft.Control = ProjectsGroupBox
 | 
						|
      AnchorSideTop.Control = ProjectFilter
 | 
						|
      AnchorSideTop.Side = asrBottom
 | 
						|
      AnchorSideRight.Control = ProjectsGroupBox
 | 
						|
      AnchorSideRight.Side = asrBottom
 | 
						|
      AnchorSideBottom.Control = ProjectsGroupBox
 | 
						|
      AnchorSideBottom.Side = asrBottom
 | 
						|
      Left = 6
 | 
						|
      Height = 274
 | 
						|
      Top = 28
 | 
						|
      Width = 441
 | 
						|
      Anchors = [akTop, akLeft, akRight, akBottom]
 | 
						|
      BorderSpacing.Around = 6
 | 
						|
      ItemHeight = 0
 | 
						|
      MultiSelect = True
 | 
						|
      OnSelectionChange = ProjectsListBoxSelectionChange
 | 
						|
      TabOrder = 0
 | 
						|
    end
 | 
						|
    object ProjectFilter: TListFilterEdit
 | 
						|
      AnchorSideLeft.Control = ProjectsListBox
 | 
						|
      Left = 6
 | 
						|
      Height = 21
 | 
						|
      Top = 1
 | 
						|
      Width = 221
 | 
						|
      OnAfterFilter = ProjectFilterAfterFilter
 | 
						|
      ButtonWidth = 23
 | 
						|
      NumGlyphs = 1
 | 
						|
      MaxLength = 0
 | 
						|
      TabOrder = 1
 | 
						|
      FilteredListbox = ProjectsListBox
 | 
						|
    end
 | 
						|
    object cbRelativePath: TCheckBox
 | 
						|
      AnchorSideLeft.Control = ProjectFilter
 | 
						|
      AnchorSideLeft.Side = asrBottom
 | 
						|
      AnchorSideTop.Control = ProjectFilter
 | 
						|
      AnchorSideTop.Side = asrCenter
 | 
						|
      Left = 277
 | 
						|
      Height = 17
 | 
						|
      Top = 3
 | 
						|
      Width = 87
 | 
						|
      BorderSpacing.Left = 25
 | 
						|
      Caption = 'Relative paths'
 | 
						|
      OnClick = cbRelativePathClick
 | 
						|
      TabOrder = 2
 | 
						|
    end
 | 
						|
  end
 | 
						|
  object ButtonPanel1: TButtonPanel
 | 
						|
    Left = 6
 | 
						|
    Height = 34
 | 
						|
    Top = 455
 | 
						|
    Width = 858
 | 
						|
    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 = 1
 | 
						|
    ShowButtons = [pbClose, pbHelp]
 | 
						|
  end
 | 
						|
  object ActionGroupBox: TGroupBox
 | 
						|
    AnchorSideLeft.Side = asrBottom
 | 
						|
    Left = 465
 | 
						|
    Height = 326
 | 
						|
    Top = 123
 | 
						|
    Width = 405
 | 
						|
    Align = alRight
 | 
						|
    Anchors = []
 | 
						|
    BorderSpacing.Left = 3
 | 
						|
    BorderSpacing.Top = 3
 | 
						|
    Caption = 'Action'
 | 
						|
    ClientHeight = 308
 | 
						|
    ClientWidth = 401
 | 
						|
    TabOrder = 2
 | 
						|
    object OpenSelectedButton: TBitBtn
 | 
						|
      AnchorSideLeft.Control = ActionGroupBox
 | 
						|
      AnchorSideTop.Control = ActionGroupBox
 | 
						|
      AnchorSideRight.Control = lblCenter
 | 
						|
      Left = 6
 | 
						|
      Height = 25
 | 
						|
      Top = 6
 | 
						|
      Width = 188
 | 
						|
      Anchors = [akTop, akLeft, akRight]
 | 
						|
      BorderSpacing.Around = 6
 | 
						|
      Caption = 'Open First Selected'
 | 
						|
      Enabled = False
 | 
						|
      OnClick = OpenSelectedButtonClick
 | 
						|
      TabOrder = 0
 | 
						|
    end
 | 
						|
    object BuildAllSelectedButton: TBitBtn
 | 
						|
      AnchorSideLeft.Control = ActionGroupBox
 | 
						|
      AnchorSideTop.Control = OpenSelectedButton
 | 
						|
      AnchorSideTop.Side = asrBottom
 | 
						|
      AnchorSideRight.Control = lblCenter
 | 
						|
      AnchorSideRight.Side = asrBottom
 | 
						|
      Left = 6
 | 
						|
      Height = 25
 | 
						|
      Top = 43
 | 
						|
      Width = 189
 | 
						|
      Anchors = [akTop, akLeft, akRight]
 | 
						|
      BorderSpacing.Top = 6
 | 
						|
      BorderSpacing.Around = 6
 | 
						|
      Caption = 'Build All Selected'
 | 
						|
      Enabled = False
 | 
						|
      OnClick = BuildAllSelectedButtonClick
 | 
						|
      TabOrder = 1
 | 
						|
      Visible = False
 | 
						|
    end
 | 
						|
    object SelectAllButton: TBitBtn
 | 
						|
      AnchorSideLeft.Control = lblCenter
 | 
						|
      AnchorSideLeft.Side = asrBottom
 | 
						|
      AnchorSideTop.Control = ActionGroupBox
 | 
						|
      AnchorSideRight.Control = ActionGroupBox
 | 
						|
      AnchorSideRight.Side = asrBottom
 | 
						|
      Left = 207
 | 
						|
      Height = 25
 | 
						|
      Top = 6
 | 
						|
      Width = 188
 | 
						|
      Anchors = [akTop, akLeft, akRight]
 | 
						|
      BorderSpacing.Around = 6
 | 
						|
      Caption = 'Select All'
 | 
						|
      OnClick = SelectAllButtonClick
 | 
						|
      TabOrder = 2
 | 
						|
    end
 | 
						|
    object SelectNoneButton: TBitBtn
 | 
						|
      AnchorSideLeft.Control = lblCenter
 | 
						|
      AnchorSideLeft.Side = asrBottom
 | 
						|
      AnchorSideTop.Control = SelectAllButton
 | 
						|
      AnchorSideTop.Side = asrBottom
 | 
						|
      AnchorSideRight.Control = ActionGroupBox
 | 
						|
      AnchorSideRight.Side = asrBottom
 | 
						|
      Left = 207
 | 
						|
      Height = 25
 | 
						|
      Top = 43
 | 
						|
      Width = 188
 | 
						|
      Anchors = [akTop, akLeft, akRight]
 | 
						|
      BorderSpacing.Top = 6
 | 
						|
      BorderSpacing.Around = 6
 | 
						|
      Caption = 'Select None'
 | 
						|
      Enabled = False
 | 
						|
      OnClick = SelectNoneButtonClick
 | 
						|
      TabOrder = 3
 | 
						|
    end
 | 
						|
    object DescriptionMemo: TMemo
 | 
						|
      AnchorSideLeft.Control = ActionGroupBox
 | 
						|
      AnchorSideTop.Control = SelectNoneButton
 | 
						|
      AnchorSideTop.Side = asrBottom
 | 
						|
      AnchorSideRight.Control = ActionGroupBox
 | 
						|
      AnchorSideRight.Side = asrBottom
 | 
						|
      AnchorSideBottom.Control = ActionGroupBox
 | 
						|
      AnchorSideBottom.Side = asrBottom
 | 
						|
      Left = 6
 | 
						|
      Height = 228
 | 
						|
      Top = 74
 | 
						|
      Width = 389
 | 
						|
      Anchors = [akTop, akLeft, akRight, akBottom]
 | 
						|
      BorderSpacing.Around = 6
 | 
						|
      ReadOnly = True
 | 
						|
      ScrollBars = ssAutoBoth
 | 
						|
      TabOrder = 4
 | 
						|
    end
 | 
						|
    object lblCenter: TLabel
 | 
						|
      AnchorSideLeft.Control = ActionGroupBox
 | 
						|
      AnchorSideLeft.Side = asrCenter
 | 
						|
      AnchorSideTop.Control = ActionGroupBox
 | 
						|
      Left = 200
 | 
						|
      Height = 1
 | 
						|
      Top = 0
 | 
						|
      Width = 1
 | 
						|
      ParentColor = False
 | 
						|
    end
 | 
						|
  end
 | 
						|
  object SelectPanel: TPanel
 | 
						|
    Left = 0
 | 
						|
    Height = 120
 | 
						|
    Top = 0
 | 
						|
    Width = 870
 | 
						|
    Align = alTop
 | 
						|
    ClientHeight = 120
 | 
						|
    ClientWidth = 870
 | 
						|
    TabOrder = 3
 | 
						|
    object cbIncludeAllDirs: TCheckBox
 | 
						|
      AnchorSideTop.Side = asrBottom
 | 
						|
      AnchorSideRight.Control = edRootDirectory
 | 
						|
      AnchorSideRight.Side = asrBottom
 | 
						|
      Left = 328
 | 
						|
      Height = 17
 | 
						|
      Top = 56
 | 
						|
      Width = 136
 | 
						|
      Anchors = [akTop, akRight]
 | 
						|
      BorderSpacing.Top = 3
 | 
						|
      Caption = 'Include all subdirectories'
 | 
						|
      OnClick = cbIncludeAllDirsClick
 | 
						|
      TabOrder = 0
 | 
						|
    end
 | 
						|
    object edRootDirectory: TDirectoryEdit
 | 
						|
      AnchorSideLeft.Control = lbRootDirectory
 | 
						|
      AnchorSideTop.Side = asrBottom
 | 
						|
      AnchorSideRight.Side = asrBottom
 | 
						|
      Left = 8
 | 
						|
      Height = 21
 | 
						|
      Top = 24
 | 
						|
      Width = 456
 | 
						|
      ShowHidden = False
 | 
						|
      ButtonWidth = 23
 | 
						|
      NumGlyphs = 1
 | 
						|
      Anchors = [akTop, akLeft, akRight]
 | 
						|
      BorderSpacing.Top = 7
 | 
						|
      MaxLength = 0
 | 
						|
      TabOrder = 1
 | 
						|
      OnChange = edRootDirectoryChange
 | 
						|
    end
 | 
						|
    object cgIncludedDirs: TCheckGroup
 | 
						|
      AnchorSideBottom.Control = SelectPanel
 | 
						|
      AnchorSideBottom.Side = asrBottom
 | 
						|
      Left = 496
 | 
						|
      Height = 114
 | 
						|
      Top = 5
 | 
						|
      Width = 369
 | 
						|
      Anchors = [akTop, akRight, akBottom]
 | 
						|
      AutoFill = True
 | 
						|
      Caption = 'Include subdirectories'
 | 
						|
      ChildSizing.LeftRightSpacing = 6
 | 
						|
      ChildSizing.TopBottomSpacing = 6
 | 
						|
      ChildSizing.EnlargeHorizontal = crsHomogenousChildResize
 | 
						|
      ChildSizing.EnlargeVertical = crsHomogenousChildResize
 | 
						|
      ChildSizing.ShrinkHorizontal = crsScaleChilds
 | 
						|
      ChildSizing.ShrinkVertical = crsScaleChilds
 | 
						|
      ChildSizing.Layout = cclLeftToRightThenTopToBottom
 | 
						|
      ChildSizing.ControlsPerLine = 4
 | 
						|
      ClientHeight = 96
 | 
						|
      ClientWidth = 365
 | 
						|
      Columns = 4
 | 
						|
      Items.Strings = (
 | 
						|
        'example'
 | 
						|
        'sample'
 | 
						|
        'demo'
 | 
						|
        'test'
 | 
						|
        'examples'
 | 
						|
        'samples'
 | 
						|
        'demos'
 | 
						|
        'tests'
 | 
						|
      )
 | 
						|
      OnItemClick = cgIncludedDirsItemClick
 | 
						|
      TabOrder = 2
 | 
						|
      Data = {
 | 
						|
        080000000202020202020202
 | 
						|
      }
 | 
						|
    end
 | 
						|
    object lbRootDirectory: TLabel
 | 
						|
      Left = 8
 | 
						|
      Height = 13
 | 
						|
      Top = 8
 | 
						|
      Width = 70
 | 
						|
      Caption = 'Root Directory'
 | 
						|
      ParentColor = False
 | 
						|
    end
 | 
						|
    object lbProjectCount: TLabel
 | 
						|
      AnchorSideLeft.Control = edRootDirectory
 | 
						|
      AnchorSideBottom.Control = SelectPanel
 | 
						|
      AnchorSideBottom.Side = asrBottom
 | 
						|
      Left = 8
 | 
						|
      Height = 13
 | 
						|
      Top = 95
 | 
						|
      Width = 71
 | 
						|
      Anchors = [akLeft, akBottom]
 | 
						|
      BorderSpacing.Bottom = 11
 | 
						|
      Caption = 'lbProjectCount'
 | 
						|
      ParentColor = False
 | 
						|
    end
 | 
						|
  end
 | 
						|
  object Splitter1: TSplitter
 | 
						|
    Left = 457
 | 
						|
    Height = 329
 | 
						|
    Top = 120
 | 
						|
    Width = 5
 | 
						|
    Align = alRight
 | 
						|
    ResizeAnchor = akRight
 | 
						|
  end
 | 
						|
end
 |