object ChangeClassDlg: TChangeClassDlg Left = 291 Height = 298 Top = 163 Width = 423 HorzScrollBar.Page = 422 VertScrollBar.Page = 297 ActiveControl = OldAncestorsListBox BorderIcons = [biSystemMenu, biMinimize] BorderStyle = bsToolWindow Caption = 'ChangeClassDlg' ClientHeight = 298 ClientWidth = 423 OnCreate = ChangeClassDlgCreate LCLVersion = '0.9.25' object OldGroupBox: TGroupBox Left = 8 Height = 248 Top = 8 Width = 200 Caption = 'OldGroupBox' ClientHeight = 230 ClientWidth = 196 TabOrder = 0 object OldClassLabel: TLabel Left = 6 Height = 32 Top = 2 Width = 185 Caption = 'OldClassLabel' ParentColor = False end object OldAncestorGroupBox: TGroupBox Height = 192 Top = 38 Width = 196 Align = alBottom Caption = 'OldAncestorGroupBox' ClientHeight = 174 ClientWidth = 192 TabOrder = 0 object OldAncestorsListBox: TListBox Height = 174 Width = 192 Align = alClient ClickOnSelChange = False TabOrder = 0 end end end object NewGroupBox: TGroupBox Left = 216 Height = 248 Top = 8 Width = 200 Caption = 'NewGroupBox' ClientHeight = 230 ClientWidth = 196 TabOrder = 1 object NewClassComboBox: TComboBox Left = 14 Height = 21 Top = 9 Width = 174 AutoCompleteText = [cbactEndOfLineComplete, cbactSearchAscending] ItemHeight = 13 MaxLength = 0 OnEditingDone = NewClassComboBoxEditingDone TabOrder = 0 Text = 'NewClassComboBox' end object NewAncestorGroupBox: TGroupBox Height = 192 Top = 38 Width = 196 Align = alBottom Caption = 'NewAncestorGroupBox' ClientHeight = 174 ClientWidth = 192 TabOrder = 1 object NewAncestorsListBox: TListBox Height = 174 Width = 192 Align = alClient ClickOnSelChange = False TabOrder = 0 end end end object OkButton: TBitBtn AnchorSideRight.Control = CancelButton AnchorSideBottom.Control = Owner AnchorSideBottom.Side = asrBottom Left = 273 Height = 26 Top = 266 Width = 60 Anchors = [akRight, akBottom] AutoSize = True BorderSpacing.Around = 6 Caption = '&OK' Kind = bkOK ModalResult = 1 NumGlyphs = 0 TabOrder = 2 end object CancelButton: TBitBtn AnchorSideRight.Control = Owner AnchorSideRight.Side = asrBottom AnchorSideBottom.Control = Owner AnchorSideBottom.Side = asrBottom Left = 339 Height = 26 Top = 266 Width = 78 Anchors = [akRight, akBottom] AutoSize = True BorderSpacing.Around = 6 Cancel = True Caption = 'Cancel' Kind = bkCancel ModalResult = 2 NumGlyphs = 0 TabOrder = 3 end end