lazarus/ide/examplemanager.lfm

317 lines
8.3 KiB
Plaintext

object ExampleManagerForm: TExampleManagerForm
Left = 356
Height = 495
Top = 130
Width = 870
ActiveControl = ProjectFilter
Caption = 'ExampleManagerForm'
ClientHeight = 495
ClientWidth = 870
OnClose = FormClose
OnCreate = FormCreate
Position = poScreenCenter
LCLVersion = '2.1.0.0'
object ProjectsGroupBox: TGroupBox
Left = 0
Height = 331
Top = 123
Width = 457
Align = alClient
BorderSpacing.Top = 3
Caption = 'Projects'
ClientHeight = 312
ClientWidth = 453
TabOrder = 1
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 = 272
Top = 34
Width = 441
Anchors = [akTop, akLeft, akRight, akBottom]
BorderSpacing.Around = 6
ItemHeight = 0
MultiSelect = True
OnSelectionChange = ProjectsListBoxSelectionChange
ScrollWidth = 439
TabOrder = 2
TopIndex = -1
end
object ProjectFilter: TListFilterEdit
AnchorSideLeft.Control = ProjectsListBox
Left = 6
Height = 27
Top = 1
Width = 221
OnAfterFilter = ProjectFilterAfterFilter
ButtonWidth = 23
NumGlyphs = 1
MaxLength = 0
TabOrder = 0
FilteredListbox = ProjectsListBox
end
object cbRelativePath: TCheckBox
AnchorSideLeft.Control = ProjectFilter
AnchorSideLeft.Side = asrBottom
AnchorSideTop.Control = ProjectFilter
AnchorSideTop.Side = asrCenter
Left = 252
Height = 24
Top = 2
Width = 121
BorderSpacing.Left = 25
Caption = 'Relative paths'
OnClick = cbRelativePathClick
TabOrder = 1
end
end
object ButtonPanel1: TButtonPanel
Left = 6
Height = 29
Top = 460
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 = 4
ShowButtons = [pbClose, pbHelp]
ShowBevel = False
end
object ActionGroupBox: TGroupBox
AnchorSideLeft.Side = asrBottom
Left = 465
Height = 331
Top = 123
Width = 405
Align = alRight
Anchors = []
BorderSpacing.Left = 3
BorderSpacing.Top = 3
Caption = 'Action'
ClientHeight = 312
ClientWidth = 401
TabOrder = 2
object OpenSelectedButton: TBitBtn
AnchorSideLeft.Control = ActionGroupBox
AnchorSideTop.Control = ActionGroupBox
AnchorSideRight.Control = lblCenter
Left = 6
Height = 29
Top = 6
Width = 188
Anchors = [akTop, akLeft, akRight]
AutoSize = True
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 = 29
Top = 47
Width = 189
Anchors = [akTop, akLeft, akRight]
AutoSize = True
BorderSpacing.Top = 6
BorderSpacing.Around = 6
Caption = 'Build All Selected'
Enabled = False
OnClick = BuildAllSelectedButtonClick
TabOrder = 2
Visible = False
end
object SelectAllButton: TBitBtn
AnchorSideLeft.Control = lblCenter
AnchorSideLeft.Side = asrBottom
AnchorSideTop.Control = ActionGroupBox
AnchorSideRight.Control = ActionGroupBox
AnchorSideRight.Side = asrBottom
Left = 207
Height = 29
Top = 6
Width = 188
Anchors = [akTop, akLeft, akRight]
AutoSize = True
BorderSpacing.Around = 6
Caption = 'Select All'
OnClick = SelectAllButtonClick
TabOrder = 1
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 = 29
Top = 47
Width = 188
Anchors = [akTop, akLeft, akRight]
AutoSize = True
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 = 224
Top = 82
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
BevelOuter = bvNone
ClientHeight = 120
ClientWidth = 870
TabOrder = 0
object cbIncludeAllDirs: TCheckBox
AnchorSideTop.Control = edRootDirectory
AnchorSideTop.Side = asrBottom
AnchorSideRight.Control = edRootDirectory
AnchorSideRight.Side = asrBottom
Left = 270
Height = 24
Top = 54
Width = 194
Anchors = [akTop, akRight]
BorderSpacing.Top = 3
Caption = 'Include all subdirectories'
OnClick = cbIncludeAllDirsClick
TabOrder = 1
end
object edRootDirectory: TDirectoryEdit
AnchorSideLeft.Control = lbRootDirectory
AnchorSideTop.Side = asrBottom
AnchorSideRight.Side = asrBottom
Left = 8
Height = 27
Top = 24
Width = 456
ShowHidden = False
ButtonWidth = 23
NumGlyphs = 1
Anchors = [akTop, akLeft, akRight]
BorderSpacing.Top = 7
MaxLength = 0
TabOrder = 0
OnChange = edRootDirectoryChange
end
object cgIncludedDirs: TCheckGroup
AnchorSideBottom.Control = SelectPanel
AnchorSideBottom.Side = asrBottom
Left = 496
Height = 115
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 = 17
Top = 8
Width = 99
Caption = 'Root Directory'
ParentColor = False
end
object lbProjectCount: TLabel
AnchorSideLeft.Control = edRootDirectory
AnchorSideBottom.Control = SelectPanel
AnchorSideBottom.Side = asrBottom
Left = 8
Height = 17
Top = 92
Width = 102
Anchors = [akLeft, akBottom]
BorderSpacing.Bottom = 11
Caption = 'lbProjectCount'
ParentColor = False
end
end
object Splitter1: TSplitter
Left = 457
Height = 334
Top = 120
Width = 5
Align = alRight
ResizeAnchor = akRight
end
end