object FindRenameIdentifierDialog: TFindRenameIdentifierDialog Left = 314 Height = 500 Top = 188 Width = 460 AutoSize = True BorderIcons = [biSystemMenu] Caption = 'FindRenameIdentifierDialog' ClientHeight = 500 ClientWidth = 460 Constraints.MinHeight = 450 Constraints.MinWidth = 460 OnClose = FindRenameIdentifierDialogClose OnCreate = FindRenameIdentifierDialogCreate OnShow = FormShow Position = poScreenCenter LCLVersion = '1.5' object CurrentGroupBox: TGroupBox Left = 6 Height = 100 Top = 6 Width = 448 Align = alClient BorderSpacing.Around = 6 Caption = 'CurrentGroupBox' ClientHeight = 81 ClientWidth = 444 Constraints.MinHeight = 100 TabOrder = 0 object CurrentListBox: TListBox Left = 6 Height = 69 Top = 6 Width = 432 Align = alClient BorderSpacing.Around = 6 ClickOnSelChange = False ItemHeight = 0 ScrollWidth = 430 TabOrder = 0 TopIndex = -1 end end object NewGroupBox: TGroupBox Left = 6 Height = 118 Top = 83 Width = 448 Align = alBottom AutoSize = True BorderSpacing.Around = 6 Caption = 'NewGroupBox' ClientHeight = 99 ClientWidth = 444 TabOrder = 1 object NewEdit: TEdit AnchorSideLeft.Control = NewGroupBox AnchorSideTop.Control = ShowResultCheckBox AnchorSideTop.Side = asrBottom AnchorSideRight.Control = NewGroupBox AnchorSideRight.Side = asrBottom Left = 6 Height = 27 Top = 66 Width = 432 Anchors = [akTop, akLeft, akRight] BorderSpacing.Around = 6 TabOrder = 2 Text = 'NewEdit' end object RenameCheckBox: TCheckBox Left = 6 Height = 24 Top = 6 Width = 432 Align = alTop BorderSpacing.Around = 6 Caption = 'RenameCheckBox' OnChange = RenameCheckBoxChange TabOrder = 0 end object ShowResultCheckBox: TCheckBox AnchorSideLeft.Control = NewGroupBox AnchorSideTop.Control = RenameCheckBox AnchorSideTop.Side = asrBottom AnchorSideRight.Control = NewGroupBox AnchorSideRight.Side = asrBottom Left = 6 Height = 24 Top = 36 Width = 432 Anchors = [akTop, akLeft, akRight] BorderSpacing.Around = 6 Caption = 'ShowResultCheckBox' TabOrder = 1 end end object ScopeGroupBox: TGroupBox Left = 6 Height = 252 Top = 207 Width = 448 Align = alBottom AutoSize = True BorderSpacing.Around = 6 Caption = 'ScopeGroupBox' ClientHeight = 233 ClientWidth = 444 TabOrder = 2 object ScopeCommentsCheckBox: TCheckBox Left = 6 Height = 24 Top = 203 Width = 432 Align = alTop BorderSpacing.Around = 6 Caption = 'ScopeCommentsCheckBox' TabOrder = 2 end object ScopeRadioGroup: TRadioGroup Left = 6 Height = 127 Top = 6 Width = 432 Align = alTop AutoFill = True AutoSize = True BorderSpacing.Around = 6 Caption = 'ScopeRadioGroup' ChildSizing.LeftRightSpacing = 6 ChildSizing.TopBottomSpacing = 6 ChildSizing.EnlargeHorizontal = crsHomogenousChildResize ChildSizing.EnlargeVertical = crsHomogenousChildResize ChildSizing.ShrinkHorizontal = crsScaleChilds ChildSizing.ShrinkVertical = crsScaleChilds ChildSizing.Layout = cclLeftToRightThenTopToBottom ChildSizing.ControlsPerLine = 1 ClientHeight = 108 ClientWidth = 428 Items.Strings = ( 'in current unit' 'in main project' 'in project/package owning file' 'in all open projects and packages' ) TabOrder = 0 end object ExtraFilesGroupBox: TGroupBox Left = 6 Height = 58 Top = 139 Width = 432 Align = alTop AutoSize = True BorderSpacing.Around = 6 Caption = 'ExtraFilesGroupBox' ClientHeight = 39 ClientWidth = 428 TabOrder = 1 object ExtraFilesEdit: TEdit Left = 6 Height = 27 Top = 6 Width = 416 Align = alTop BorderSpacing.Around = 6 TabOrder = 0 Text = 'ExtraFilesEdit' end end end object ButtonPanel1: TButtonPanel Left = 6 Height = 29 Top = 465 Width = 448 OKButton.Name = 'OKButton' OKButton.DefaultCaption = True OKButton.OnClick = FindOrRenameButtonClick HelpButton.Name = 'HelpButton' HelpButton.DefaultCaption = True HelpButton.OnClick = HelpButtonClick CloseButton.Name = 'CloseButton' CloseButton.DefaultCaption = True CloseButton.Enabled = False CancelButton.Name = 'CancelButton' CancelButton.DefaultCaption = True TabOrder = 3 ShowButtons = [pbOK, pbCancel, pbHelp] ShowBevel = False end end