lazarus/components/codetools/ide/codyidentifiersdlg.lfm
2017-12-07 10:42:39 +00:00

190 lines
4.8 KiB
Plaintext

object CodyIdentifiersDlg: TCodyIdentifiersDlg
Left = 622
Height = 404
Top = 204
Width = 555
ActiveControl = FilterEdit
Caption = 'CodyIdentifiersDlg'
ClientHeight = 404
ClientWidth = 555
OnClose = FormClose
OnCreate = FormCreate
OnDestroy = FormDestroy
Position = poScreenCenter
LCLVersion = '1.9.0.0'
object ButtonPanel1: TButtonPanel
Left = 6
Height = 30
Top = 368
Width = 543
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 = [pbOK, pbCancel, pbHelp]
end
object InfoLabel: TLabel
Left = 8
Height = 16
Top = 8
Width = 58
Caption = 'InfoLabel'
ParentColor = False
WordWrap = True
end
object FilterEdit: TEdit
AnchorSideLeft.Control = Owner
AnchorSideTop.Control = HideOtherProjectsCheckBox
AnchorSideTop.Side = asrBottom
AnchorSideRight.Control = StartsRadioButton
Left = 6
Height = 22
Top = 58
Width = 371
Anchors = [akTop, akLeft, akRight]
BorderSpacing.Left = 6
BorderSpacing.Top = 10
OnChange = FilterEditChange
OnKeyDown = FilterEditKeyDown
TabOrder = 1
end
object ItemsListBox: TListBox
AnchorSideLeft.Control = Owner
AnchorSideTop.Control = FilterEdit
AnchorSideTop.Side = asrBottom
AnchorSideRight.Control = Owner
AnchorSideRight.Side = asrBottom
AnchorSideBottom.Control = UnitLabel
Left = 6
Height = 227
Top = 80
Width = 543
Anchors = [akTop, akLeft, akRight, akBottom]
BorderSpacing.Left = 6
BorderSpacing.Right = 6
BorderSpacing.Bottom = 1
ItemHeight = 0
OnClick = ItemsListBoxClick
OnSelectionChange = ItemsListBoxSelectionChange
PopupMenu = PopupMenu1
TabOrder = 2
end
object UnitLabel: TLabel
AnchorSideLeft.Control = InfoLabel
AnchorSideBottom.Control = PackageLabel
Left = 8
Height = 16
Top = 308
Width = 59
Anchors = [akLeft, akBottom]
BorderSpacing.Bottom = 1
Caption = 'UnitLabel'
ParentColor = False
end
object PackageLabel: TLabel
AnchorSideLeft.Control = InfoLabel
AnchorSideBottom.Control = AddToImplementationUsesCheckBox
Left = 8
Height = 16
Top = 325
Width = 84
Anchors = [akLeft, akBottom]
BorderSpacing.Bottom = 1
Caption = 'PackageLabel'
ParentColor = False
end
object HideOtherProjectsCheckBox: TCheckBox
AnchorSideLeft.Control = InfoLabel
AnchorSideTop.Control = InfoLabel
AnchorSideTop.Side = asrBottom
Left = 8
Height = 18
Top = 30
Width = 193
BorderSpacing.Top = 6
Caption = 'HideOtherProjectsCheckBox'
OnChange = HideOtherProjectsCheckBoxChange
TabOrder = 0
end
object AddToImplementationUsesCheckBox: TCheckBox
AnchorSideLeft.Control = PackageLabel
AnchorSideBottom.Control = ButtonPanel1
Left = 8
Height = 18
Top = 344
Width = 244
Anchors = [akLeft, akBottom]
BorderSpacing.Top = 3
BorderSpacing.Bottom = 3
Caption = 'AddToImplementationUsesCheckBox'
ParentShowHint = False
ShowHint = True
TabOrder = 3
end
object StartsRadioButton: TRadioButton
AnchorSideTop.Control = FilterEdit
AnchorSideRight.Control = ContainsRadioButton
AnchorSideBottom.Control = FilterEdit
AnchorSideBottom.Side = asrBottom
Left = 383
Height = 22
Top = 58
Width = 86
Anchors = [akTop, akRight, akBottom]
BorderSpacing.Left = 6
Caption = 'Starts with'
OnClick = StartsRadioButtonClick
ParentShowHint = False
ShowHint = True
TabOrder = 5
end
object ContainsRadioButton: TRadioButton
AnchorSideTop.Control = FilterEdit
AnchorSideRight.Control = Owner
AnchorSideRight.Side = asrBottom
AnchorSideBottom.Control = FilterEdit
AnchorSideBottom.Side = asrBottom
Left = 475
Height = 22
Top = 58
Width = 74
Anchors = [akTop, akRight, akBottom]
BorderSpacing.Left = 6
BorderSpacing.Right = 6
Caption = 'Contains'
OnClick = ContainsRadioButtonClick
ParentShowHint = False
ShowHint = True
TabOrder = 6
end
object PopupMenu1: TPopupMenu
OnPopup = PopupMenu1Popup
left = 177
top = 133
object JumpMenuItem: TMenuItem
Caption = 'JumpMenuItem'
OnClick = JumpButtonClick
end
object UseMenuItem: TMenuItem
Caption = 'UseMenuItem'
OnClick = UseIdentifierClick
end
object DeleteSeparatorMenuItem: TMenuItem
Caption = '-'
end
object DeleteUnitMenuItem: TMenuItem
Caption = 'DeleteUnitMenuItem'
OnClick = DeleteUnitClick
end
object DeletePackageMenuItem: TMenuItem
Caption = 'DeletePackageMenuItem'
OnClick = DeletePackageClick
end
end
end