mirror of
				https://gitlab.com/freepascal.org/lazarus/lazarus.git
				synced 2025-11-04 07:59:43 +01:00 
			
		
		
		
	
		
			
				
	
	
		
			190 lines
		
	
	
		
			4.8 KiB
		
	
	
	
		
			Plaintext
		
	
	
	
	
	
			
		
		
	
	
			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
 |