lazarus/ide/codebrowser.lfm
mattias 2cf81da62e IDE: codebrowser: add package to project
git-svn-id: trunk@21506 -
2009-08-31 22:05:51 +00:00

380 lines
10 KiB
Plaintext

object CodeBrowserView: TCodeBrowserView
Left = 303
Height = 563
Top = 292
Width = 623
ActiveControl = ScopeComboBox
Caption = 'CodeBrowserView'
ClientHeight = 563
ClientWidth = 623
OnClose = FormClose
OnCreate = FormCreate
OnDestroy = FormDestroy
LCLVersion = '0.9.29'
object ScopeGroupBox: TGroupBox
Left = 6
Height = 50
Top = 6
Width = 611
Align = alTop
BorderSpacing.Around = 6
Caption = 'ScopeGroupBox'
ClientHeight = 31
ClientWidth = 607
TabOrder = 0
object ScopeComboBox: TComboBox
Left = 3
Height = 29
Top = 0
Width = 315
ItemHeight = 0
OnEditingDone = ScopeComboBoxEditingDone
OnGetItems = ScopeComboBoxGetItems
TabOrder = 0
Text = 'ScopeComboBox'
end
object ScopeWithRequiredPackagesCheckBox: TCheckBox
Left = 328
Height = 22
Top = 3
Width = 269
Caption = 'ScopeWithRequiredPackagesCheckBox'
OnChange = ScopeWithRequiredPackagesCheckBoxChange
TabOrder = 1
end
end
object OptionsGroupBox: TGroupBox
AnchorSideLeft.Control = Owner
AnchorSideTop.Control = LevelsGroupBox
AnchorSideTop.Side = asrBottom
AnchorSideRight.Control = Owner
AnchorSideRight.Side = asrBottom
AnchorSideBottom.Side = asrBottom
Left = 6
Height = 26
Top = 190
Width = 611
Anchors = [akTop, akLeft, akRight]
AutoSize = True
BorderSpacing.Left = 6
BorderSpacing.Top = 6
BorderSpacing.Right = 6
Caption = 'OptionsGroupBox'
ChildSizing.EnlargeHorizontal = crsScaleChilds
ChildSizing.Layout = cclLeftToRightThenTopToBottom
ChildSizing.ControlsPerLine = 3
ClientHeight = 7
ClientWidth = 607
TabOrder = 1
object ShowPrivateCheckBox: TCheckBox
Left = 0
Height = 22
Top = 0
Width = 182
Caption = 'ShowPrivateCheckBox'
OnChange = ShowPrivateCheckBoxChange
TabOrder = 0
end
object ShowProtectedCheckBox: TCheckBox
Left = 182
Height = 22
Top = 0
Width = 202
Caption = 'ShowProtectedCheckBox'
OnChange = ShowPrivateCheckBoxChange
TabOrder = 1
end
object ShowEmptyNodesCheckBox: TCheckBox
Left = 384
Height = 22
Top = 0
Width = 223
Caption = 'ShowEmptyNodesCheckBox'
OnEditingDone = ShowPrivateCheckBoxChange
TabOrder = 2
end
end
object BrowseTreeView: TTreeView
AnchorSideTop.Control = OptionsGroupBox
AnchorSideTop.Side = asrBottom
Left = 0
Height = 300
Top = 222
Width = 623
Align = alBottom
Anchors = [akTop, akLeft, akRight, akBottom]
BorderSpacing.Top = 6
DefaultItemHeight = 19
Images = ImageList1
ParentShowHint = False
PopupMenu = PopupMenu1
ReadOnly = True
ShowHint = True
TabOrder = 2
OnMouseDown = BrowseTreeViewMouseDown
OnShowHint = BrowseTreeViewShowHint
Options = [tvoAutoItemHeight, tvoHideSelection, tvoKeepCollapsedNodes, tvoReadOnly, tvoShowButtons, tvoShowLines, tvoShowRoot, tvoToolTips]
end
object StatusBar1: TStatusBar
Left = 0
Height = 21
Top = 542
Width = 623
Panels = <>
end
object LevelsGroupBox: TGroupBox
AnchorSideLeft.Control = Owner
AnchorSideTop.Control = ScopeGroupBox
AnchorSideTop.Side = asrBottom
AnchorSideRight.Control = Owner
AnchorSideRight.Side = asrBottom
Left = 6
Height = 122
Top = 62
Width = 611
Anchors = [akTop, akLeft, akRight]
BorderSpacing.Around = 6
Caption = 'LevelsGroupBox'
ClientHeight = 103
ClientWidth = 607
TabOrder = 3
object PackageFilterBeginsSpeedButton: TSpeedButton
AnchorSideLeft.Control = PackageFilterEdit
AnchorSideLeft.Side = asrBottom
AnchorSideTop.Control = PackageFilterEdit
Left = 424
Height = 22
Top = 2
Width = 86
Color = clBtnFace
GroupIndex = 1
NumGlyphs = 0
OnClick = PackageFilterEditEditingDone
ShowHint = True
ParentShowHint = False
end
object PackageFilterContainsSpeedButton: TSpeedButton
AnchorSideLeft.Control = PackageFilterBeginsSpeedButton
AnchorSideLeft.Side = asrBottom
AnchorSideTop.Control = PackageFilterEdit
Left = 510
Height = 22
Top = 2
Width = 86
Color = clBtnFace
GroupIndex = 1
NumGlyphs = 0
OnClick = PackageFilterEditEditingDone
ShowHint = True
ParentShowHint = False
end
object UnitFilterBeginsSpeedButton: TSpeedButton
AnchorSideLeft.Control = UnitFilterEdit
AnchorSideLeft.Side = asrBottom
AnchorSideTop.Control = UnitFilterEdit
AnchorSideTop.Side = asrCenter
Left = 424
Height = 22
Top = 32
Width = 86
Color = clBtnFace
GroupIndex = 2
NumGlyphs = 0
OnClick = PackageFilterEditEditingDone
ShowHint = True
ParentShowHint = False
end
object UnitFilterContainsSpeedButton: TSpeedButton
AnchorSideLeft.Control = UnitFilterBeginsSpeedButton
AnchorSideLeft.Side = asrBottom
AnchorSideTop.Control = UnitFilterEdit
AnchorSideTop.Side = asrCenter
Left = 510
Height = 22
Top = 32
Width = 86
Color = clBtnFace
GroupIndex = 2
NumGlyphs = 0
OnClick = PackageFilterEditEditingDone
ShowHint = True
ParentShowHint = False
end
object IdentifierFilterBeginsSpeedButton: TSpeedButton
AnchorSideLeft.Control = IdentifierFilterEdit
AnchorSideLeft.Side = asrBottom
AnchorSideTop.Control = IdentifierFilterEdit
AnchorSideTop.Side = asrCenter
Left = 424
Height = 22
Top = 59
Width = 86
Color = clBtnFace
GroupIndex = 3
NumGlyphs = 0
OnClick = PackageFilterEditEditingDone
ShowHint = True
ParentShowHint = False
end
object IdentifierFilterContainsSpeedButton: TSpeedButton
AnchorSideLeft.Control = IdentifierFilterBeginsSpeedButton
AnchorSideLeft.Side = asrBottom
AnchorSideTop.Control = IdentifierFilterEdit
AnchorSideTop.Side = asrCenter
Left = 510
Height = 22
Top = 59
Width = 86
Color = clBtnFace
GroupIndex = 3
NumGlyphs = 0
OnClick = PackageFilterEditEditingDone
ShowHint = True
ParentShowHint = False
end
object ShowPackagesCheckBox: TCheckBox
Left = 6
Height = 22
Top = 4
Width = 181
Caption = 'ShowPackagesCheckBox'
OnChange = ShowPackagesCheckBoxChange
TabOrder = 0
end
object ShowUnitsCheckBox: TCheckBox
Left = 6
Height = 22
Top = 32
Width = 154
Caption = 'ShowUnitsCheckBox'
OnChange = ShowUnitsCheckBoxChange
TabOrder = 1
end
object ShowIdentifiersCheckBox: TCheckBox
Left = 6
Height = 22
Top = 59
Width = 183
Caption = 'ShowIdentifiersCheckBox'
OnChange = ShowIdentifiersCheckBoxChange
TabOrder = 2
end
object PackageFilterEdit: TEdit
AnchorSideTop.Control = ShowPackagesCheckBox
AnchorSideTop.Side = asrCenter
Left = 223
Height = 27
Top = 2
Width = 201
OnChange = PackageFilterEditChange
OnEditingDone = PackageFilterEditEditingDone
TabOrder = 3
Text = 'PackageFilterEdit'
end
object UnitFilterEdit: TEdit
AnchorSideTop.Control = ShowUnitsCheckBox
AnchorSideTop.Side = asrCenter
Left = 223
Height = 27
Top = 30
Width = 201
OnChange = PackageFilterEditChange
OnEditingDone = PackageFilterEditEditingDone
TabOrder = 4
Text = 'UnitFilterEdit'
end
object IdentifierFilterEdit: TEdit
AnchorSideTop.Control = ShowIdentifiersCheckBox
AnchorSideTop.Side = asrCenter
Left = 223
Height = 27
Top = 57
Width = 201
OnChange = PackageFilterEditChange
OnEditingDone = PackageFilterEditEditingDone
TabOrder = 5
Text = 'IdentifierFilterEdit'
end
end
object ProgressBar1: TProgressBar
Left = 0
Height = 20
Top = 522
Width = 623
Align = alBottom
Max = 10000
TabOrder = 5
end
object ImageList1: TImageList
Height = 18
Width = 18
left = 298
top = 196
end
object PopupMenu1: TPopupMenu
OnPopup = PopupMenu1Popup
left = 248
top = 196
object CopyDescriptionMenuItem: TMenuItem
Caption = 'CopyDescriptionMenuItem'
OnClick = CopyDescriptionMenuItemClick
end
object CopyIdentifierMenuItem: TMenuItem
Caption = 'CopyIdentifierMenuItem'
OnClick = CopyIdentifierMenuItemClick
end
object CopySeparatorMenuItem: TMenuItem
Caption = '-'
end
object AddPkgToProjectMenuItem: TMenuItem
Caption = 'AddPkgToProjectMenuItem'
OnClick = AddPkgToProjectMenuItemClick
end
object UseSeparatorMenuItem: TMenuItem
Caption = '-'
end
object ExpandAllPackagesMenuItem: TMenuItem
Caption = 'ExpandAllPackagesMenuItem'
OnClick = ExpandAllPackagesMenuItemClick
end
object CollapseAllPackagesMenuItem: TMenuItem
Caption = 'CollapseAllPackagesMenuItem'
OnClick = CollapseAllPackagesMenuItemClick
end
object AllPackagesSeparatorMenuItem: TMenuItem
Caption = '-'
end
object ExpandAllUnitsMenuItem: TMenuItem
Caption = 'ExpandAllUnitsMenuItem'
OnClick = ExpandAllUnitsMenuItemClick
end
object CollapseAllUnitsMenuItem: TMenuItem
Caption = 'CollapseAllUnitsMenuItem'
OnClick = CollapseAllUnitsMenuItemClick
end
object AllUnitsSeparatorMenuItem: TMenuItem
Caption = '-'
end
object ExpandAllClassesMenuItem: TMenuItem
Caption = 'ExpandAllClassesMenuItem'
OnClick = ExpandAllClassesMenuItemClick
end
object CollapseAllClassesMenuItem: TMenuItem
Caption = 'CollapseAllClassesMenuItem'
OnClick = CollapseAllClassesMenuItemClick
end
object AllClassesSeparatorMenuItem: TMenuItem
Caption = '-'
end
object ExportMenuItem: TMenuItem
Caption = 'ExportMenuItem'
OnClick = ExportMenuItemClick
end
end
object IdleTimer1: TIdleTimer
OnTimer = IdleTimer1Timer
left = 350
top = 196
end
end